SELECT
T.HEAT_PLAN_NO,
T.GX_PRO_SEQ,
T.ZY_BATCH_ID,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.FLAG_STOVE_NO,
T.UPPER_HEATPLAN_ID,
T.PLANSTATUS,
DECODE(T.NODE_ESTATUS,'00','准备','10','上料完成','20','加热炉完成','30','快锻完成','40','退火炉完成','50','锯切完成','60','表检完成','70','下线完成')NODE_ESTATUS,
T.UPPER_PROCESS_CODE,
T.NEXT_PROCESS_CODE,
T.ISENDGX,
T.IF_MATCH_ODD,
T.IF_DO_HEAT_PLAN,
T.PRO_PLAN_ID,
T.GX_PLAN_NO,
T.CCM_PRO_PLAN_ID,
T.CCM_GX_PLAN_NO,
T.GOWHERE_CODE,
T.GOWHERE_NAME,
T.PLINE_CODE,
T.PLINE_NAME,
T.CASTINGTYPE,
T.GRADECODE,
T.GRADENAME,
T.STEELCODE,
T.STEELNAME,
T.WLID_IN,
T.WLDESC_IN,
T.OUTWL_ID,
T.OUTWL_DESC,
T.PROD_STANDARD,
T.OUTPUT_STANDARD,
T.DIAMETER_IN,
T.LENGTH_IN,
T.WT_ONE_IN,
T.LEN_GP_SINGLE,
T.WT_GP_SINGLE,
T.PLN_INSINGLE_NUM,
T.PLN_INSINGLE_WT,
T.CUT_NUM_GP,
T.PLN_INDOUBLE_NUM,
T.PLN_INDOUBLE_WT,
T.DIAMETER_OUT,
T.LENGTH_OUT,
T.OUT_WT_ONE,
T.PLN_OUTSINGLE_NUM,
T.PLN_OUTSINGLE_W,
T.CUT_NUM_OUT,
T.PLN_OUTDOUBLE_NUM,
T.PLN_OUTDOUBLE_W,
T.LEN_CUTHEAD,
T.LEN_CUTEND,
T.ORDER_SOURCE,
T.ORD_LN_DLY_PK,
T.ORDER_NO,
T.ORDER_SEQ,
T.DELIVERY_NO,
T.REQ_BL_ID,
T.IF_EXPORT,
T.PRIORITY,
T.PRIORITY_MEMO,
T.PRO_MONTH,
T.IF_MONITOR,
T.PRDCR_NO,
T.MONITOR_POINT,
T.BOM,
T.INDEX_SEQ,
T.WHOLE_BACKLOG,
T.WHOLE_BACKLOG_DESC,
T.CIC,
T.PIC,
T.SIC,
T.DIC,
T.CRAFT_FILE_NO,
T.CRAFT_FILE_MAN,
T.CRAFT_SEQ,
T.SEC_CRAFT_FILE_NO,
T.STATION_ROAD,
T.PRO_DAY,
T.BAL_YEAR_MONTH,
T.CREATE_NAME,
TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
T.UPDATE_NAME,
TO_CHAR(T.UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
T.DOWNMAN,
TO_CHAR(T.DOWNTIME, 'YYYY-MM-DD HH24:MI:SS') DOWNTIME,
T.SUBCONTRACT_FLAG
FROM PLN_ZY_DZ_M T
WHERE T.SUBCONTRACT_FLAG = '0'
AND T.PLANSTATUS IN('10','20','30')
AND T.NODE_ESTATUS > '00'
SELECT
T.HEAT_PLAN_NO,
T.HEAT_PLAN_SQE,
T.JUGDE_APPLY_CODE,
T.ZY_BATCH_ID,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.PRO_PLAN_ID,
T.GX_PLAN_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.DIAMETER,
T.LEN_GP_SINGLE,
T.WT_GP_SINGLE,
T.CUT_NUM_GP,
T.LENGTH_M,
T.WEIGHT_M,
T.PLAN_INDOUBLE_NUM,
T.PLAN_INDOUBLE_WT,
T.REAL_INDOUBLE_NUM,
T.REAL_INDOUBLE_WT,
T.FLAG_STOVE_NO,
S.STEELCODE,
S.STEELNAME,
S.CRAFT_FILE_NO,
S.SEC_CRAFT_FILE_NO
FROM PLN_ZY_DZ_M S,PLN_ZY_DZ_C T
WHERE S.HEAT_PLAN_NO = T.HEAT_PLAN_NO
SELECT * FROM FRG_LOADING_RESULT T WHERE T.HEAT_PLAN_NO = ? AND T.STOVE_NO = ? AND T.JUDGE_STOVE_NO = ? AND T.INSTORE_FLAG = '0'
SELECT
T.GROUD_NO,
T.MATERIAL_NAME,
T.GRADENAME,
T.STD_NAME,
T.DIMATER,
MAX(T.ACT_LEN)ACT_LEN,
T.FIX_NUM,
T.FIX_LEN,
SUM(T.ACT_COUNT)ACT_COUNT,
SUM(T.ACT_WEIGHT)ACT_WEIGHT,
T.BELONG_NAME,
T.STORAGE_NO,
T.DEPARTMENT_CODE,
T.DEPARTMENT_DESC,
T.MANAGEMENT_NO,
T.MANAGEMENT_NAME,
MAX(TO_CHAR(T.INSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS')) INSTOCK_TIME,
MAX(TO_CHAR(T.IN_TIME_F, 'YYYY-MM-DD HH24:MI:SS')) IN_TIME_F,
T.BAL_YEAR_MONTH,
T.MEMO,
T.CREATE_NAME,
T.INSTOCK_DOC,
T.INSTOCK_TYPE_NAME,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.CAST_NO,
T.CCMID,
T.SAMPLE_FLAG,
T.CUTTING_FLAG,
T.CUTTING_NUM,
T.PLINE_NAME,
T.PRO_ORDER_NO,
T.PRO_PLAN_ID,
T.GX_PLAN_NO,
T.FURNACENO,
T.SEQUENCENO,
T.JUDGE_STOVE_NO_SEQ
FROM YDM_GP_INLIST T
WHERE 1=1
SELECT T.*,S.ORD_PK,S.ORD_LN_PK
FROM PLN_ZY_DZ_M T LEFT JOIN SLM_ORDER_LINE_DELIVERY S
ON T.ORD_LN_DLY_PK = S.ORD_LN_DLY_PK
WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
SELECT ? ||
LPAD(NVL(MAX(SUBSTR(T2.MAT_NO, LENGTH(T2.MAT_NO) - 2)), 0) + 1, 3, 0) MAT_NO
FROM (SELECT MAX(T.MAT_NO)MAT_NO
FROM MAT_GP_M T
WHERE T.JUDGE_STOVE_NO = ?
UNION ALL
SELECT MAX(T1.MAT_NO)MAT_NO
FROM YDM_GP_INLIST T1
WHERE T1.JUDGE_STOVE_NO = ?
UNION ALL
SELECT MAX(T3.MAT_NO)MAT_NO
FROM MAT_GP_TRACK T3
WHERE T3.JUDGE_STOVE_NO = ?) T2
SELECT ? ||
LPAD(NVL(MAX(SUBSTR(T.INSTOCK_SQE, LENGTH(T.INSTOCK_SQE) - 4)), 0) + 1,
5,
0) INSTOCK_SQE
FROM YDM_GP_INLIST T
WHERE TRUNC(T.CREATE_TIME) = TRUNC(SYSDATE)
AND T.INSTOCK_DOC = ?
INSERT INTO YDM_GP_BUTTRESS(
MAT_NO,
STOVE_NO,
JUDGE_STOVE_NO,
STORAGE_NO,
LOCATION_NO,
STORAGE_ATTR,
STORAGE_ATTR_NAME,
STORAGE_TYPE_NO,
STORAGE_TYPE_NAME,
DEPARTMENT_CODE,
DEPARTMENT_DESC,
MANAGEMENT_NO,
MANAGEMENT_NAME,
CREATE_NAME,
CREATE_TIME,
GROUD_NO,
JUDGE_STOVE_NO_LG,
LOCATION_NAME,
LARY_NO)
VALUES(
'#MAT_NO#',
'#STOVE_NO#',
'#JUDGE_STOVE_NO#',
'#STORAGE_NO#',
'#LOCATION_NO#',
'#STORAGE_ATTR#',
'#STORAGE_ATTR_NAME#',
'#STORAGE_TYPE_NO#',
'#STORAGE_TYPE_NAME#',
'#DEPARTMENT_CODE#',
'#DEPARTMENT_DESC#',
'#MANAGEMENT_NO#',
'#MANAGEMENT_NAME#',
'#CREATE_NAME#',
TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
'#GROUD_NO#',
'#JUDGE_STOVE_NO_LG#',
'#LOCATION_NAME#',
'#LARY_NO#')
INSERT INTO MAT_GP_M(
MAT_NO,
PRODUCT_FLAG,
MAT_STATUS,
STOVE_NO,
JUDGE_STOVE_NO,
MATERIAL_NO,
MATERIAL_NAME,
GRADECODE,
GRADENAME,
STD_CODE,
STD_NAME,
PRO_ORDER_NO,
ORDER_NO,
ORDER_SEQ,
ORDER_SEQ_NO,
ORD_PK,
ORD_LN_PK,
ORD_LN_DLY_PK,
PLINE_CODE,
PLINE_NAME,
DIMATER,
ACT_LEN,
FIX_NUM,
FIX_LEN,
ACT_COUNT,
ACT_WEIGHT,
ACT_THEORY_WEIGHT,
BELONG_CODE,
BELONG_NAME,
INSTOCK_TIME,
BAL_YEAR_MONTH,
CREATE_NAME,
CREATE_TIME,
GROUD_NO,
PRO_PLAN_ID,
GX_PLAN_NO,
DB_ACT_COUNT,
CIC,
PIC,
SIC,
DIC,
GPTYPE,
QCM_STAUS,
LG_CRAFT_NO,
ISENDGX,
CRAFTNO,
STEELCODE,
STEELNAME,
FURNACENO,
STEEL_STANDRAD,
JUDGE_STOVE_NO_LG)
VALUES(
'#MAT_NO#',
'#PRODUCT_FLAG#',
'#MAT_STATUS#',
'#STOVE_NO#',
'#JUDGE_STOVE_NO#',
'#MATERIAL_NO#',
'#MATERIAL_NAME#',
'#GRADECODE#',
'#GRADENAME#',
'#STD_CODE#',
'#STD_NAME#',
'#PRO_ORDER_NO#',
'#ORDER_NO#',
'#ORDER_SEQ#',
'#ORDER_SEQ_NO#',
'#ORD_PK#',
'#ORD_LN_PK#',
'#ORD_LN_DLY_PK#',
'#PLINE_CODE#',
'#PLINE_NAME#',
'#DIMATER#',
'#ACT_LEN#',
'#FIX_NUM#',
'#FIX_LEN#',
'#ACT_COUNT#',
'#ACT_WEIGHT#',
'#ACT_THEORY_WEIGHT#',
'#BELONG_CODE#',
'#BELONG_NAME#',
TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
'#BAL_YEAR_MONTH#',
'#CREATE_NAME#',
TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
'#GROUD_NO#',
'#PRO_PLAN_ID#',
'#GX_PLAN_NO#',
'#DB_ACT_COUNT#',
'#CIC#',
'#PIC#',
'#SIC#',
'#DIC#',
'#GPTYPE#',
'#QCM_STAUS#',
'#LG_CRAFT_NO#',
'#ISENDGX#',
'#CRAFTNO#',
'#STEELCODE#',
'#STEELNAME#',
'#FURNACENO#',
'#STEEL_STANDRAD#',
'#JUDGE_STOVE_NO_LG#')
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,
PRO_ORDER_NO,
ORDER_NO,
ORDER_SEQ,
ORDER_SEQ_NO,
ORD_PK,
ORD_LN_PK,
ORD_LN_DLY_PK,
MATERIAL_NO,
MATERIAL_NAME,
GRADECODE,
GRADENAME,
STD_CODE,
STD_NAME,
DIMATER,
ACT_LEN,
FIX_NUM,
FIX_LEN,
ACT_COUNT,
ACT_WEIGHT,
BELONG_CODE,
BELONG_NAME,
STORAGE_NO,
LOCATION_NO,
DEPARTMENT_CODE,
DEPARTMENT_DESC,
MANAGEMENT_NO,
MANAGEMENT_NAME,
INSTOCK_TIME,
IN_TIME_F,
BAL_YEAR_MONTH,
STORAGE_ATTR,
STORAGE_ATTR_NAME,
STORAGE_TYPE_NO,
STORAGE_TYPE_NAME,
CREATE_NAME,
CREATE_TIME,
GROUD_NO,
PRO_PLAN_ID,
GX_PLAN_NO,
JUDGE_STOVE_NO_SEQ,
FURNACENO,
JUDGE_STOVE_NO_LG)
VALUES(
'#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#',
'#PRO_ORDER_NO#',
'#ORDER_NO#',
'#ORDER_SEQ#',
'#ORDER_SEQ_NO#',
'#ORD_PK#',
'#ORD_LN_PK#',
'#ORD_LN_DLY_PK#',
'#MATERIAL_NO#',
'#MATERIAL_NAME#',
'#GRADECODE#',
'#GRADENAME#',
'#STD_CODE#',
'#STD_NAME#',
'#DIMATER#',
'#ACT_LEN#',
'#FIX_NUM#',
'#FIX_LEN#',
'#ACT_COUNT#',
'#ACT_WEIGHT#',
'#BELONG_CODE#',
'#BELONG_NAME#',
'#STORAGE_NO#',
'#LOCATION_NO#',
'#DEPARTMENT_CODE#',
'#DEPARTMENT_DESC#',
'#MANAGEMENT_NO#',
'#MANAGEMENT_NAME#',
TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
TO_DATE('#IN_TIME_F#','YYYY-MM-DD HH24:MI:SS'),
'#BAL_YEAR_MONTH#',
'#STORAGE_ATTR#',
'#STORAGE_ATTR_NAME#',
'#STORAGE_TYPE_NO#',
'#STORAGE_TYPE_NAME#',
'#CREATE_NAME#',
TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
'#GROUD_NO#',
'#PRO_PLAN_ID#',
'#GX_PLAN_NO#',
'#JUDGE_STOVE_NO_SEQ#',
'#FURNACENO#',
'#JUDGE_STOVE_NO_LG#')
INSERT INTO FRG_DZ_INSTORE_RESULT(
HEAT_PLAN_NO,
GX_PRO_SEQ,
PRO_PLAN_ID,
GX_PLAN_NO,
STOVE_NO,
JUDGE_STOVE_NO,
JUDGE_STOVE_NO_SEQ,
MATERIAL_NO,
MATERIAL_NAME,
GRADECODE,
GRADENAME,
DIAMETER,
FIX_NUM,
FIX_LEN,
LENGTH,
ACT_COUNT,
WEIGHT,
IN_BC,
IN_BZ,
CREATE_NAME,
CREATE_TIME)
VALUES(
'#HEAT_PLAN_NO#',
'#GX_PRO_SEQ#',
'#PRO_PLAN_ID#',
'#GX_PLAN_NO#',
'#STOVE_NO#',
'#JUDGE_STOVE_NO#',
'#JUDGE_STOVE_NO_SEQ#',
'#MATERIAL_NO#',
'#MATERIAL_NAME#',
'#GRADECODE#',
'#GRADENAME#',
'#DIAMETER#',
'#FIX_NUM#',
'#FIX_LEN#',
'#LENGTH#',
'#ACT_COUNT#',
'#WEIGHT#',
'#IN_BC#',
'#IN_BZ#',
'#CREATE_NAME#',
TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'))
UPDATE FRG_LOADING_RESULT T
SET
T.INSTORE_FLAG = '1'
WHERE
T.RESULT_NO = '#RESULT_NO#'
UPDATE PLN_ZY_DZ_M T
SET
T.NODE_ESTATUS = '70'
WHERE
T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
UPDATE PLN_ZY_DZ_M T
SET
T.NODE_ESTATUS = '10'
WHERE
T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
UPDATE FRG_DZ_INSTORE_RESULT T
SET
T.NODE_FUR_FLAG = '1'
WHERE
T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
UPDATE FRG_DZ_INSTORE_RESULT T
SET
T.NODE_FUR_FLAG = '0'
WHERE
T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
SELECT COUNT(1) FROM FRG_LOADING_RESULT T WHERE T.INSTORE_FLAG = '0' AND T.HEAT_PLAN_NO = ?
SELECT COUNT(1) FROM MAT_GP_M T WHERE T.STOVE_NO = ?
AND T.JUDGE_STOVE_NO = ?
AND NVL(T.PRO_PLAN_ID,'/') = NVL(?,'/')
AND NVL(T.GX_PLAN_NO,'/') = NVL(?,'/')
AND T.JUGDE_APPLY_CODE IS NOT NULL
SELECT COUNT(1)ACOUNT FROM MAT_GP_M T,YDM_GP_INLIST S
WHERE T.MAT_NO = S.MAT_NO
AND S.INSTOCK_TYPE_CODE = '800701'
AND S.INSTOCK_DOC = '#INSTOCK_DOC#'
AND S.STOVE_NO = '#STOVE_NO#'
AND S.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND S.FIX_NUM = '#FIX_NUM#'
AND T.JUGDE_APPLY_CODE IS NOT NULL
SELECT * FROM PLN_ZY_DZ_M T WHERE T.STOVE_NO = '#STOVE_NO#'AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND NVL(T.PRO_PLAN_ID,'/') = NVL('#PRO_PLAN_ID#','/')AND NVL(T.GX_PLAN_NO,'/') = NVL('#GX_PLAN_NO#','/')
DECLARE
BEGIN
UPDATE FRG_LOADING_RESULT T
SET T.INSTORE_FLAG = '0'
WHERE T.STOVE_NO = '#STOVE_NO#'
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
AND T.OUTNUM_CUT = '#FIX_NUM#';
DELETE FROM FRG_DZ_INSTORE_RESULT T
WHERE T.STOVE_NO = '#STOVE_NO#'
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND NVL(T.PRO_PLAN_ID,'/') = NVL('#PRO_PLAN_ID#','/')
AND NVL(T.GX_PLAN_NO,'/') = NVL('#GX_PLAN_NO#','/')
AND T.FIX_NUM = '#FIX_NUM#';
END;
DECLARE
BEGIN
FOR MYROW IN (SELECT *
FROM YDM_GP_INLIST T
WHERE T.STOVE_NO = '#STOVE_NO#'
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND NVL(T.PRO_PLAN_ID,'/') = NVL('#PRO_PLAN_ID#','/')
AND NVL(T.GX_PLAN_NO,'/') = NVL('#GX_PLAN_NO#','/')
AND T.FIX_NUM = '#FIX_NUM#') LOOP
DELETE FROM MAT_GP_M T WHERE T.MAT_NO = MYROW.MAT_NO;
DELETE FROM YDM_GP_BUTTRESS T WHERE T.MAT_NO = MYROW.MAT_NO;
DELETE FROM YDM_GP_INLIST T WHERE T.MAT_NO = MYROW.MAT_NO;
END LOOP;
END;