0
AND DECODE(GP.DIMATER,'251','250',GP.DIMATER) = DECODE(TO_CHAR(TO_NUMBER(S.DIAMETER_GP)),'251','250',TO_CHAR(TO_NUMBER(S.DIAMETER_GP)))
AND S.IS_REPAIR_PLN = '/'),
'0',
'无库存',
'有库存') GPCOUNT FROM (
SELECT
(SELECT LISTAGG(C1.GRADENAME, ',') WITHIN GROUP(ORDER BY C1.PRIORITY ASC, C1.GRADECODE)
FROM (SELECT DISTINCT B.GRADENAME,
B.GRADECODE,
B.PRIORITY,
C.CRAFT_SEQ,
S.ORD_LN_DLY_PK,
S.SUPPLY_UNIT_CODE,
S.SUPPLY_UNIT
FROM CRAFT_ORD_DESIGN_MSC_PL_GZ B,
CRAFT_ORD_DESIGN_MSC_PL B1,
pln_saleord s,
CRAFT_ORD_DESIGN c
WHERE B.DESGIN_KEY = B1.DESGIN_KEY
AND B.MSC_PLINE = B1.MSC_PLINE
AND C.ORD_LN_PK = S.ORD_LN_PK
AND B.DESGIN_KEY = C.DESGIN_KEY
ORDER BY B.PRIORITY ASC, B.GRADECODE ASC) C1
WHERE C1.ORD_LN_DLY_PK = T.ORD_LN_DLY_PK
AND C1.CRAFT_SEQ =T.CRAFT_SEQ) GRADE_ALL,
D.TRANSIT_TYP,
D.DELVRY_ADDR,
D.VALIDFLAG,
T.PRO_ORDER_NO,
T.PRO_PLAN_ID,
T.GX_PLAN_NO,
T.PLAN_GROUP_ID,
T.ORDER_SOURCE,
T.ORD_LN_DLY_PK,
T.PLN_DIVIDE_ID,
DECODE(T.ISENDGX,
'1',
NULLIF(T.ORDER_NO || '/' || T.ORDER_SEQ, '/'),
T.PRO_PLAN_ID) PRO_PLAN_NO,
NULLIF(T.ORDER_NO || '/' || T.ORDER_SEQ, '/') ORDER_NO,
T.ORDER_SEQ,
T.DELIVERY_NO,
T.PLINE_CODE,
T.PLINE_NAME,
T.STEELCODE,
T.STEELNAME,
T.GRADECODE,
T.GRADENAME,
T.OUTDIAMETER,
T.WALLTHICK,
T.LENGTHDISC,
T.INWL_ID,
T.INWL_DESC,
T.OUTWL_ID,
T.OUTWL_DESC,
T.LEN_ROLL_MAX,
T.LEN_ROLL_MIN,
T.AIMOUTDIAMETER,
T.AIMWALLTHICK,
T.AIMLENGTH,
T.DIAMETER_GP,
T.LEN_GP_SINGLE,
T.ROLL_LENGTH,
NVL(T.LEN_CUTHEAD,0) LEN_CUTHEAD,
NVL(T.LEN_CUTEND,0) LEN_CUTEND,
T.OUTNUM_CUT,
T.DIAMETER_MANDREL,
T.PASS_CODE,
T.PASS_NAME,
T.IN_WEIGHT_S,
T.IN_NUM_S,
T.WEIGTH_S,
T.NUM_S,
T.ADD_WT_IN,
T.ADD_NUM_IN,
T.MATCH_WT_IN,
T.MATCH_NUM_IN,
DECODE(T.ISENDGX, '1', '是', '/') ISENDGX,
DECODE(T.IF_MONITOR_ZG, '1', '是', '/') IF_MONITOR_ZG,
T.PRDCR_NO,
T.MONITOR_POINT,
T.STATION_ROAD,
T.PRO_MONTH,
T.CIC,
T.PIC,
T.SIC,
T.DIC,
T.WIC,
T.GIC,
T.GX_PRO_SEQ,
TO_CHAR(ROUND(TO_NUMBER(NVL(T.PLAN_USETIME, '0')) / 60, 2)) PLAN_USETIME,
TO_CHAR(T.PLAN_TIME_B, 'YYYY-MM-DD HH24:MI:SS') PLAN_TIME_B,
TO_CHAR(T.PLAN_TIME_E, 'YYYY-MM-DD HH24:MI:SS') PLAN_TIME_E,
T.BATCHED_WT,
T.BATCHED_NUM,
T.FINISHWEIGHT,
T.FINISHNUM,
DECODE(T.EXE_STATUS,
'0',
'计划',
'1',
'生产中',
'2',
'已生产',
'3' , '关闭A' , '') EXE_STATUS,
DECODE(T.IS_REPAIR_PLN, '1', '是', '/') IS_REPAIR_PLN,
T.REPAIR_TYPE,
DECODE(T.IS_PLAN_OK, '1', '是', '/') IS_PLAN_OK,
DECODE(T.GPREQ_IF_OK, '1', '是', '/') GPREQ_IF_OK,
T.GPREQ_ID,
T.ZY_BATCH_ID,
T.CIC_GROUP_GP,
T.PIC_GROUP_GP,
T.SIC_GROUP_GP,
T.DIC_GROUP_GP,
T.WIC_GROUP_GP,
T.GIC_GROUP_GP,
T.CIC_GP,
T.PIC_GP,
T.SIC_GP,
T.DIC_GP,
T.WIC_GP,
T.GIC_GP,
T.IF_EXPORT,
TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
T.MEMO,
TO_CHAR(T.ISSUED_TIME, 'YYYY-MM-DD HH24:MI:SS') ISSUED_TIME,
T.ISSUED_MAN,
TO_CHAR(T.LAST_UNDOWN_TIME, 'YYYY-MM-DD HH24:MI:SS') LAST_UNDOWN_TIME,
T.LAST_UNDOWN_MAN,
T.VERSION_NO,
T.PROCESSING_COST,
T.TOTAL_COST,
DECODE(T.IF_STOVE_ISSUED, '1', '是', '/') IF_STOVE_ISSUED,
TO_CHAR(T.STOVE_ISSUED_TIME, 'YYYY-MM-DD HH24:MI:SS') STOVE_ISSUED_TIME,
T.STOVE_ISSUED_MAN,
T.IS_ONLOAD_LINE,
T.OUTDIAMETER_ZG,
T.WALLTHICK_ZG,
T.WHOLE_BACKLOG_DESC,
T.MSC,
T.INDEX_SEQ,
T.BOM,
(SELECT S1.CRAFT_PATH
FROM CRAFT_FILE_LV2 S1
WHERE INSTR(T1.CRAFT_FILE_LV2_D, S1.PK) > 0
AND INSTR(S1.PLINE_CODE, T.PLINE_CODE) > 0
AND S1.VALIDFLAG = '1'
AND S1.PROCESS_CODE = 'D') CRAFT_FILE_LV2_G,
(SELECT CD.CRAFT_PATH FROM CRAFT_ORD_DESIGN CD WHERE CD.ORD_LN_PK=T1.ORD_LN_PK AND CD.CRAFT_SEQ=T.CRAFT_SEQ) CRAFT_PATH,
T.CRAFT_SEQ,
T.CRAFT_FILE_NO,
T.CRAFT_FILE_MAN,
T1.PRODUCCODE,
T1.PRODUCNAME,
T1.STD_CODE,
T1.STD_NAME,
T1.STD_STYLE_DESC,
T1.SPEC_CODE,
T1.SPEC_NAME,
T1.MODEL_DESC,
DECODE(T.IF_LEN_CONTROL, '1', '是', '0', '/') IF_LEN_CONTROL,
DECODE(T.IF_MINUS_SIC_ROLL, '1', '是', '0', '/') IF_MINUS_SIC_ROLL,
T.TUBE_END_RATIO,
T.GPREQ_NUM,
T.GPREQ_WEIGHT,
T.VERIFY1,
T.VERIFY2,
T.VERIFY3,
NVL(T.WEIGTH_S_MIN, 0) WEIGTH_S_MIN,
(SELECT T9.BASENAME
FROM COM_BASE_INFO T9
WHERE T9.BASECODE = T.PRIORITY) PRIORITY,
T.PRIORITY_MEMO,
NVL(T.PLANS_NUM, 0) PLANS_NUM,
T.ORIGINAL_NUMBER,
T1.FINAL_USER_DESC,
T.PROD_STANDARD,
T.OUTPUT_STANDARD,
T.THICKNESS_WALL,
T.DECISION,
T.PROCESS_DESC_C,
T.APPLY_NO,
DECODE(T.APPLY_STATUS,
'00',
'作废',
'10',
'申请',
'20',
'审批通过',
'30',
'审批不通过') APPLY_STATUS,
T.ISSUED_MEMO,
DECODE(T.OUTS_BILLET_FL, '0', '自炼', '1', '外购') OUTS_BILLET_FL,
T1.OUTS_STL_PIPE_FL,
T1.LEN_NO,
T1.LENGTHDISC_N,
T1.LEN_NO_N,
T.PROGY_MEMO,
(SELECT P.GRADECODE_ALL
FROM PLN_SALEORD_PROC P
WHERE P.ORD_LN_DLY_PK = T.ORD_LN_DLY_PK
AND P.PLN_DIVIDE_ID = T.PLN_DIVIDE_ID) GRADECODE_ALL,
T1.PRD_CLS,
T1.ORDERFROM,
T1.PRODUCE_SORT,
(SELECT SP.HR_CAPCTY
FROM SLM_BASE_MATERIAL_D_PL SP
WHERE SP.PLINE_CODE = T.PLINE_CODE
AND SP.IN_MATERIAL_NO = T.INWL_ID
AND SP.OUT_MATERIAL_NO = T.OUTWL_ID) HR_CAPCTY,
NVL((SELECT SUM(M.PREDICT_TON)
FROM MIL_PLAN M
WHERE M.PRO_PLAN_ID = T.PRO_PLAN_ID
AND M.GX_PLAN_NO = T.GX_PLAN_NO
AND SUBSTR(M.JUDGE_STOVE_NO, -2) = '01'),
0) EXPECT_WT,
NVL((SELECT SUM(M.PREDICT_PIECE)
FROM MIL_PLAN M
WHERE M.PRO_PLAN_ID = T.PRO_PLAN_ID
AND M.GX_PLAN_NO = T.GX_PLAN_NO
AND SUBSTR(M.JUDGE_STOVE_NO, -2) = '01'),
0) EXPECT_NUM,
DECODE(T.PASSIVE,'1','主动','0','被动') PASSIVE,
DECODE(B.CODE_JG_BL,'',B.CODE_DJ_BL,B.CODE_JG_BL) REQ_BL_ID,
T.GRADECODE_LK,T.GRADENAME_LK,T.CIC_GROUP_LK,
(SELECT GET_GP_MAT_NUM_ZL(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) FURNA_NUM,
(SELECT GET_GP_MAT_WT_ZL(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) FURNA_WEIGHT,
(SELECT GET_GP_PLNZGM_NUM(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) LJ_NUM,
(SELECT GET_GP_PLNZGM_WT(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) LJ_WEIGHT,
(SELECT GET_GP_MAT_NUM(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) PEND_NUM,
(SELECT GET_GP_MAT_WT(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) PEND_WEIGHT,
(SELECT GET_GP_WT_CK(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) CK_WEIGHT,
(SELECT GET_GP_NUM_CK(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) CK_NUM,
(SELECT GET_ZG_REDUCED_WT(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) REDUCED_WT,
T1.SUPPLY_UNIT_CODE,
T1.SUPPLY_UNIT,
DECODE(T1.TYPE_FLAG,'0','非双经销','1','双经销','2','定销订购','4','来料加工')TYPE_FLAG
FROM PLN_ORDER_ZG_S T,
(SELECT Q1.PRODUCCODE,
Q1.PRODUCNAME,
Q1.STD_CODE,
Q1.STD_NAME,
Q1.STD_STYLE_DESC,
Q1.SPEC_CODE,
Q1.SPEC_NAME,
Q1.ORD_LN_DLY_PK,
Q1.ORD_LN_PK,
Q1.STEELCODE,
Q1.STEELNAME,
Q1.DELVRY_RANGE_TPE,
Q1.DELVRY_RANGE_MAX,
Q1.DELVRY_RANGE_MIN,
Q1.DELVRY_QTY,
Q1.MODEL_DESC,
Q4.ABRVITION FINAL_USER_DESC,
Q1.LENGTHMAX,
Q1.LENGTHMIN,
Q1.OUTS_BILLET_FL,
Q1.OUTS_STL_PIPE_FL,
Q1.LENGTHDISC_N,
Q1.LEN_NO_N,
Q1.LEN_NO,
Q2.CRAFT_FILE_LV2_D,
(SELECT A.PRODUC_DESC
FROM COM_BASE_PRODUCT A
WHERE A.PRODUCCODE = Q1.PRODUCCODE
AND A.VALIDFLAG = '1') PRD_CLS,
(SELECT A.BASENAME
FROM COM_BASE_INFO A
WHERE A.BASECODE = Q1.ORDERFROM) ORDERFROM,
Q1.PRODUCE_SORT,
Q1.SUPPLY_UNIT_CODE,
Q1.SUPPLY_UNIT,
Q1.TYPE_FLAG
FROM PLN_SALEORD Q1,
CRAFT_ORD_DESIGN Q2,
CRAFT_ORD_DESIGN_APPOINT Q3,
SLM_BASE_CUSTOMER Q4
WHERE Q1.ORD_LN_PK = Q3.ORD_LN_PK(+)
AND Q1.FINAL_USER = Q4.CUSTOMER_NO(+)
AND Q1.ORD_LN_PK = Q2.ORD_LN_PK(+)
AND Q2.VALIDFLAG(+) = '1') T1,
(SELECT MIN(S.NEXT_GX) NEXT_GX,
S.PRO_PLAN_ID,
MIN(S.PLAN_GROUP_ID) PLAN_GROUP_ID
FROM PLN_ORDER_ZG S
GROUP BY S.PRO_PLAN_ID) T2,
SLM_ORDER_LINE_DELIVERY D,PLN_PORDER_BL_REQ B
WHERE T.ORD_LN_DLY_PK = T1.ORD_LN_DLY_PK(+)
AND T.PRO_PLAN_ID = T2.PRO_PLAN_ID(+)
AND T.ORD_LN_DLY_PK = D.ORD_LN_DLY_PK(+)
AND T.ORD_LN_DLY_PK=B.REQ_BL_ID(+)
AND T.IS_PLAN_OK='1'
]]>
0
AND V.PROCESS_CODE = 'A'
AND V.DESGIN_KEY = ?
AND V.MSC_PLINE = ?
AND V.SPECL_FL = '2'
AND V.VALIDFLAG = '1'
ORDER BY V.CIC,C.CHEM_SEQ ASC
]]>