SELECT
T.JUDGE_RESULT_CODE,
(SELECT B.BASENAME FROM COM_BASE_INFO B WHERE B.BASECODE = T.JUDGE_RESULT_CODE) JUDGE_RESULT_NAME,
DECODE(T.INSTANCY_FLAG,'1','是','0','否')INSTANCY_FLAG,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.GRADECODE,
T.GRADENAME,
T.DIMATER,
T.FIX_NUM,
T.FIX_LEN,
T.ACT_LEN,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
S.STORAGE_NO,
(SELECT C.STORAGE_NAME FROM YDM_BS_STORAGE C WHERE C.STORAGE_NO = S.STORAGE_NO)STORAGE_NAME,
S.LOCATION_NO,
(SELECT D.LOCATION_NAME FROM YDM_BS_LOCATION D WHERE D.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME
FROM MAT_GP_M T
LEFT JOIN YDM_GP_BUTTRESS S
ON T.MAT_NO = S.MAT_NO
WHERE T.IS_SETFOOT = '1' AND( (T.MAT_STATUS = 80150102)
OR (T.MAT_STATUS = '80150101'
AND T.INSTANCY_FLAG = '1'))
SELECT
D.LOCATION_NO,
D.LOCATION_NAME
FROM YDM_BS_LOCATION D
WHERE 1=1
SELECT COUNT(*) FROM MAT_GP_M T
WHERE T.MAT_NO IN
(SELECT
T.MAT_NO_OLD
FROM MAT_GP_M T
WHERE
T.MAT_NO = ?）
SELECT T.MAT_NO FROM MAT_GP_M T
WHERE
T.STOVE_NO =?
AND T.JUDGE_STOVE_NO=?
UPDATE MAT_GP_M T
SET
T.BACK_FLAG = '2',
T.IS_SETFOOT ='0',
T.SETFOOT_SEQ = '0'
WHERE
T.MAT_NO = ?
UPDATE YDM_GP_BUTTRESS S
SET S.LOCATION_NO = ?
WHERE
S.MAT_NO = ?
--插入红冲出库记录
INSERT INTO YDM_GP_OUTLIST
(OUTSTOCK_SQE,
OUTSTOCK_PLAN_NO,
OUTSTOCK_DOC,
OUTSTOCK_TYPE_CODE,
OUTSTOCK_TYPE_NAME,
MAT_NO,
PRODUCT_FLAG,
MAT_STATUS,
STOVE_NO,
FLAG_STOVE_NO,
JUDGE_STOVE_NO,
CAST_NO,
CCMID,
MATERIAL_NO,
MATERIAL_NAME,
GRADECODE,
GRADENAME,
STD_CODE,
STD_NAME,
DIMATER,
HEIGHT,
ACT_LEN,
FIX_NUM,
FIX_LEN,
ACT_COUNT,
ACT_WEIGHT,
ACT_THEORY_WEIGHT,
PONDER_NO,
PONDER_GROSS_WT,
PLINE_CODE,
PLINE_NAME,
PRO_ORDER_NO,
ORDER_NO,
ORDER_SEQ,
ORDER_SEQ_NO,
ORD_PK,
ORD_LN_PK,
ORD_LN_DLY_PK,
BELONG_CODE,
BELONG_NAME,
BAR_CODE,
STORAGE_NO,
LOCATION_NO,
RPO_TIME,
PRO_BC,
PRO_BZ,
BAL_YEAR_MONTH,
OUTSTOCK_TIME,
MEMO,
CREATE_NAME,
CREATE_TIME,
UPDATE_NAME,
UPDATE_TIME,
GROUD_NO,
PRINT_STOVE_NO,
PRO_PLAN_ID_ZG,
GX_PLAN_NO_ZG,
MAT_GOWHERE_CODE,
MAT_GOWHERE_NAME)
SELECT
(SELECT 'HO' || TO_CHAR(SYSDATE, 'YYMMDD') || LPAD(NVL(MAX(SUBSTR(T.OUTSTOCK_DOC, 9)), 0) + 1, 5, 0) || LPAD( ?,
4, 0)
FROM YDM_GP_OUTLIST T WHERE T.OUTSTOCK_DOC LIKE 'HO' || TO_CHAR(SYSDATE, 'YYMMDD') || '_____' AND
T.OUTSTOCK_TYPE_CODE = '800806'),
T.HEAT_PLAN_NO_NEXT,
(SELECT 'HO' || TO_CHAR(SYSDATE, 'YYMMDD') || LPAD(NVL(MAX(SUBSTR(T.OUTSTOCK_DOC, 9)), 0) + 1, 5, 0)
FROM YDM_GP_OUTLIST T WHERE T.OUTSTOCK_DOC LIKE 'HO' || TO_CHAR(SYSDATE, 'YYMMDD') || '_____' AND
T.OUTSTOCK_TYPE_CODE = '800806'),
'800806',
'出库红冲',
T.MAT_NO,
T.PRODUCT_FLAG,
T.MAT_STATUS,
T.STOVE_NO,
T.FLAG_STOVE_NO,
T.JUDGE_STOVE_NO,
T.CAST_NO,
T.CCMID,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.GRADECODE,
T.GRADENAME,
T.STD_CODE,
T.STD_NAME,
T.DIMATER,
T.HEIGHT,
T.ACT_LEN,
T.FIX_NUM,
T.FIX_LEN,
-T.ACT_COUNT,
-T.ACT_WEIGHT,
-T.ACT_THEORY_WEIGHT,
T.PONDER_NO,
T.PONDER_GROSS_WT,
T.PLINE_CODE,
T.PLINE_NAME,
T.PRO_ORDER_NO,
T.ORDER_NO,
T.ORDER_SEQ,
T.ORDER_SEQ_NO,
T.ORD_PK,
T.ORD_LN_PK,
T.ORD_LN_DLY_PK,
T.BELONG_CODE,
T.BELONG_NAME,
T.BAR_CODE,
S.STORAGE_NO,
S.LOCATION_NO,
T.RPO_TIME,
T.PRO_BC,
T.PRO_BZ,
T.BAL_YEAR_MONTH,
SYSDATE,
T.MEMO,
T.CREATE_NAME,
T.CREATE_TIME,
T.UPDATE_NAME,
T.UPDATE_TIME,
T.GROUD_NO,
T.PRINT_STOVE_NO,
T.PRO_PLAN_ID_ZG,
T.GX_PLAN_NO_ZG,
T.MAT_GOWHERE_CODE,
T.MAT_GOWHERE_NAME
FROM MAT_GP_M T
LEFT JOIN YDM_GP_BUTTRESS S
ON T.MAT_NO = S.MAT_NO
WHERE T.MAT_NO=?