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
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.MAT_STATUS = 80150102
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 =
(SELECT
T.MAT_NO_OLD
FROM MAT_GP_M T
WHERE
T.MAT_NO = ?)
SELECT T.MAT_NO 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'))
AND T.STOVE_NO =?
AND T.JUDGE_STOVE_NO=?
AND S.STORAGE_NO=?
AND S.LOCATION_NO=?
AND T.ACT_LEN =?
ORDER BY T.SETFOOT_SEQ
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 = (SELECT D.LOCATION_NO FROM YDM_BS_LOCATION D WHERE D.LOCATION_NAME = ?),
S.LOCATION_NAME =?
WHERE
S.MAT_NO = ?
DELETE FROM MAT_GP_M T
WHERE
T.MAT_NO = ?
DELETE FROM YDM_GP_BUTTRESS S
WHERE
S.MAT_NO = ?
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'
--插入红冲出库记录
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,
GROUD_NO,
PRINT_STOVE_NO,
PRO_PLAN_ID_ZG,
GX_PLAN_NO_ZG,
MAT_GOWHERE_CODE,
MAT_GOWHERE_NAME,
IS_DEALER,
BACK_FLAG,
SUPPLY_UNIT_CODE,
SUPPLY_UNIT)
SELECT
? || LPAD( ?, 4, 0),
T.HEAT_PLAN_NO_NEXT,
?,
'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,
?,
SYSDATE,
T.MEMO,
?,
SYSDATE,
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,
T.IS_DEALER,
'2',
T.SUPPLY_UNIT_CODE,
T.SUPPLY_UNIT
FROM MAT_GP_M T
LEFT JOIN YDM_GP_BUTTRESS S
ON T.MAT_NO = S.MAT_NO
WHERE T.MAT_NO=?
SELECT ('AI' || TO_CHAR(SYSDATE, 'YYMMDD') || LPAD(NVL(MAX(SUBSTR(T.INSTOCK_DOC, 9)), 0) + 1, 5, 0)) FROM YDM_GP_INLIST T
WHERE T.INSTOCK_TYPE_CODE = '800704' AND TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD') = TO_CHAR(SYSDATE, 'YYYY-MM-DD')
INSERT INTO YDM_GP_INLIST
(INSTOCK_SQE,
INSTOCK_DOC,
INSTOCK_TYPE_CODE,
INSTOCK_TYPE_NAME,
MAT_NO,
PRODUCT_FLAG,
MAT_STATUS,
STOVE_NO,
JUDGE_STOVE_NO,
PLINE_CODE,
PLINE_NAME,
MAT_ORIGIN_CODE,
MAT_ORIGIN_NAME,
MATERIAL_NO,
MATERIAL_NAME,
GRADECODE,
GRADENAME,
DIMATER,
ACT_LEN,
FIX_NUM,
FIX_LEN,
ACT_COUNT,
ACT_WEIGHT,
BELONG_CODE,
BELONG_NAME,
STORAGE_NO,
LOCATION_NO,
LARY_NO,
INSTOCK_TIME,
IN_TIME_F,
BAL_YEAR_MONTH,
--M_BILL_NO,
CREATE_NAME,
CREATE_TIME,
GROUD_NO,
PRODUCCODE,
PRODUCNAME,
EF_PLINE_CODE,
EF_PLINE_NAME,
ORDER_NO,
ORDER_SEQ,
ORDER_SEQ_NO,
ORD_PK,
ORD_LN_PK,
ORD_LN_DLY_PK,
STD_CODE,
STD_NAME,
STORAGE_ATTR,
STORAGE_ATTR_NAME,
STORAGE_TYPE_NO,
STORAGE_TYPE_NAME,
SUPPLY_UNIT_CODE,
SUPPLY_UNIT,
IS_DEALER,
BACK_FLAG,
SOURE_CODE,
SOURE_NAME)
SELECT
? || LPAD( ?, 4, 0) ,
?,
'800704',
'产出红冲',
T.MAT_NO,
T.PRODUCT_FLAG,
T.MAT_STATUS,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_ORIGIN_CODE,
T.MAT_ORIGIN_NAME,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.GRADECODE,
T.GRADENAME,
T.DIMATER,
T.ACT_LEN,
T.FIX_NUM,
T.FIX_LEN,
'-'||T.ACT_COUNT,
'-'||T.ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
SYSDATE,
SYSDATE,
?,
?,
SYSDATE,
T.GROUD_NO,
T.PRODUCCODE,
T.PRODUCNAME,
T.EF_PLINE_CODE,
T.EF_PLINE_NAME,
T.ORDER_NO,
T.ORDER_SEQ,
T.ORDER_SEQ_NO,
T.ORD_PK,
T.ORD_LN_PK,
T.ORD_LN_DLY_PK,
T.STD_CODE,
T.STD_NAME,
S.STORAGE_ATTR,
S.STORAGE_ATTR_NAME,
S.STORAGE_TYPE_NO,
S.STORAGE_TYPE_NAME,
T.SUPPLY_UNIT_CODE,
T.SUPPLY_UNIT,
T.IS_DEALER,
T.BACK_FLAG,
T.SOURE_CODE,
T.SOURE_NAME
FROM MAT_GP_M T
LEFT JOIN YDM_GP_BUTTRESS S
ON T.MAT_NO = S.MAT_NO
WHERE T.MAT_NO=?