SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
MAX(T.MATERIAL_NO) MATERIAL_NO,
MAX(T.MATERIAL_NAME) MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
--MAX(T.STD_CODE)STD_CODE,
--MAX(T.STD_NAME)STD_NAME,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
MAX(T.PROCESS_CDOE) PROCESS_CDOE,
MAX(T.PROCESS_DESC) PROCESS_DESC,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
--T.MAT_GOWHERE_CODE,
--T.MAT_GOWHERE_NAME,
--T.MAT_GOWHERE_NAME AS UPDATE_GO_WHERE_CODE,
T.JUDGE_RESULT,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
T.PIPMEMO,
DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
MAX(T.TARGET) TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
FROM PLN_ORDER_DBK_S T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
FROM PLN_ORDER_RCL_S T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
FROM PLN_ORDER_JGX_S T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
ELSE
NULL
END) ORDER_NO_NEXT,
--MAX(T.JUDGE_STD_DES)JUDGE_STD_DES,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT (SELECT T5.STORAGE_NAME
FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
AND T4.PLINE_CODE = T1.PLINE_CODE)
FROM PLN_ZY_DBK_M T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT (SELECT T7.STORAGE_NAME
FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
AND T6.PLINE_CODE = T2.PLINE_CODE)
FROM PLN_ZY_RCL_M T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT (SELECT T9.STORAGE_NAME
FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
AND T8.PLINE_CODE = T3.PLINE_CODE)
FROM PLN_ZY_JGX_M T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
ELSE
NULL
END) DIRECTION,
'0' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
'否' LOCK_BILL_FLAG,
T.HEAT_PLAN_NO
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO #INSTOCK_TIME# #JUDGE_STOVE_NO#
#FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.MAT_GOWHERE_CODE,
T.MAT_GOWHERE_NAME,
T.PIPMEMO,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
T.JUDGE_RESULT,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.HEAT_PLAN_NO
UNION ALL
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
MAX(T.MATERIAL_NO) MATERIAL_NO,
MAX(T.MATERIAL_NAME) MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
--MAX(T.STD_CODE)STD_CODE,
--MAX(T.STD_NAME)STD_NAME,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
'' PROCESS_CDOE,
'' PROCESS_DESC,
'' NEXT_PROCESS_CDOE,
'' NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
--'' MAT_GOWHERE_CODE,
--'' MAT_GOWHERE_NAME,
--'' UPDATE_GO_WHERE_CODE,
T.JUDGE_RESULT,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
T.PIPMEMO,
'合格' QCM_STAUS,
'' TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
'' ORDER_NO_NEXT,
--MAX(T.JUDGE_STD_NAME) JUDGE_STD_DES,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
'' PRO_PLAN_ID_NEXT,
'' GX_PLAN_NO_NEXT,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
'' DIRECTION,
'1' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
''HEAT_PLAN_NO
FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.BELONG_CODE IN ('100101', '100102', '100103') #INSTOCK_TIME#
#JUDGE_STOVE_NO# #FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS1#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.PIPMEMO,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.JUDGE_RESULT,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.LOCK_BILL_FLAG,
T.HEAT_PLAN_NO
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
MAX(T.PROCESS_CDOE) PROCESS_CDOE,
MAX(T.PROCESS_DESC) PROCESS_DESC,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
T.PIPMEMO,
T.MEMO1,
DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
MAX(T.TARGET) TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
FROM PLN_ORDER_DBK_S T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
FROM PLN_ORDER_RCL_S T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
FROM PLN_ORDER_JGX_S T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
ELSE
NULL
END) ORDER_NO_NEXT,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
T.HEAT_PLAN_NO,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT (SELECT T5.STORAGE_NAME
FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
AND T4.PLINE_CODE = T1.PLINE_CODE)
FROM PLN_ZY_DBK_M T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT (SELECT T7.STORAGE_NAME
FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
AND T6.PLINE_CODE = T2.PLINE_CODE)
FROM PLN_ZY_RCL_M T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT (SELECT T9.STORAGE_NAME
FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
AND T8.PLINE_CODE = T3.PLINE_CODE)
FROM PLN_ZY_JGX_M T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
ELSE
NULL
END) DIRECTION,
'0' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
'否' LOCK_BILL_FLAG,
T.OFFLINE_DOC,
T.MEMO,DECODE(min(t.SCRAP_FRIM_FLAG),'0','未申请','1','已申请','审核通过') SCRAP_FRIM_FLAG
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.PRODUCT_FLAG = '801401' #INSTOCK_TIME# #JUDGE_STOVE_NO#
#FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS# #ORDER_NO#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.MAT_GOWHERE_CODE,
T.MAT_GOWHERE_NAME,
T.PIPMEMO,
T.MEMO1,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
T.JUDGE_RESULT,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.OFFLINE_DOC,
T.MEMO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.HEAT_PLAN_NO
UNION ALL
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
MAX(T.PROCESS_CDOE) PROCESS_CDOE,
MAX(T.PROCESS_DESC) PROCESS_DESC,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
T.PIPMEMO,
T.MEMO1,
DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
MAX(T.TARGET) TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
FROM PLN_ORDER_DBK_S T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
FROM PLN_ORDER_RCL_S T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
FROM PLN_ORDER_JGX_S T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
ELSE
NULL
END) ORDER_NO_NEXT,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
T.HEAT_PLAN_NO,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT (SELECT T5.STORAGE_NAME
FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
AND T4.PLINE_CODE = T1.PLINE_CODE)
FROM PLN_ZY_DBK_M T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT (SELECT T7.STORAGE_NAME
FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
AND T6.PLINE_CODE = T2.PLINE_CODE)
FROM PLN_ZY_RCL_M T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT (SELECT T9.STORAGE_NAME
FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
AND T8.PLINE_CODE = T3.PLINE_CODE)
FROM PLN_ZY_JGX_M T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
ELSE
NULL
END) DIRECTION,
'0' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
'否' LOCK_BILL_FLAG,
T.OFFLINE_DOC,
T.MEMO,DECODE(min(t.SCRAP_FRIM_FLAG),'0','未申请','1','已申请','审核通过') SCRAP_FRIM_FLAG
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.PRODUCT_FLAG = '801402' #INSTOCK_TIME# #JUDGE_STOVE_NO#
#FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS# #ORDER_NO#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.MAT_GOWHERE_CODE,
T.MAT_GOWHERE_NAME,
T.PIPMEMO,
T.MEMO1,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
T.JUDGE_RESULT,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.OFFLINE_DOC,
T.MEMO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.HEAT_PLAN_NO
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
'' PROCESS_CDOE,
'' PROCESS_DESC,
'' NEXT_PROCESS_CDOE,
'' NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
T.PIPMEMO,
T.MEMO1,
'合格' QCM_STAUS,
'' TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
'' ORDER_NO_NEXT,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
'' PRO_PLAN_ID_NEXT,
'' GX_PLAN_NO_NEXT,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
'' DIRECTION,
'1' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
''OFFLINE_DOC,
T.MEMO,
''HEAT_PLAN_NO
FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.BELONG_CODE IN ('100101', '100102', '100103','100105')
AND T.PRODUCT_FLAG = '801402' #INSTOCK_TIME# #JUDGE_STOVE_NO#
#FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS# #ORDER_NO#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.PIPMEMO,
T.MEMO1,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.JUDGE_RESULT,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.LOCK_BILL_FLAG,
T.MEMO,
T.MATERIAL_NO,
T.MATERIAL_NAME
UNION ALL
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
'' PROCESS_CDOE,
'' PROCESS_DESC,
'' NEXT_PROCESS_CDOE,
'' NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
T.PIPMEMO,
T.MEMO1,
'合格' QCM_STAUS,
'' TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
'' ORDER_NO_NEXT,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
'' PRO_PLAN_ID_NEXT,
'' GX_PLAN_NO_NEXT,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
'' DIRECTION,
'1' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
''OFFLINE_DOC,
T.MEMO,
''HEAT_PLAN_NO
FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.BELONG_CODE IN ('100101', '100102', '100103','100105')
AND T.PRODUCT_FLAG = '801403' #INSTOCK_TIME# #JUDGE_STOVE_NO#
#FLAG_STOVE_NO_ZG# #STORAGE_NO# #QCM_STATUS# #ORDER_NO#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.PIPMEMO,
T.MEMO1,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.JUDGE_RESULT,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.LOCK_BILL_FLAG,
T.MEMO,
T.MATERIAL_NO,
T.MATERIAL_NAME
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.PRODUCCODE,
T.PRODUCNAME,
T.STEELCODE,
T.STEELNAME,
T.GRADECODE,
T.GRADENAME,
T.SPEC_CODE,
T.SPEC_NAME,
T.MODEL_CODE,
T.MODEL_DESC,
T.STD_CODE,
T.STD_NAME,
T.STD_STYLE,
T.STD_STYLE_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
T.ACT_DIMATER,
T.ACT_HEIGHT,
T.ACT_LEN,
T.ACT_LEN_MIN,
T.ACT_LEN_MAX,
T.ACT_COUNT,
T.ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
'0' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
'否' LOCK_BILL_FLAG,
T.MEASURING_SEQ,
T.MAT_NO
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
#INSTOCK_TIME#
#JUDGE_STOVE_NO#
#FLAG_STOVE_NO_ZG#
#STORAGE_NO#
#QCM_STATUS#
UNION ALL
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.PRODUCCODE,
T.PRODUCNAME,
T.STEELCODE,
T.STEELNAME,
T.GRADECODE,
T.GRADENAME,
T.SPEC_CODE,
T.SPEC_NAME,
T.MODEL_CODE,
T.MODEL_DESC,
T.STD_CODE,
T.STD_NAME,
T.STD_STYLE,
T.STD_STYLE_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
T.ACT_DIMATER,
T.ACT_HEIGHT,
T.ACT_LEN,
T.ACT_LEN_MIN,
T.ACT_LEN_MAX,
T.ACT_COUNT,
T.ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
'合格' QCM_STAUS,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
'1' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
T.MEASURING_SEQ,
T.MAT_NO
FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.BELONG_CODE IN ('100101', '100102', '100103')
#INSTOCK_TIME#
#JUDGE_STOVE_NO#
#FLAG_STOVE_NO_ZG#
#STORAGE_NO#
#QCM_STATUS1#
SELECT
T.OUTSTOCK_DOC,
MAX(T.OUTSTOCK_TYPE_CODE)OUTSTOCK_TYPE_CODE,
MAX(T.OUTSTOCK_TYPE_NAME)OUTSTOCK_TYPE_NAME,
T.VEHICLE_NO,
--T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
MAX(T.PRODUCCODE)PRODUCCODE,
MAX(T.PRODUCNAME)PRODUCNAME,
MAX(T.STD_CODE)STD_CODE,
MAX(T.STD_NAME)STD_NAME,
MAX(T.GRADECODE)GRADECODE,
MAX(T.GRADENAME)GRADENAME,
MAX(T.STEELCODE)STEELCODE,
MAX(T.STEELNAME)STEELNAME,
MAX(T.STD_STYLE)STD_STYLE,
MAX(T.STD_STYLE_DESC)STD_STYLE_DESC,
MAX(T.SPEC_CODE)SPEC_CODE,
MAX(T.SPEC_NAME)SPEC_NAME,
MAX(T.MODEL_CODE)MODEL_CODE,
MAX(T.MODEL_DESC)MODEL_DESC,
MAX(T.PRO_ORDER_NO)PRO_ORDER_NO,
MAX(T.PLINE_CODE)PLINE_CODE,
MAX(T.PLINE_NAME)PLINE_NAME,
MAX(T.ACT_DIMATER)ACT_DIMATER,
MAX(T.ACT_HEIGHT)ACT_HEIGHT,
SUM(T.ACT_LEN)ACT_LEN,
MAX(T.ACT_LEN_MIN)ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX)ACT_LEN_MAX,
SUM(T.ACT_COUNT)ACT_COUNT,
SUM(T.ACT_WEIGHT)ACT_WEIGHT,
SUM(T.PONDER_GROSS_WT)PONDER_GROSS_WT,
MAX(T.BELONG_CODE)BELONG_CODE,
MAX(T.BELONG_NAME)BELONG_NAME,
MAX(T.STORAGE_NO)STORAGE_NO,
(SELECT T2.STORAGE_NAME FROM YDM_BS_STORAGE T2 WHERE T2.STORAGE_NO = T.STORAGE_NO)STORAGE_NAME,
T.TAR_STORAGE_NO,
(SELECT T1.STORAGE_NAME FROM YDM_BS_STORAGE T1 WHERE T1.STORAGE_NO = T.TAR_STORAGE_NO)TAR_STORAGE_NAME,
MAX(TO_CHAR(T.OUTSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS')) OUTSTOCK_TIME,
MAX(TO_CHAR(T.LEAVE_FACTORY_TIME, 'YYYY-MM-DD HH24:MI:SS')) LEAVE_FACTORY_TIME,
MAX(T.LEAVE_FACTORY_NAME) LEAVE_FACTORY_NAME,
MAX(T.CREATE_NAME)CREATE_NAME,
MAX(T.JUDGE_STD_NAME)JUDGE_STD_NAME,
DECODE(T.QCM_STAUS,'00','合格','11','待处理','22','判废')QCM_STAUS,
MAX(DECODE(T.TAR_REC_FLAG,'0','未接收','1','已接收'))TAR_REC_FLAG,
MAX(T.DRIVER)DRIVER,
DECODE(T.OUT_TYPE,'0','写卡倒运','1','票据倒运','2','纠错倒运','3','外委倒运','4','装车皮倒运')OUT_TYPE,
MAX(T.FLAG_STOVE_NO_ZG)FLAG_STOVE_NO_ZG,
DECODE(T.PRODUCT_FLAG,'801401','在制品','801402','成品','801403','商品')PRODUCT_FLAG,
MAX((SELECT T1.FINAL_USER_DESC
FROM PLN_SALEORD T1
WHERE (T1.ORD_LN_DLY_PK = T.ORD_LN_DLY_PK OR
T1.ORD_LN_DLY_PK = SUBSTR(T.ORD_LN_DLY_PK,0,INSTR(T.ORD_LN_DLY_PK,'-')-1)))) FINAL_USER_DESC,
(CASE WHEN T.OUT_BC ='1'
THEN '白班'
WHEN T.OUT_BC ='2'
THEN '中班'
WHEN T.OUT_BC ='3'
THEN '晚班' end) OUT_BC,
(CASE WHEN T.OUT_BZ ='1'
THEN '甲'
WHEN T.OUT_BZ ='2'
THEN '乙'
WHEN T.OUT_BZ ='3'
THEN '丙'
WHEN T.OUT_BZ ='4'
THEN '丁' end) OUT_BZ
FROM YDM_BC_OUTLIST T
WHERE T.OUTSTOCK_TYPE_CODE = '800803'
AND T.VALIDFLAG = '1'
SELECT T.STORAGE_NAME,T.STORAGE_NO FROM YDM_BS_STORAGE T WHERE T.STORAGE_TYPE_NO IN ('800202','800205') AND T.VALIDFLAG = '1'
SELECT ?|| TO_CHAR(SYSDATE, 'YYMMDD') ||
LPAD(NVL(MAX(SUBSTR(OUTSTOCK_DOC, length(OUTSTOCK_DOC) - 4)), 0) + 1, 5, 0) OUTSTOCK_DOC
FROM YDM_BC_OUTLISTDOC T
WHERE T.OUTSTOCK_DOC LIKE ?|| TO_CHAR(SYSDATE, 'YYMMDD')|| '_____'
SELECT ?|| TO_CHAR(SYSDATE, 'YYMMDD') ||
LPAD(NVL(MAX(SUBSTR(OUTSTOCK_DOC, 11)), 0), 5, 0) OUTSTOCK_DOC
FROM YDM_BC_OUTLISTDOC T
WHERE T.OUTSTOCK_DOC LIKE ?|| TO_CHAR(SYSDATE, 'YYMMDD')|| '_____'
SELECT 'IC' || TO_CHAR(?, 'YYMMDD') ||
LPAD(NVL(MAX(SUBSTR(T.INSTOCK_DOC, 9)), 0) + 1, 5, 0) INSTOCK_DOC
FROM YDM_BC_INLIST T
WHERE T.INSTOCK_TYPE_CODE = ?
AND TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD') =
TO_CHAR(?, 'YYYY-MM-DD')
SELECT NVL(SUM(T.ACT_COUNT),'0')ACOUNT
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.BATCH_NO = '#BATCH_NO#'
AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
AND S.STORAGE_NO = '#STORAGE_NO#'
AND T.PLINE_CODE = '#PLINE_CODE#'
AND T.QCM_STAUS = '#QCM_STAUS#'
AND T.BELONG_CODE = '#BELONG_CODE#'
AND NVL(T.PRO_PLAN_ID_NEXT, '/') = NVL('#PRO_PLAN_ID_NEXT#', '/')
AND NVL(T.GX_PLAN_NO_NEXT, '/') = NVL('#GX_PLAN_NO_NEXT#', '/')
--AND NVL(T.MAT_GOWHERE_CODE, '/') = NVL('#MAT_GOWHERE_CODE#', '/')
AND NVL(T.FLAG_STOVE_NO_ZG, '/') = NVL('#FLAG_STOVE_NO_ZG#', '/')
AND NVL(T.SUBCONTRACT_NO,'/') = NVL('#SUBCONTRACT_NO#','/')
AND NVL(T.SUBCONTRACT_NO_SEQ,'/') = NVL('#SUBCONTRACT_NO_SEQ#','/')
AND NVL(T.OFFLINE_DOC,'/') = NVL('#OFFLINE_DOC#','/')
AND NVL(T.MEMO,'/') = NVL('#MEMO#','/')
'2'
]]>
SELECT NVL(SUM(T.ACT_COUNT),'0')ACOUNT
FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.BATCH_NO = '#BATCH_NO#'
AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
AND S.STORAGE_NO = '#STORAGE_NO#'
AND T.PLINE_CODE = '#PLINE_CODE#'
AND T.BELONG_CODE = '#BELONG_CODE#'
AND T.PRODUCT_FLAG = '#PRODUCT_FLAG#'
AND NVL(T.SUBCONTRACT_NO,'/') = NVL('#SUBCONTRACT_NO#','/')
AND NVL(T.SUBCONTRACT_NO_SEQ,'/') = NVL('#SUBCONTRACT_NO_SEQ#','/')
SELECT T.PLINE_CODE,T.PLINE_NAME FROM COM_BASE_PLINE T WHERE T.VALIDFLAG='1'
= '70'
AND T.NODE_STATUS < '99'
]]>
SELECT T.NODE_STATUS,T.STATUS FROM MIL_PLAN T WHERE T.ID = '#ID#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
SELECT NVL(SUM(T.ACT_COUNT),0)ACOUNT
FROM PORT_MIL_BATCH_SAMPLE_RESULT T
WHERE T.PLAN_ID = '#ID#'
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.STATUS = '0'
SELECT S.STORAGE_NO, S.STORAGE_TYPE_NO, S.STORAGE_TYPE_NAME
FROM COM_BASE_PLINE T, YDM_BS_STORAGE S
WHERE T.DEPARTMENT_CODE = S.MANAGEMENT_NO
AND T.PLINE_CODE = ?
0) THEN
UPDATE MIL_OFFLINE_RESLUT T
SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) +
TO_NUMBER('#OFFLINE_NUM#')
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.OFFLINE_PRO = '#OFFLINE_PRO#';
ELSE
INSERT INTO MIL_OFFLINE_RESLUT
(RECHECK_NUM,
PRODUCNAME,
STEELCODE,
STEELNAME,
GRADECODE,
GRADENAME,
SPEC_CODE,
SPEC_NAME,
MODEL_CODE,
MODEL_DESC,
STD_CODE,
STD_NAME,
STD_STYLE,
STD_STYLE_DESC,
ACT_LEN_RANGE,
CONTRACT_NO,
PRODUCCODE,
INSTORAGE_NUM,
QUALIFIED_NUM,
SCRAP_NUM,
ZP_M_LH,
LOT_NO,
STOVE_NO,
JUDGE_STOVE_NO,
DIAMETER,
THICKNESS,
LENGTH,
PLINE_CODE,
OFFLINE_PRO,
REAL_TIME_STATUS,
OFFLINE_NUM,
BACKLINE_NUM,
GROUP_NUM,
FINAL_NUM,
ZP_FLAG,
STATUS,
TYPE_FLAG,
OFFLINE_TIME,
REMARK,
COL_USER,
COL_SHIFT,
COL_GROUP,
OFFLINE_TYPE,
ZP_HEIGHT,
TARGET,
IMP_PROCESS,
PRO_PLAN_ID,
GX_PLAN_NO)
VALUES
('0',
'#PRODUCNAME#',
'#STEELCODE#',
'#STEELNAME#',
'#GRADECODE#',
'#GRADENAME#',
'#SPEC_CODE#',
'#SPEC_NAME#',
'#MODEL_CODE#',
'#MODEL_DESC#',
'#STD_CODE#',
'#STD_NAME#',
'#STD_STYLE#',
'#STD_STYLE_DESC#',
'#ACT_LEN_RANGE#',
'#CONTRACT_NO#',
'#PRODUCCODE#',
'0',
'0',
'0',
'',
'#LOT_NO#',
'#STOVE_NO#',
'#JUDGE_STOVE_NO#',
'#DIAMETER#',
'#THICKNESS#',
'#LENGTH#',
'#PLINE_CODE#',
'#OFFLINE_PRO#',
'0',
'#OFFLINE_NUM#',
'0',
'0',
'0',
'0',
'0',
'0',
TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'',
'#COL_USER#',
'#COL_SHIFT#',
'#COL_GROUP#',
'#OFFLINE_TYPE#',
'#ZP_HEIGHT#',
'#TARGET#',
'#IMP_PROCESS#',
'#PRO_PLAN_ID#',
'#GX_PLAN_NO#');
END IF;
IF ('#OFFLINE_PRO#' = 'JZ') THEN
UPDATE MIL_STRAIGHTENING_RESULT T
SET T.OFFLINE_NUM_TOTAL = TO_NUMBER(T.OFFLINE_NUM_TOTAL) +
TO_NUMBER('#OFFLINE_NUM#'),
T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) -
TO_NUMBER('#OFFLINE_NUM#')
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.PLINE_CODE = '#PLINE_CODE#';
FOR MYROW IN (SELECT *
FROM (SELECT T.SEQ
FROM MIL_STRAIGH_RACK T
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.PLINE_CODE = '#PLINE_CODE#'
AND T.OFFLINE_FLAG = '0'
AND T.STATUS = '0'
ORDER BY T.SEQ ASC)
WHERE ROWNUM <= #OFFLINE_NUM#) LOOP
UPDATE MIL_STRAIGH_RACK T
SET T.OFFLINE_FLAG = '1',
T.STATUS = '3',
T.OFFLINE_TIME = TO_DATE('#OFFLINE_TIME#',
'YYYY-MM-DD HH24:MI:SS')
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.PLINE_CODE = '#PLINE_CODE#'
AND T.SEQ = MYROW.SEQ;
INSERT INTO MIL_SLAB_SCRAP_SEQ
(COL_NO,
COL_TYPE,
JUDGE_STOVE_NO,
PROCESS_NO,
SEQ,
TIME,
FLAG,
COL_MODE,
COL_TIME,
COL_USER,
COL_SHIFT,
COL_GROUP,
RESULT_NO,
PRO_PLAN_ID,
GX_PLAN_NO)
VALUES
('1',
'1',
'#JUDGE_STOVE_NO#',
'9',
MYROW.SEQ,
TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'0',
'0',
TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'#COL_USER#',
'#COL_SHIFT#',
'#COL_GROUP#',
'#ID#',
'#PRO_PLAN_ID#',
'#GX_PLAN_NO#');
END LOOP;
ELSIF ('#OFFLINE_PRO#' = 'TS') THEN
IF ('#PLINE_CODE#' = 'C010') THEN
UPDATE MIL_ET_RESULT T
SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) +
TO_NUMBER('#OFFLINE_NUM#')
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.PLINE_CODE = '#PLINE_CODE#';
ELSE
UPDATE MIL_MT_RESULT T
SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) +
TO_NUMBER('#OFFLINE_NUM#')
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.PLINE_CODE = '#PLINE_CODE#';
END IF;
FOR MYROW IN (SELECT *
FROM (SELECT T.SEQ
FROM MIL_TESTING_RACK T
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.PLINE_CODE = '#PLINE_CODE#'
AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
AND T.OFFLINE_FLAG = '0'
AND T.STATUS = '0'
AND T.SUSPECT_FLAG = '0'
ORDER BY T.SEQ ASC)
WHERE ROWNUM <= #OFFLINE_NUM#) LOOP
UPDATE MIL_TESTING_RACK T
SET T.OFFLINE_FLAG = '1',
T.OFFLINE_TYPE = '1',
T.OFFLINE_TIME = TO_DATE('#OFFLINE_TIME#',
'YYYY-MM-DD HH24:MI:SS')
WHERE 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.PLINE_CODE = '#PLINE_CODE#'
AND T.SEQ = MYROW.SEQ;
INSERT INTO MIL_SLAB_SCRAP_SEQ
(COL_NO,
COL_TYPE,
JUDGE_STOVE_NO,
PROCESS_NO,
SEQ,
TIME,
FLAG,
COL_MODE,
COL_TIME,
COL_USER,
COL_SHIFT,
COL_GROUP,
RESULT_NO,
PRO_PLAN_ID,
GX_PLAN_NO)
VALUES
('1',
'1',
'#JUDGE_STOVE_NO#',
'10',
MYROW.SEQ,
TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'0',
'0',
TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'#COL_USER#',
'#COL_SHIFT#',
'#COL_GROUP#',
'#ID#',
'#PRO_PLAN_ID#',
'#GX_PLAN_NO#');
END LOOP;
ELSIF ('#OFFLINE_PRO#' = 'ZJ') THEN
UPDATE MIL_SURFACE_RESULT T
SET T.OFFLINE_QUANTITY = TO_NUMBER(T.OFFLINE_QUANTITY) +
TO_NUMBER('#OFFLINE_NUM#')
WHERE 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#', '/');
FOR MYROWOFFLINE IN (SELECT *
FROM (SELECT T.SEQ, T.JUDGE_STOVE_NO
FROM MIL_QA_RACK T
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.OFFLINE_FLAG = '0'
AND T.STATUS = '0'
ORDER BY T.SEQ ASC)
WHERE ROWNUM <= #OFFLINE_NUM#) LOOP
UPDATE MIL_QA_RACK T
SET T.OFFLINE_FLAG = '1', T.STATUS = '2'
WHERE 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.SEQ = MYROWOFFLINE.SEQ;
INSERT INTO MIL_SLAB_SCRAP_SEQ
(COL_NO,
COL_TYPE,
JUDGE_STOVE_NO,
PROCESS_NO,
SEQ,
TIME,
FLAG,
COL_MODE,
COL_TIME,
COL_USER,
COL_SHIFT,
COL_GROUP,
RESULT_NO,
PRO_PLAN_ID,
GX_PLAN_NO)
VALUES
('0',
'1',
'#JUDGE_STOVE_NO#',
'11',
MYROWOFFLINE.SEQ,
TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'0',
'0',
TO_DATE('#OFFLINE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'#COL_USER#',
'#COL_SHIFT#',
'#COL_GROUP#',
'#ID#',
'#PRO_PLAN_ID#',
'#GX_PLAN_NO#');
END LOOP;
ELSIF ('#OFFLINE_PRO#' = 'XX') THEN
SELECT COUNT(1)
INTO V_COUNT
FROM MIL_INSTORE_RESULT T
WHERE 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.RESULT_NO = '#ID#';
IF (V_COUNT > 0) THEN
UPDATE MIL_INSTORE_RESULT T
SET T.OFFLINE_NUM = TO_NUMBER(NVL(OFFLINE_NUM, 0)) + TO_NUMBER('#OFFLINE_NUM#')
WHERE 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.RESULT_NO = '#ID#';
ELSE
INSERT INTO MIL_INSTORE_RESULT
(RESULT_NO,
JUDGE_STOVE_NO,
LOT_NO,
PLINE_CODE,
TYPE,
TARGET_DIAMETER,
TARGET_THICKNESS,
TARGET_LENGTH,
QUALIFIED_NUM,
QUALIFIED_TONS,
SCRAP_NUM,
SCRAP_TONS,
OFFLINE_NUM,
OFFLINE_TONS,
PRO_PLAN_ID,
GX_PLAN_NO)
VALUES
('#ID#',
'#JUDGE_STOVE_NO#',
'#LOT_NO#',
'#PLINE_CODE#',
'#GRADENAME#',
'',
'',
'#ACT_LEN_RANGE#',
'',
'',
'',
'',
'#OFFLINE_NUM#',
'',
'#PRO_PLAN_ID#',
'#GX_PLAN_NO#');
END IF;
END IF;
END;
]]>
DECLARE
V_TIME MIL_OFFLINE_RESLUT.OFFLINE_TIME%TYPE := SYSDATE;
BEGIN
INSERT INTO YDM_BC_BUTTRESS
(JUDGE_STOVE_NO,
BATCH_NO,
BATCH_GROUD_NO,
STORAGE_NO,
LOCATION_NO,
STORAGE_TYPE_NO,
STORAGE_TYPE_NAME,
CREATE_NAME,
MAT_NO,
CREATE_TIME,
MANAGEMENT_NO,
MANAGEMENT_NAME,
DEPARTMENT_CODE,
DEPARTMENT_DESC)
VALUES
('#JUDGE_STOVE_NO#',
'#BATCH_NO#',
'#BATCH_GROUD_NO#',
'#STORAGE_NO#',
'#LOCATION_NO#',
'#STORAGE_TYPE_NO#',
'#STORAGE_TYPE_NAME#',
'#CREATE_NAME#',
'#MAT_NO#',
TO_DATE('#CREATE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'#MANAGEMENT_NO#',
'#MANAGEMENT_NAME#',
'#DEPARTMENT_CODE#',
'#DEPARTMENT_DESC#');
INSERT INTO MAT_BC_M
(JUDGE_STOVE_NO,
BATCH_NO,
BATCH_GROUD_NO,
ACT_COUNT,
ACT_WEIGHT,
CREATE_TIME,
MAT_NO,
PRODUCT_FLAG,
MAT_STATUS,
PLINE_CODE,
PLINE_NAME,
QCM_STAUS,
HEAT_PLAN_NO,
ZG_STOVE_SQE,
PRODUCCODE,
PRODUCNAME,
STEELCODE,
STEELNAME,
SPEC_CODE,
SPEC_NAME,
GRADECODE,
GRADENAME,
MODEL_CODE,
MODEL_DESC,
STD_CODE,
STD_NAME,
BELONG_CODE,
BELONG_NAME,
STD_STYLE,
STD_STYLE_DESC,
ACT_DIMATER,
ACT_HEIGHT,
ACT_LEN_MIN,
ACT_LEN_MAX,
LOT_NO,
PRO_ORDER_NO,
ACT_LEN,
TARGET,
PROCESS_STATUS,
FLAG_STOVE_NO_ZG,
INSTOCK_TIME,
STOVE_NO)
VALUES
('#JUDGE_STOVE_NO#',
'#BATCH_NO#',
'#BATCH_GROUD_NO#',
'#ACT_COUNT#',
'#ACT_WEIGHT#',
TO_DATE('#CREATE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'#MAT_NO#',
'#PRODUCT_FLAG#',
'#MAT_STATUS#',
'#PLINE_CODE#',
'#PLINE_NAME#',
'#QCM_STAUS#',
'#HEAT_PLAN_NO#',
'#ZG_STOVE_SQE#',
'#PRODUCCODE#',
'#PRODUCNAME#',
'#STEELCODE#',
'#STEELNAME#',
'#SPEC_CODE#',
'#SPEC_NAME#',
'#GRADECODE#',
'#GRADENAME#',
'#MODEL_CODE#',
'#MODEL_DESC#',
'#STD_CODE#',
'#STD_NAME#',
'#BELONG_CODE#',
'#BELONG_NAME#',
'#STD_STYLE#',
'#STD_STYLE_DESC#',
'#ACT_DIMATER#',
'#ACT_HEIGHT#',
'#ACT_LEN_MIN#',
'#ACT_LEN_MAX#',
'#LOT_NO#',
'#PRO_ORDER_NO#',
'#ACT_LEN#',
'#TARGET#',
'#PROCESS_STATUS#',
'#JUDGE_STOVE_NO#',
TO_DATE('#CREATE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
'#STOVE_NO#');
END;
DECLARE
V_COUNT MIL_CHECK_DEATIL_SIMPLE.OFFLINE_PRODUCT%TYPE := NULL;
BEGIN
SELECT NVL(COUNT(1),0)
INTO V_COUNT
FROM MIL_CHECK_DEATIL_SIMPLE T
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.RESULT_NO = '#RESULT_NO#'
AND T.DEFECT_CODE = '#DEFECT_CODE#';
IF (V_COUNT > 0) THEN
UPDATE MIL_CHECK_DEATIL_SIMPLE T
SET T.OFFLINE_PRODUCT = TO_NUMBER(NVL(T.OFFLINE_PRODUCT, 0)) +
TO_NUMBER('#OFFLINE_PRODUCT#')
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.RESULT_NO = '#RESULT_NO#'
AND T.DEFECT_CODE = '#DEFECT_CODE#';
ELSE
INSERT INTO MIL_CHECK_DEATIL_SIMPLE
(JUDGE_STOVE_NO,
DEFECT_ITEM,
OFFLINE_PRODUCT,
DEFECT_CODE,
RESULT_NO,
PRO_PLAN_ID,
GX_PLAN_NO)
VALUES
('#JUDGE_STOVE_NO#',
'#DEFECT_ITEM#',
'#OFFLINE_PRODUCT#',
'#DEFECT_CODE#',
'#RESULT_NO#',
'#PRO_PLAN_ID#',
'#GX_PLAN_NO#');
END IF;
END;
SELECT T.STORAGE_NO,T.STORAGE_NAME FROM YDM_BS_STORAGE T WHERE T.STORAGE_TYPE_NO IN('800202','800205') AND T.VALIDFLAG = '1' and t.seam_area = '1'
SELECT COUNT(1)ACOUNT
FROM YDM_BC_OUTLIST T
WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#'
--AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
--AND T.BATCH_NO = '#BATCH_NO#'
-- AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
AND T.TAR_REC_FLAG = '1'
--AND T.QCM_STAUS = '#QCM_STAUS#'
DECLARE
BEGIN
FOR MYROW IN (SELECT *
FROM YDM_BC_OUTLIST T
WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#'
--AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
--AND T.BATCH_NO = '#BATCH_NO#'
--AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
--AND T.QCM_STAUS = '#QCM_STAUS#'
AND T.VALIDFLAG = '1'
ORDER BY T.MAT_NO ASC) LOOP
IF (MYROW.DATA_SUORCE = '0') THEN
IF (MYROW.QCM_STAUS = '22') THEN
UPDATE YDM_BC_BUTTRESS S
SET S.STORAGE_NO = MYROW.STORAGE_NO,
S.LOCATION_NO = MYROW.LOCATION_NO,
S.LARY_NO = MYROW.LARY_NO
WHERE S.MAT_NO = MYROW.MAT_NO
AND S.STORAGE_NO IS NULL;
ELSE
UPDATE YDM_BC_BUTTRESS S
SET S.STORAGE_NO = MYROW.STORAGE_NO,
S.LOCATION_NO = MYROW.LOCATION_NO,
S.LARY_NO = MYROW.LARY_NO
WHERE S.MAT_NO = MYROW.MAT_NO
AND S.STORAGE_NO IS NULL;
END IF;
ELSE
UPDATE YDM_ZC_BUTTRESS S
SET S.STORAGE_NO = MYROW.STORAGE_NO,
S.LOCATION_NO = MYROW.LOCATION_NO,
S.LARY_NO = MYROW.LARY_NO
WHERE S.MAT_NO = MYROW.MAT_NO
AND S.STORAGE_NO IS NULL;
END IF;
DELETE FROM YDM_BC_OUTLIST T
WHERE T.MAT_NO = MYROW.MAT_NO
AND T.OUTSTOCK_DOC = MYROW.OUTSTOCK_DOC;
END LOOP;
DELETE FROM YDM_BC_OUTLISTDOC T WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#';
END;
SELECT T.MANAGEMENT_NO,T.MANAGEMENT_NAME FROM YDM_BS_STORAGE T WHERE T.STORAGE_NO = ?
SELECT NVL(SUM(T.ACT_COUNT), 0) ACT_COUNT
FROM YDM_BC_OUTLIST T
WHERE T.OUTSTOCK_DOC = ?
AND T.TAR_REC_FLAG = '0'
AND T.QCM_STAUS IN('00','11')
INSERT INTO YDM_BC_OUTLISTDOC (OUTSTOCK_DOC) VALUES (?)
DELETE FROM YDM_BC_OUTLISTDOC T WHERE T.OUTSTOCK_DOC = ?
SELECT NVL(COUNT(1),'0') ACOUNT
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.MAT_NO = '#MAT_NO#'
AND S.STORAGE_NO = '#STORAGE_NO#'
SELECT NVL(COUNT(1),'0') ACOUNT
FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.MAT_NO = '#MAT_NO#'
AND S.STORAGE_NO = '#STORAGE_NO#'
SELECT T.*, L.LOCATION_NAME
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
LEFT JOIN YDM_BS_LOCATION L
ON L.LOCATION_NO = S.LOCATION_NO
WHERE T.MAT_NO = S.MAT_NO
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.BATCH_NO = '#BATCH_NO#'
AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
AND NVL(T.PRODUCCODE,'/') = NVL('#PRODUCCODE#','/')
AND NVL(T.MODEL_CODE,'/') = NVL('#MODEL_CODE#','/')
AND T.QCM_STAUS = '#QCM_STAUS#'
AND NVL(T.PRO_PLAN_ID_NEXT,'/') = NVL('#PRO_PLAN_ID_NEXT#','/')
AND NVL(T.GX_PLAN_NO_NEXT,'/') = NVL('#GX_PLAN_NO_NEXT#','/')
AND T.PLINE_CODE = '#PLINE_CODE#'
AND T.MAT_STATUS = '#MAT_STATUS_CODE#'
AND T.BELONG_CODE = '#BELONG_CODE#'
AND S.STORAGE_NO = '#STORAGE_NO#'
AND NVL(T.SUBCONTRACT_NO,'/') = NVL('#SUBCONTRACT_NO#','/')
AND NVL(T.SUBCONTRACT_NO_SEQ,'/') = NVL('#SUBCONTRACT_NO_SEQ#','/')
AND NVL(T.OFFLINE_DOC,'/') = NVL('#OFFLINE_DOC#','/')
AND NVL(T.MEMO,'/') = NVL('#MEMO#','/')
AND NVL(T.MEMO1,'/') = NVL('#MEMO1#','/')
AND NVL(T.PIPMEMO,'/') = NVL('#PIPMEMO#','/')
ORDER BY TO_NUMBER(T.MEASURING_SEQ) ASC
SELECT T.*, L.LOCATION_NAME
FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
LEFT JOIN YDM_BS_LOCATION L
ON L.LOCATION_NO = S.LOCATION_NO
WHERE T.MAT_NO = S.MAT_NO
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.BATCH_NO = '#BATCH_NO#'
AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
AND NVL(T.PRODUCCODE,'/') = NVL('#PRODUCCODE#','/')
AND NVL(T.MODEL_CODE,'/') = NVL('#MODEL_CODE#','/')
AND T.BELONG_CODE = '#BELONG_CODE#'
AND T.PLINE_CODE = '#PLINE_CODE#'
AND T.MAT_STATUS = '#MAT_STATUS_CODE#'
AND S.STORAGE_NO = '#STORAGE_NO#'
AND NVL(T.SUBCONTRACT_NO,'/') = NVL('#SUBCONTRACT_NO#','/')
AND NVL(T.SUBCONTRACT_NO_SEQ,'/') = NVL('#SUBCONTRACT_NO_SEQ#','/')
AND NVL(T.MEMO,'/') = NVL('#MEMO#','/')
AND NVL(T.MEMO1,'/') = NVL('#MEMO1#','/')
AND NVL(T.PIPMEMO,'/') = NVL('#PIPMEMO#','/')
ORDER BY TO_NUMBER(T.MEASURING_SEQ) ASC
SELECT T1.SUPERVISOR_CODE, T1.SUPERVISOR_NAME
FROM YDM_BC_SUPERVISOR T1,
(SELECT T.PLINE_CODE FROM COM_BASE_PLINE T WHERE T.PROCESS_CODE NOT IN('A','B','C')
SELECT T.SUPERVISOR_NAME,T.SUPERVISOR_CALL FROM YDM_BC_SUPERVISOR T WHERE T.SUPERVISOR_CODE = ?
SELECT NVL(COUNT(1),0) ACOUNT,MAX(S.END_AREA_CODE)END_AREA_CODE,MAX(T.WAYBILL_NO)WAYBILL_NO
FROM TMS_WAYBILL_M T,TMS_PLN_C S,TMS_PLN_M P
WHERE T.PLN_NO = S.PLN_NO
AND T.PLN_NO = P.PLN_NO
AND S.PLN_NO = P.PLN_NO
AND S.HEAT_NO = ?
AND S.START_AREA_CODE = ?
AND T.CAR_LICENSE = ?
AND T.VALIDFLAG IN('20','35')
AND P.STATUS = '20'
SELECT T.*,S.START_NODE_CODE
FROM TMS_WAYBILL_M T,TMS_COM_LINE_M S
WHERE T.LINE_CODE = S.LINE_CODE
AND T.CAR_LICENSE = ?
AND T.VALIDFLAG IN('20','35')
SELECT T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.SPEC_NAME,
T.ACT_DIMATER,
T.ACT_HEIGHT,
T.FLAG_STOVE_NO_ZG,
T.SUPERVISOR_NAME,
T.SUPERVISOR_CALL,
T.OUTSTOCK_DOC,
T.PRODUCT_FLAG,
T.MAT_STATUS,
T.STORAGE_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.PRODUCCODE,
T.PRODUCNAME,
T.QCM_STAUS,
T.PRODUCT_FLAG,
T.MAT_STATUS,
(SELECT T1.PRODUC_HEAD FROM COM_BASE_PRODUCT T1 WHERE T1.PRODUCCODE = T.PRODUCCODE)PRODUCT_CODE,
(SELECT S.BASENAME FROM COM_BASE_PRODUCT T2,COM_BASE_INFO S WHERE T2.PRODUC_HEAD = S.BASECODE AND T2.PRODUCCODE = T.PRODUCCODE)PRODUCT_NAME,
MAX(T.SUPERVISOR_NAME)SUPERVISOR_NAME,
MAX(T.SUPERVISOR_CALL)SUPERVISOR_CALL,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT
FROM YDM_BC_OUTLIST T
WHERE T.OUTSTOCK_DOC = ?
GROUP BY T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.SPEC_NAME,
T.ACT_DIMATER,
T.ACT_HEIGHT,
T.FLAG_STOVE_NO_ZG,
T.SUPERVISOR_NAME,
T.SUPERVISOR_CALL,
T.OUTSTOCK_DOC,
T.PRODUCT_FLAG,
T.MAT_STATUS,
T.STORAGE_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.PRODUCCODE,
T.PRODUCNAME,
T.QCM_STAUS,
T.PRODUCT_FLAG,
T.MAT_STATUS
DECLARE
V_WAYBILL_SQE TMS_WAYBILL_C.WAYBILL_SQE%TYPE := NULL;
BEGIN
SELECT LPAD(NVL(MAX(SUBSTR(T.WAYBILL_SQE,0)), 0) + 1,3,0)
INTO V_WAYBILL_SQE
FROM TMS_WAYBILL_C T
WHERE T.WAYBILL_NO = '#WAYBILL_NO#';
INSERT INTO TMS_WAYBILL_C
(MATERIALS_DIMATER,
MATERIALS_HEIGHT,
MAT_STATUS,
SUPERVISOR_NAME,
SUPERVISOR_CALL,
PRODUCT_FLAG,
MAT_TYPE,
WAYBILL_NO,
WAYBILL_SQE,
PLN_NO,
PLN_SQE,
HEAT_NO,
BATCH_NO,
LOGO_NO,
GROUP_NO,
MATERIALS_CODE,
MATERIALS_DESC,
MATERIALS_SPEC,
WAYBILL_QTY_VAL,
WAYBILL_WT_VAL,
REF_PLN_NO,
START_NODE_CODE,
START_NODE_DESC,
START_AREA_CODE,
START_AREA_DESC,
END_NODE_CODE,
END_NODE_DESC,
END_AREA_CODE,
END_AREA_DESC,
PLINE_CODE,
PLINE_NAME,
PROCESS_CDOE,
PROCESS_DESC,
PRODUCCODE,
PRODUCNAME,
PRODUCT_CODE,
PRODUCT_NAME,
QCM_STAUS,
DEMAND_ORG_CODE,
DEMAND_ORG_DESC
)
VALUES
('#MATERIALS_DIMATER#',
'#MATERIALS_HEIGHT#',
'#MAT_STATUS#',
'#SUPERVISOR_NAME#',
'#SUPERVISOR_CALL#',
'#PRODUCT_FLAG#',
'#MAT_TYPE#',
'#WAYBILL_NO#',
V_WAYBILL_SQE,
'#PLN_NO#',
V_WAYBILL_SQE,
'#HEAT_NO#',
'#BATCH_NO#',
'#LOGO_NO#',
'#GROUP_NO#',
'#MATERIALS_CODE#',
'#MATERIALS_DESC#',
'#MATERIALS_SPEC#',
'#WAYBILL_QTY_VAL#',
'#WAYBILL_WT_VAL#',
'#REF_PLN_NO#',
'#START_NODE_CODE#',
'#START_NODE_DESC#',
'#START_AREA_CODE#',
'#START_AREA_DESC#',
'#END_NODE_CODE#',
'#END_NODE_DESC#',
'#END_AREA_CODE#',
'#END_AREA_DESC#',
'#PLINE_CODE#',
'#PLINE_NAME#',
'#PROCESS_CDOE#',
'#PROCESS_DESC#',
'#PRODUCCODE#',
'#PRODUCNAME#',
'#PRODUCT_CODE#',
'#PRODUCT_NAME#',
'#QCM_STAUS#',
'#DEMAND_ORG_CODE#',
'#DEMAND_ORG_DESC#');
END;
DECLARE
V_EXECUTE_NO TMS_EXECUTE_B.EXECUTE_NO%TYPE := NULL;
BEGIN
SELECT TO_CHAR(SYSDATE, 'YYYYMMDD') ||
LPAD(NVL(MAX(SUBSTR(T.EXECUTE_NO,9)), 0) + 1, 5, 0)
INTO V_EXECUTE_NO
FROM TMS_EXECUTE_B T
WHERE EXECUTE_NO LIKE TO_CHAR(SYSDATE, 'YYYYMMDD')|| '_____';
INSERT INTO TMS_EXECUTE_B
(EXECUTE_NO,
UNLOADING_CODE,
CAR_LICENSE,
PLN_NO,
WAYBILL_NO,
EXECUTE_TIME,
REFE_NO,
ACCOUNT_YEAR_MONTH,
CREATE_TIME)
VALUES
( V_EXECUTE_NO,
'#UNLOADING_CODE#',
'#CAR_LICENSE#',
'#PLN_NO#',
'#WAYBILL_NO#',
SYSDATE,
'#REFE_NO#',
'#ACCOUNT_YEAR_MONTH#',
SYSDATE);
END;
UPDATE TMS_WAYBILL_M T SET T.VALIDFLAG = '#VALIDFLAG#' WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
INSERT INTO TMS_WAYBILL_C
(WAYBILL_NO,
WAYBILL_SQE,
PLN_NO,
PLN_SQE,
HEAT_NO,
BATCH_NO,
LOGO_NO,
GROUP_NO,
MATERIALS_CODE,
MATERIALS_DESC,
MATERIALS_SPEC,
WAYBILL_QTY_VAL,
WAYBILL_WT_VAL,
UOM_CODE,
UOM_DESC,
PRO_ORDER_NO,
PRO_ORDER_SQE,
CURRENT_JOB_NO,
NEXT_JOB_NO,
MEMO,
REF_PLN_NO,
REF_PLN_SQE,
REFE_NO,
CAR_LICENSE,
AFFIRM_TIME,
MATERIALS_DIMATER,
MATERIALS_HEIGHT,
IS_SORT,
SUPERVISOR_NAME,
SUPERVISOR_CALL,
PRODUCT_FLAG,
MAT_STATUS,
MAT_TYPE,
START_NODE_CODE,
START_NODE_DESC,
END_NODE_CODE,
END_NODE_DESC,
START_AREA_CODE,
START_AREA_DESC,
END_AREA_DESC,
END_AREA_CODE,
PLINE_CODE,
PLINE_NAME,
PROCESS_CDOE,
PROCESS_DESC,
PRODUCCODE,
PRODUCNAME,
PRODUCT_CODE,
PRODUCT_NAME,
QCM_STAUS,
DEMAND_ORG_CODE,
DEMAND_ORG_DESC)
SELECT '#CRANE_WAYBILL_NO#',
(SELECT NVL(MAX(TO_NUMBER(WAYBILL_SQE)), 0)
FROM TMS_WAYBILL_C
WHERE WAYBILL_NO = '#CRANE_WAYBILL_NO#' ) + ROWNUM,
(SELECT PLN_NO FROM TMS_WAYBILL_M WHERE WAYBILL_NO = '#CRANE_WAYBILL_NO#'),
'1',
HEAT_NO,
BATCH_NO,
LOGO_NO,
GROUP_NO,
MATERIALS_CODE,
MATERIALS_DESC,
MATERIALS_SPEC,
WAYBILL_QTY_VAL,
WAYBILL_WT_VAL,
UOM_CODE,
UOM_DESC,
PRO_ORDER_NO,
PRO_ORDER_SQE,
CURRENT_JOB_NO,
NEXT_JOB_NO,
MEMO,
PLN_NO,
PLN_SQE,
'#WAYBILL_NO#',
(SELECT CAR_LICENSE FROM TMS_WAYBILL_M WHERE WAYBILL_NO = '#WAYBILL_NO#'),
SYSDATE,
MATERIALS_DIMATER,
MATERIALS_HEIGHT,
IS_SORT,
SUPERVISOR_NAME,
SUPERVISOR_CALL,
PRODUCT_FLAG,
MAT_STATUS,
MAT_TYPE,
START_NODE_CODE,
START_NODE_DESC,
START_NODE_CODE,
START_NODE_DESC,
START_AREA_CODE,
START_AREA_DESC,
START_AREA_DESC,
START_AREA_CODE,
PLINE_CODE,
PLINE_NAME,
PROCESS_CDOE,
PROCESS_DESC,
PRODUCCODE,
PRODUCNAME,
PRODUCT_CODE,
PRODUCT_NAME,
QCM_STAUS,
DEMAND_ORG_CODE,
DEMAND_ORG_DESC
FROM TMS_WAYBILL_C T
WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
AND T. START_NODE_CODE= '#NODE_CODE#'
INSERT INTO TMS_TRACE_M
(WAYBILL_NO,
TRACE_NO,
NODE_CODE,
NODE_DESC,
NODE_TYPE_CODE,
NODE_TYPE_DESC,
REFE_NO,
EVENT_CODE,
EVENT_DESC,
EVENT_TIME
)
VALUES
('#WAYBILL_NO#',
(SELECT TO_NUMBER(MAX(T.TRACE_NO), 0) + 1
FROM TMS_TRACE_M T
WHERE T.WAYBILL_NO = '#WAYBILL_NO#'),
'#NODE_CODE#',
'#NODE_DESC#',
'#NODE_TYPE_CODE#',
'#NODE_TYPE_DESC#',
'#REFE_NO#',
'#EVENT_CODE#',
'#EVENT_DESC#',
SYSDATE
)
SELECT T.VALIDFLAG,T.WAYBILL_NO,T.PLN_NO
FROM TMS_WAYBILL_M T, TMS_WAYBILL_C S
WHERE T.WAYBILL_NO = S.WAYBILL_NO
AND S.REF_PLN_NO = ?
AND ROWNUM = 1
DECLARE
V_FLAG TMS_TRACE_M.EVENT_CODE%TYPE := NULL;
BEGIN
DELETE FROM TMS_WAYBILL_C T
WHERE (T.WAYBILL_NO = '#WAYBILL_NO#' AND T.LOGO_NO = '#LOGO_NO#' AND
T.REF_PLN_NO = '#REFE_NO#')
OR (T.REFE_NO = '#WAYBILL_NO#' AND T.START_NODE_CODE = '#NODE_CODE#');
DELETE FROM TMS_EXECUTE_B T
WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
AND T.REFE_NO = '#REFE_NO#'
AND T.REFE_NO = '#REFE_NO#';
DELETE FROM TMS_TRACE_M T
WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
AND T.REFE_NO = '#REFE_NO#'
AND T.EVENT_CODE IN ('RC04', 'RC14');
SELECT T.EVENT_CODE INTO V_FLAG
FROM TMS_TRACE_M T
WHERE T.WAYBILL_NO = '#WAYBILL_NO#'
AND T.TRACE_NO = (SELECT MAX(T1.TRACE_NO)
FROM TMS_TRACE_M T1
WHERE T1.WAYBILL_NO = '#WAYBILL_NO#');
IF(V_FLAG = 'RC18')THEN
UPDATE
TMS_WAYBILL_M T SET T.VALIDFLAG = '35'
WHERE T.WAYBILL_NO = '#WAYBILL_NO#';
ELSE
UPDATE
TMS_WAYBILL_M T SET T.VALIDFLAG = '20'
WHERE T.WAYBILL_NO = '#WAYBILL_NO#';
END IF;
END;
SELECT T.IS_CAR_TAKING,T.IS_CAR_TAKING_BILL FROM YDM_BS_STORAGE T WHERE T.STORAGE_NO = ?
SELECT T.START_NODE_CODE,
T.START_NODE_DESC,
T.START_AREA_CODE,
T.START_AREA_DESC,
T.END_NODE_CODE,
T.END_NODE_DESC,
T.END_AREA_CODE,
T.END_AREA_DESC,
S.DEMAND_ORG_CODE,
S.DEMAND_ORG_DESC
FROM TMS_PLN_C T,TMS_DEMAND_M S
WHERE T.DEMAND_NO = S.DEMAND_NO
AND T.PLN_NO = ?
AND T.HEAT_NO = ?
AND T.START_AREA_CODE = ?
SELECT COUNT(1) ACOUNT
FROM (SELECT T.START_NODE_CODE,
T.START_NODE_DESC,
T.START_AREA_CODE,
T.START_AREA_DESC,
T.END_NODE_CODE,
T.END_NODE_DESC,
T.END_AREA_CODE,
T.END_NODE_DESC
FROM TMS_PLN_C T
WHERE T.PLN_NO = ?
AND T.START_AREA_CODE = ?
GROUP BY T.START_NODE_CODE,
T.START_NODE_DESC,
T.START_AREA_CODE,
T.START_AREA_DESC,
T.END_NODE_CODE,
T.END_NODE_DESC,
T.END_AREA_CODE,
T.END_NODE_DESC)
SELECT COUNT(1) ACOUNT
FROM (SELECT T.START_NODE_CODE,
T.START_NODE_DESC,
T.START_AREA_CODE,
T.START_AREA_DESC,
T.END_NODE_CODE,
T.END_NODE_DESC,
T.END_AREA_CODE,
T.END_AREA_DESC
FROM TMS_WAYBILL_C T
WHERE T.WAYBILL_NO = ?
AND T.START_AREA_CODE = ?
GROUP BY T.START_NODE_CODE,
T.START_NODE_DESC,
T.START_AREA_CODE,
T.START_AREA_DESC,
T.END_NODE_CODE,
T.END_NODE_DESC,
T.END_AREA_CODE,
T.END_AREA_DESC)
SELECT T.* FROM TMS_WAYBILL_RELATION T WHERE T.WAYBILL_NO = '#WAYBILL_NO#' AND T.NODE_CODE = '#NODE_CODE#'
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
MAX(T.PROCESS_CDOE) PROCESS_CDOE,
MAX(T.PROCESS_DESC) PROCESS_DESC,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
T.PIPMEMO,
T.MEMO1,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
MAX(T.TARGET) TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
FROM PLN_ORDER_DBK_S T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
FROM PLN_ORDER_RCL_S T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
FROM PLN_ORDER_JGX_S T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
ELSE
NULL
END) ORDER_NO_NEXT,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT (SELECT T5.STORAGE_NAME
FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
AND T4.PLINE_CODE = T1.PLINE_CODE)
FROM PLN_ZY_DBK_M T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT (SELECT T7.STORAGE_NAME
FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
AND T6.PLINE_CODE = T2.PLINE_CODE)
FROM PLN_ZY_RCL_M T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT (SELECT T9.STORAGE_NAME
FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
AND T8.PLINE_CODE = T3.PLINE_CODE)
FROM PLN_ZY_JGX_M T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
ELSE
NULL
END) DIRECTION,
'0' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
'否' LOCK_BILL_FLAG,
T.OFFLINE_DOC,
T.MEMO
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.PRODUCT_FLAG = '801401' #JUDGE_STOVE_NO# #STORAGE_NO#
#JUDGE_STOVE_NO1#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.MAT_GOWHERE_CODE,
T.MAT_GOWHERE_NAME,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
T.JUDGE_RESULT,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.OFFLINE_DOC,
T.MEMO,
T.PIPMEMO,
T.MEMO1,
T.MATERIAL_NO,
T.MATERIAL_NAME
UNION ALL
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.PRO_ORDER_NO) PRO_ORDER_NO,
MAX(T.PROCESS_CDOE) PROCESS_CDOE,
MAX(T.PROCESS_DESC) PROCESS_DESC,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
T.PIPMEMO,
T.MEMO1,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
DECODE(T.QCM_STAUS, '00', '合格', '11', '待处理', '22', '废品') QCM_STAUS,
MAX(T.TARGET) TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT T1.ORDER_NO || '/' || T1.ORDER_SEQ
FROM PLN_ORDER_DBK_S T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT T2.ORDER_NO || '/' || T2.ORDER_SEQ
FROM PLN_ORDER_RCL_S T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT T3.ORDER_NO || '/' || T3.ORDER_SEQ
FROM PLN_ORDER_JGX_S T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT)
ELSE
NULL
END) ORDER_NO_NEXT,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
(CASE
WHEN T.NEXT_PROCESS_CDOE = 'E' THEN
(SELECT (SELECT T5.STORAGE_NAME
FROM COM_BASE_PLINE T4, YDM_BS_STORAGE T5
WHERE T4.IN_REPOSITORY = T5.STORAGE_NO
AND T4.PLINE_CODE = T1.PLINE_CODE)
FROM PLN_ZY_DBK_M T1
WHERE T1.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T1.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'F' THEN
(SELECT (SELECT T7.STORAGE_NAME
FROM COM_BASE_PLINE T6, YDM_BS_STORAGE T7
WHERE T6.IN_REPOSITORY = T7.STORAGE_NO
AND T6.PLINE_CODE = T2.PLINE_CODE)
FROM PLN_ZY_RCL_M T2
WHERE T2.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T2.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
WHEN T.NEXT_PROCESS_CDOE = 'G' THEN
(SELECT (SELECT T9.STORAGE_NAME
FROM COM_BASE_PLINE T8, YDM_BS_STORAGE T9
WHERE T8.IN_REPOSITORY = T9.STORAGE_NO
AND T8.PLINE_CODE = T3.PLINE_CODE)
FROM PLN_ZY_JGX_M T3
WHERE T3.PRO_PLAN_ID = T.PRO_PLAN_ID_NEXT
AND T3.GX_PLAN_NO = T.GX_PLAN_NO_NEXT
AND ROWNUM = 1)
ELSE
NULL
END) DIRECTION,
'0' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
'否' LOCK_BILL_FLAG,
T.OFFLINE_DOC,
T.MEMO
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.PRODUCT_FLAG = '801402' #JUDGE_STOVE_NO# #STORAGE_NO#
#JUDGE_STOVE_NO1#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.MAT_GOWHERE_CODE,
T.MAT_GOWHERE_NAME,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.PRO_PLAN_ID_NEXT,
T.GX_PLAN_NO_NEXT,
T.JUDGE_RESULT,
T.NEXT_PROCESS_CDOE,
T.NEXT_PROCESS_DESC,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.OFFLINE_DOC,
T.MEMO,
T.PIPMEMO,
T.MEMO1,
T.MATERIAL_NO,
T.MATERIAL_NAME
UNION ALL
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
'' PROCESS_CDOE,
'' PROCESS_DESC,
'' NEXT_PROCESS_CDOE,
'' NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
T.PIPMEMO,
T.MEMO1,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
'合格' QCM_STAUS,
'' TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
'' ORDER_NO_NEXT,
'' PRO_PLAN_ID_NEXT,
'' GX_PLAN_NO_NEXT,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
'' PRO_PLAN_ID_NEXT,
'' GX_PLAN_NO_NEXT,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
'' DIRECTION,
'1' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
'' OFFLINE_DOC,
T.MEMO
FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.BELONG_CODE IN ('100101', '100102', '100103')
AND T.PRODUCT_FLAG = '801402' #JUDGE_STOVE_NO# #STORAGE_NO#
#JUDGE_STOVE_NO1#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.JUDGE_RESULT,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.LOCK_BILL_FLAG,
T.MEMO,
T.PIPMEMO,
T.MEMO1,
T.MATERIAL_NO,
T.MATERIAL_NAME
UNION ALL
SELECT (SELECT T2.BASENAME
FROM COM_BASE_INFO T2
WHERE T2.BASECODE = T.PRODUCT_FLAG) PRODUCT_FLAG,
(SELECT T1.BASENAME
FROM COM_BASE_INFO T1
WHERE T1.BASECODE = T.MAT_STATUS) MAT_STATUS,
T.MAT_STATUS AS MAT_STATUS_CODE,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
MAX(T.PRODUCCODE) PRODUCCODE,
MAX(T.PRODUCNAME) PRODUCNAME,
MAX(T.STEELCODE) STEELCODE,
MAX(T.STEELNAME) STEELNAME,
MAX(T.GRADECODE) GRADECODE,
MAX(T.GRADENAME) GRADENAME,
MAX(T.SPEC_CODE) SPEC_CODE,
MAX(T.SPEC_NAME) SPEC_NAME,
MAX(T.MODEL_CODE) MODEL_CODE,
MAX(T.MODEL_DESC) MODEL_DESC,
MAX(T.STD_STYLE) STD_STYLE,
MAX(T.STD_STYLE_DESC) STD_STYLE_DESC,
MAX(T.ORDER_NO || '/' || T.ORDER_SEQ) PRO_ORDER_NO,
'' PROCESS_CDOE,
'' PROCESS_DESC,
'' NEXT_PROCESS_CDOE,
'' NEXT_PROCESS_DESC,
T.PLINE_CODE,
T.PLINE_NAME,
MAX(T.ACT_DIMATER) ACT_DIMATER,
MAX(T.ACT_HEIGHT) ACT_HEIGHT,
SUM(T.ACT_LEN) ACT_LEN,
MAX(T.ACT_LEN_MIN) ACT_LEN_MIN,
MAX(T.ACT_LEN_MAX) ACT_LEN_MAX,
SUM(T.ACT_COUNT) ACT_COUNT,
SUM(T.ACT_WEIGHT) ACT_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.JUDGE_RESULT,
T.PIPMEMO,
T.MEMO1,
MAX(TO_CHAR(T.JUDGE_RESULT_TIME, 'YYYY-MM-DD HH24:MI:SS')) JUDGE_RESULT_TIME,
MAX(T.JUDGE_MAKER) JUDGE_MAKER,
MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
'合格' QCM_STAUS,
'' TARGET,
T.FLAG_STOVE_NO_ZG,
T.FLAG_STOVE_NO_ZG AS UPDATE_FLAG_STOVE,
'' ORDER_NO_NEXT,
'' PRO_PLAN_ID_NEXT,
'' GX_PLAN_NO_NEXT,
S.STORAGE_NO,
S.LOCATION_NO,
(SELECT S2.LOCATION_NAME
FROM YDM_BS_LOCATION S2
WHERE S2.LOCATION_NO = S.LOCATION_NO) LOCATION_NAME,
S.LARY_NO,
S.LOC_NO,
'' PRO_PLAN_ID_NEXT,
'' GX_PLAN_NO_NEXT,
(SELECT S1.STORAGE_NAME
FROM YDM_BS_STORAGE S1
WHERE S1.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
'' DIRECTION,
'1' BAR_CODE,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
DECODE(T.LOCK_BILL_FLAG, '0', '否', '1', '是') LOCK_BILL_FLAG,
'' OFFLINE_DOC,
T.MEMO
FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.BELONG_CODE IN ('100101', '100102', '100103')
AND T.PRODUCT_FLAG = '801403' #JUDGE_STOVE_NO# #STORAGE_NO#
#JUDGE_STOVE_NO1#
GROUP BY T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.MAT_STATUS,
T.QCM_STAUS,
T.BELONG_CODE,
T.BELONG_NAME,
T.FLAG_STOVE_NO_ZG,
S.STORAGE_NO,
S.LOCATION_NO,
S.LARY_NO,
S.LOC_NO,
T.JUDGE_RESULT,
T.PRODUCT_FLAG,
T.SUBCONTRACT_NO,
T.SUBCONTRACT_NO_SEQ,
T.LOCK_BILL_FLAG,
T.MEMO,
T.PIPMEMO,
T.MEMO1,
T.MATERIAL_NO,
T.MATERIAL_NAME
SELECT S.*
FROM TMS_PLN_M T, TMS_PLN_C S
WHERE T.PLN_NO = S.PLN_NO
AND T.CAR_LICENSE LIKE '%'||?||'%'
AND T.VALIDFLAG = '30'
SELECT COUNT(1)ACOUNT
FROM TMS_WAYBILL_C S
WHERE S.START_AREA_CODE = '#START_AREA_CODE#'
AND S.WAYBILL_NO = '#WAYBILL_NO#'
SELECT T.*,S. WAYBILL_NO FROM TMS_PLN_C T,TMS_WAYBILL_M S WHERE T.PLN_NO = S.PLN_NO
AND S.WAYBILL_NO = '#WAYBILL_NO#'
SELECT T.EVENT_CODE FROM TMS_TRACE_M T WHERE T.WAYBILL_NO = '#WAYBILL_NO#' ORDER BY T.TRACE_NO DESC
SELECT T.NODE_CODE FROM TMS_TRACE_M T WHERE T.WAYBILL_NO = '#WAYBILL_NO#' ORDER BY T.TRACE_NO DESC
SELECT S.UNLOADING_AREA_CODE
FROM TMS_TRACE_M T, TMS_COM_UNLOADING S
WHERE T.NODE_CODE = S.UNLOADING_CODE
AND T.WAYBILL_NO = ?
ORDER BY T.TRACE_NO DESC
SELECT T.PROCESS_CODE,T.PROCESS_DESC FROM COM_BASE_PLINE T WHERE T.PLINE_CODE = ?
SELECT T.IS_CRANE_LOADING,T.IS_CRANE_UNLOADING FROM YDM_BS_STORAGE T WHERE T.STORAGE_NO = '#STORAGE_NO#'
SELECT COUNT(1)ACOUNT FROM TMS_WAYBILL_RELATION T WHERE T.WAYBILL_NO = ? AND T.AREA_CODE = ?
SELECT T.SEAM_AREA FROM YDM_BS_STORAGE T WHERE T.STORAGE_NO = ?
SELECT DISTINCT T.CAR_NO,T.CAR_NO AS CAR_NO1
FROM CMM_WEIGHT_RECORD T
WHERE T.VALIDFLAG = '1'
AND T.WT_TYPE = '0'
ORDER BY T.CAR_NO ASC
·
SELECT JL_SUPP FROM COM_BASE_PLINE WHERE PLINE_CODE = ?
SELECT JL_FALG FROM COM_BASE_PRODUCT WHERE PRODUCCODE = ?
SELECT T.PRT_FLAG FROM MIL_PLAN T WHERE T.ID = '#HEAT_PLAN_NO#'
SELECT TO_CHAR(SYSDATE, 'YYYYMMDD') ||
LPAD(NVL(MAX(SUBSTR(PREDICTION_NO, 9)), 0) + 1, 4, 0) PREDICTION_NO
FROM PRE_TRACK_SCALE T
WHERE T.PREDICTION_NO LIKE TO_CHAR(SYSDATE, 'YYYYMMDD')|| '____'
INSERT INTO PRE_TRACK_SCALE(
PREDICTION_NO,
NOTICE_NO,
CAR_NO,
MATTER_NO,
MATTER_NAME,
CONTRACT_NO,
FORWARDING_UNIT_NO,
FORWARDING_UNIT_NAME,
RECEIVING_UINT_NO,
RECEIVING_UINT_NAME,
MATERIAL_NO,
MATERIAL_NAME,
SPEC_NO,
SPEC_NAME,
PREDICTION_TYPE,
METER_TYPE_NO,
METER_TYPE_NAME,
USED_TYPE,
EFFECTIVE_NUM,
VALUE_FLAG,
CREATE_MAN_NO,
CREATE_MAN_NAME,
CREATE_TIME,
HEAT_NO,
CAR_ALLOCATION_TIME,
EFFECTIVE_START_TIME,
EFFECTIVE_END_TIME,
MEMO,
CUSTOMER_SUPPLIER_NO,
CUSTOMER_SUPPLIER_NAME)
VALUES(
'#PREDICTION_NO#',
'#NOTICE_NO#',
'#CAR_NO#',
'#MATTER_NO#',
'#MATTER_NAME#',
'#CONTRACT_NO#',
'#FORWARDING_UNIT_NO#',
'#FORWARDING_UNIT_NAME#',
'#RECEIVING_UINT_NO#',
'#RECEIVING_UINT_NAME#',
'#MATERIAL_NO#',
'#MATERIAL_NAME#',
'#SPEC_NO#',
'#SPEC_NAME#',
'#PREDICTION_TYPE#',
'#METER_TYPE_NO#',
'#METER_TYPE_NAME#',
'#USED_TYPE#',
'#EFFECTIVE_NUM#',
'#VALUE_FLAG#',
'#CREATE_MAN_NO#',
'#CREATE_MAN_NAME#',
TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
'#HEAT_NO#',
TO_DATE('#CAR_ALLOCATION_TIME#','YYYY-MM-DD HH24:MI:SS'),
TO_DATE('#EFFECTIVE_START_TIME#','YYYY-MM-DD HH24:MI:SS'),
TO_DATE('#EFFECTIVE_END_TIME#','YYYY-MM-DD HH24:MI:SS'),
'产销下发',
'#CUSTOMER_SUPPLIER_NO#',
(SELECT CUSTOMER_SUPPLIER_NAME FROM METER_BASE_CUSTOMER_SUPPLIER WHERE CUSTOMER_SUPPLIER_NO = '#CUSTOMER_SUPPLIER_NO#' AND ROWNUM = 1))
0)
into V_PRE_PROCESS_NO
FROM DUAL;
INSERT INTO METER_WORK_PRE_PROCESS
SELECT V_PRE_PROCESS_NO,
T2.PREDICTION_NO PREDICTION_NO,
T1.PROCESS_NO PROCESS_NO,
T2.CAR_NO CAR_NO,
T1.METER_TYPE_NO METER_TYPE_NO,
T1.METER_TYPE_NAME METER_TYPE_NAME,
T2.MATTER_NO MATTER_NO,
T2.MATTER_NAME MATTER_NAME,
'1',
T2.CREATE_MAN_NO,
T2.CREATE_MAN_NAME,
SYSDATE
FROM METER_WORK_METER_PROCESS T1, PRE_TRACK_SCALE T2
WHERE T1.METER_TYPE_NO = '#METER_TYPE_NO#'
AND T1.METER_TYPE_NAME = '#METER_TYPE_NAME#'
AND T2.PREDICTION_NO = '#PREDICTION_NO#'
AND T1.VALUE_FLAG = '0';
INSERT INTO METER_WORK_PRE_LINK
(PRE_LINK_NO,
PREDICTION_NO,
PROCESS_NO,
PRE_PROCESS_NO,
LINK_CODE,
LINK_NAME,
SEQ_NO,
LINK_NO,
VALUE_FLAG,
CREATE_MAN_NO,
CREATE_MAN_NAME,
CREATE_TIME)
SELECT TO_CHAR(SYSDATE, 'YYYYMMDD') ||
(SELECT LPAD(NVL(MAX(TO_NUMBER(SUBSTR(PRE_LINK_NO,
LENGTH(PRE_LINK_NO) - 3))),
0),
4,
'0') PRE_LINK_NO
FROM METER_WORK_PRE_LINK
where instr(PRE_LINK_NO, TO_CHAR(SYSDATE, 'YYYYMMDD')) > 0) +
ROWNUM,
T1.PREDICTION_NO PREDICTION_NO,
T.PROCESS_NO PROCESS_NO,
T1.PRE_PROCESS_NO PRE_PROCESS_NO,
T.LINK_CODE LINK_CODE,
T.LINK_NAME LINK_NAME,
T.LINK_ORDER_NUM SEQ_NO,
T.LINK_NO LINK_NO,
DECODE(T.LINK_CODE, '001021001', '1', '0'),
T1.CREATE_MAN_NO,
T1.CREATE_MAN_NAME,
SYSDATE
FROM METER_WORK_METER_LINK T, METER_WORK_PRE_PROCESS T1
WHERE T.PROCESS_NO = '#PROCESS_NO#'
AND T1.PRE_PROCESS_NO = V_PRE_PROCESS_NO;
END;
]]>
SELECT COUNT(1) ACOUNT
FROM YDM_BS_STORAGE T
WHERE T.STORAGE_NO = ?
AND T.SEAM_AREA = '0'
AND T.STORAGE_ATTR IN ('800302', '800303', '800304')
SELECT T.MATTER_NO, T.MATTER_NAME
FROM METER_BASE_MATTER_INFO T
WHERE T.INDEX_CODE = '#PRODUCCODE#'
SELECT T.VALUE_FLAG FROM PRE_TRACK_SCALE T WHERE T.NOTICE_NO = '#OUTSTOCK_DOC#'
DELETE FROM PRE_TRACK_SCALE T WHERE T.NOTICE_NO = '#OUTSTOCK_DOC#'
UPDATE PRE_TRACK_SCALE T SET T.VALUE_FLAG = '3',T.MEMO = '撤销倒库，作废预报' WHERE T.NOTICE_NO = '#OUTSTOCK_DOC#'
SELECT T.LOAD_POINT_NO
FROM METER_BASE_LOAD_POINT T
WHERE T.INDEX_CODE = ?
SELECT
T.BALANCE_NO,
T.PROCESS_DESC,
T.PROCESS_CDOE,
T.STORAGE_ATTR_NAME,
T.STORAGE_TYPE_NO,
T.STORAGE_TYPE_NAME,
T.MANAGEMENT_NO,
T.MANAGEMENT_NAME,
T.TAR_STORAGE_NO,
(SELECT T2.STORAGE_NAME FROM YDM_BS_STORAGE T2 WHERE T2.STORAGE_NO = T.TAR_STORAGE_NO)TAR_STORAGE_NAME,
T.TAR_LOCATION_NO,
T.TAR_LARY_NO,
T.TAR_LOC_NO,
T.TAR_STORAGE_ATTR,
T.TAR_STORAGE_ATTR_NAME,
T.TAR_STORAGE_TYPE_NO,
T.TAR_STORAGE_TYPE_NAME,
T.TAR_MANAGEMENT_NO,
T.TAR_MANAGEMENT_NAME,
T.TAR_REC_FLAG,
TO_CHAR(T.RPO_TIME, 'YYYY-MM-DD HH24:MI:SS') RPO_TIME,
T.PRO_BC,
T.PRO_BZ,
TO_CHAR(T.INSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS') INSTOCK_TIME,
T.IN_BC,
T.IN_BZ,
TO_CHAR(T.OUTSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS') OUTSTOCK_TIME,
T.OUT_BC,
T.OUT_BZ,
T.MEMO,
T.HAND_FLAG,
T.VALIDFLAG,
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.DELETE_NAME,
TO_CHAR(T.DELETE_TIME, 'YYYY-MM-DD HH24:MI:SS') DELETE_TIME,
T.ORD_PK,
T.ORD_LN_PK,
T.ORD_LN_DLY_PK,
T.DEPARTMENT_CODE,
T.DEPARTMENT_DESC,
T.TAR_DEPARTMENT_CODE,
T.TAR_DEPARTMENT_DESC,
T.ORDER_NO,
T.ORDER_SEQ,
T.DELIVERY_NO,
T.PRODUCT_FLAG,
T.MAT_STATUS,
T.JUDGE_STD_NAME,
T.JUDGE_STD_CODE,
T.PONDER_NO,
T.PONDER_GROSS_WT,
T.VSTEL,
T.VSTEL_DESC,
T.BAL_YEAR_MONTH,
T.M_BILL_NO,
T.SEND_NUM,
T.RECEIV_NO,
T.RECEIV_NM,
T.FINISHPRO_MOLD,
T.IN_MOLD,
T.LOAD_PLINE_CODE,
T.LOAD_PLINE_NAME,
T.GX_PLAN_NO,
T.PIPMEMO,
T.BELONG_CODE_RESPONSE,
T.BELONG_NAME_RESPONSE,
T.DATA_SUORCE,
T.QCM_STAUS,
T.LEAVE_FACTORY_NAME,
TO_CHAR(T.LEAVE_FACTORY_TIME, 'YYYY-MM-DD HH24:MI:SS') LEAVE_FACTORY_TIME,
T.LEAVE_FACTORY_FLAG,
T.SCRAP_REASON,
T.DRIVER,
T.LEAVE_MANAGEMENT_NO,
T.LEAVE_MANAGEMENT_NAME,
T.CUT_FLAG,
T.OUT_TYPE,
T.FLAG_STOVE_NO_ZG,
T.SUPERVISOR_NAME,
T.SUPERVISOR_CALL,
T.PRO_ORDER_ID,
T.OUTSTOCK_SQE,
T.OUTSTOCK_PLAN_NO,
T.OUTSTOCK_DOC,
T.OUTSTOCK_TYPE_CODE,
T.OUTSTOCK_TYPE_NAME,
T.ICCAR_NO,
T.VEHICLE_NO,
T.MAT_NO,
T.LOT_NO,
T.STOVE_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
T.MATERIAL_NO,
T.MATERIAL_NAME,
T.PRODUCCODE,
T.PRODUCNAME,
T.STD_CODE,
T.STD_NAME,
T.GRADECODE,
T.GRADENAME,
T.STEELCODE,
T.STEELNAME,
T.STD_STYLE,
T.STD_STYLE_DESC,
T.SPEC_CODE,
T.SPEC_NAME,
T.MODEL_CODE,
T.MODEL_DESC,
T.PRO_ORDER_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.ACT_DIMATER,
T.ACT_HEIGHT,
T.ACT_LEN,
T.ACT_LEN_MIN,
T.ACT_LEN_MAX,
T.ACT_COUNT,
T.ACT_WEIGHT,
T.ACT_THEORY_WEIGHT,
T.BELONG_CODE,
T.BELONG_NAME,
T.BAR_CODE,
T.STORAGE_NO,
(SELECT T1.STORAGE_NAME FROM YDM_BS_STORAGE T1 WHERE T1.STORAGE_NO = T.STORAGE_NO)STORAGE_NAME,
T.LOCATION_NO,
T.LARY_NO,
T.LOC_NO,
T.STORAGE_ATTR
FROM YDM_BC_OUTLIST T
WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#'
AND ROWNUM = 1
SELECT COUNT(1) ACOUNT
FROM PRE_TRACK_SCALE T
WHERE T.NOTICE_NO = '#OUTSTOCK_DOC#'
AND T.CAR_NO = '#VEHICLE_NO#'
UPDATE YDM_BC_OUTLIST T
SET T.OUTSTOCK_PLAN_NO = ''
WHERE T.OUTSTOCK_PLAN_NO = '1'
AND (T.TAR_STORAGE_NO = 'LSN1' OR T.TAR_STORAGE_NO = 'LSN2')
AND T.OUTSTOCK_TYPE_CODE = '800803'
AND T.VEHICLE_NO = ?
AND T.VALIDFLAG = '1'
SELECT COUNT(1) ACOUNT
FROM (SELECT DISTINCT T.OUTSTOCK_DOC
FROM YDM_BC_OUTLIST T
WHERE T.OUTSTOCK_PLAN_NO = '1'
AND (T.TAR_STORAGE_NO = 'LSN1' OR T.TAR_STORAGE_NO = 'LSN2')
AND T.OUTSTOCK_TYPE_CODE = '800803'
AND T.VEHICLE_NO = ?
AND T.VALIDFLAG = '1')
select actual_no,
prediction_no,
notice_no,
car_no,
trailer_no,
matter_no,
matter_name,
contract_no,
batch_no,
customer_supplier_no,
customer_supplier_name,
forwarding_unit_no,
forwarding_unit_name,
receiving_uint_no,
receiving_uint_name,
material_no,
material_name,
spec_no,
spec_name,
load_point_no,
load_point_name,
sample_no,
sample_voucher,
carrier_unit_no,
carrier_unit_name,
meter_type_no,
meter_type_name,
meter_process_no,
meter_process_edition_no,
actual_first1_no,
gross_weight,
gross_man_no,
gross_man_name,
gross_time,
base_spot1_no,
base_spot1_name,
gross_class,
gross_group,
gross_mode,
actual_first2_no,
tare_weight,
tare_man_no,
tare_man_name,
tare_time,
base_spot2_no,
base_spot2_name,
tare_class,
tare_group,
tare_mode,
TO_CHAR(NVL(T.NET_WEIGHT / 1000, 0), 'FM999999990.000') net_weight,
meter_num,
net_man_no,
net_man_name,
net_time,
net_spot3_no,
net_spot3_name,
net_group,
net_mode,
value_flag,
upload_flag,
check_man_no,
check_man_name,
check_time,
upload_man_no,
upload_man_name,
upload_time,
add_weight,
net_class,
tb_flage,
railway_no,
update_man_no,
update_man_name,
update_time,
memo,
heat_no,
shipment_gross_weight,
shipment_net_weight,
shipment_num,
bind_card_no,
prediction_type,
prediction_combination,
inter_read,
index_matter_name,
judge_type_no,
judge_type_name,
valid_man,
impurity_wgt,
len_wgt,
fe_wgt,
light_wgt,
cut_wgt,
meme2,
minus_time,
minus_man_no,
minus_man_name,
add_wgt_no,
add_wgt_pk,
gross_car_weight,
tare_car_weight,
gross_car_no,
tare_car_no,
unload_unit_no,
unload_unit_name,
unload_addr_no,
unload_addr_name,
print_count,
print_man_no,
print_man_name,
print_time,
settlement_no
from meter_work_car_actual T
WHERE T.NOTICE_NO = ?
AND T.METER_TYPE_NO IN( '001006003','001006009','001006010','001006011','001006012') --中控倒运（新）