SELECT
M.BILL_NO_SEQ,
T.BILL_NO,
T.JUDGE_STOVE_NO,
T.STOVE_NO,
T.BATCH_NO,
T.GROUP_NO,
T.ORD_PK,
T.ORD_LN_PK,
T.ORD_LN_DLY_PK,
MAX(S.TG_ORDER_NO_SEQ) TG_ORDER_NO_SEQ,
MAX(t.ORDER_NO ||'/'||t.ORDER_SEQ ) ORDER_NO_SEQ,
MAX( M.ORDER_NO ) ORDER_NO,
MAX( M.ORDER_SEQ ) ORDER_SEQ,
MAX( T.MATERIAL_NO ) MATERIAL_NO,
MAX( T.MATERIAL_NAME ) 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.ACT_LEN_MIN ) ACT_LEN_MIN,
MAX( T.ACT_LEN_MAX ) ACT_LEN_MAX,
SUM( T.ACT_LEN ) ACT_LEN,
SUM( T.ACT_COUNT ) ACT_COUNT,
SUM( W.ACT_WEIGHT ) ACT_WEIGHT,
MAX( T.CREATE_NAME ) CREATE_NAME,
MAX( to_char(T.CREATE_TIME,'YYYY-MM-DD HH24:MI:SS') ) CREATE_TIME,
MAX( T.PLINE_CODE ) PLINE_CODE,
MAX( T.PLINE_NAME ) PLINE_NAME,
MAX( B.STORAGE_NO ) STORAGE_NO,
MAX( B.STORAGE_NAME ) STORAGE_NAME,
(SELECT
'天淮判定支数:' || SUM(ACT_COUNT)
FROM
QCM_ZG_JUGDE_APPLY
WHERE
TARGET = 'A'
AND JUDGE_TOLRESULT_CODE = '40740701'
AND JUDGE_STOVE_NO = T.JUDGE_STOVE_NO
AND BATCH_NO = t.BATCH_NO
AND ORD_LN_DLY_PK = T.ORD_LN_DLY_PK) MEMO
FROM
YDM_ZC_BILL_C T
INNER JOIN (SELECT NVL(PONDER_GROSS_WT,ACT_WEIGHT) ACT_WEIGHT,MAT_NO,BILL_NO FROM YDM_ZC_LOADVEHICLE_MAT ) W ON t.MAT_NO = W.MAT_NO AND t.BILL_NO = W.BILL_NO
LEFT JOIN YDM_BS_STORAGE B ON T.STORAGE_NO = B.STORAGE_NO
LEFT JOIN (SELECT max(ORDER_NO)||'/'||max(ORDER_SEQ) as TG_ORDER_NO_SEQ,TH_ORDER_NO_SEQ FROM PLN_ORDER_ZG_S GROUP BY TH_ORDER_NO_SEQ) S ON T.ORDER_NO||'/'||T.ORDER_SEQ = S.TH_ORDER_NO_SEQ,
YDM_ZC_BILL_M M
WHERE
T.BILL_NO = M.BILL_NO
AND T.ORD_PK = M.ORD_PK
AND T.ORD_LN_PK = M.ORD_LN_PK
AND T.ORD_LN_DLY_PK = M.ORD_LN_DLY_PK
AND T.VALIDFLAG = '1'
AND T.LOADVEHICLE_FLAG = '1'
AND T.RECEIVE_FLAG = '0'
#condition#
AND EXISTS (
SELECT 1 FROM SLM_ORDER_HEAD
WHERE ORD_PK = T.ORD_PK AND FST_DRAWEE_UNIT = '120607'
AND STLMT_UNIT_NO IN ( '1010101184', '8000000001','1012800159' )
AND ORDER_NO NOT LIKE 'TH%'
AND ORDER_NO LIKE 'HG%'
)
AND EXISTS (
SELECT 1 FROM PLN_ORDER_ZG_S WHERE TH_ORDER_NO_SEQ LIKE '%'||M.ORDER_NO || '/' || M.ORDER_SEQ||'%' AND PRODUCTION_TH_FLAG = '123506'
)
GROUP BY
M.BILL_NO_SEQ,
T.BILL_NO,
T.ORD_PK,
T.ORD_LN_PK,
T.ORD_LN_DLY_PK,
T.JUDGE_STOVE_NO,
T.STOVE_NO,
T.BATCH_NO,
T.GROUP_NO
SELECT
TT.*,
(SELECT
'天淮判定支数:' || SUM(ACT_COUNT)
FROM
QCM_ZG_JUGDE_APPLY
WHERE
TARGET = 'A'
AND JUDGE_TOLRESULT_CODE = '40740701'
AND JUDGE_STOVE_NO = TT.FLAG_STOVE_NO_ZG
AND BATCH_NO = TT.BATCH_NO
AND ORD_LN_DLY_PK = TT.ORD_LN_DLY_PK) as MEMO,
DECODE( ( SELECT 1 FROM QCM_ZG_JUGDE_APPLY WHERE JUDGE_STOVE_NO = tT.JUDGE_STOVE_NO AND BATCH_NO = tT.BATCH_NO AND BATCH_GROUD_NO = tT.BATCH_GROUD_NO AND PLINE_CODE in( 'C065','C066' ) and rownum = 1) ,'1','是','否')sfsp,
(SELECT MIN(JUDGE_RESULT) FROM QCM_ZG_JUGDE_APPLY WHERE JUDGE_STOVE_NO = tT.JUDGE_STOVE_NO AND BATCH_NO = tT.BATCH_NO AND BATCH_GROUD_NO = tT.BATCH_GROUD_NO AND PLINE_CODE in( 'C065','C066' ) ) PDJG
FROM
(
SELECT
T.INSTOCK_DOC,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO,
MAX(T.ORD_LN_DLY_PK) ORD_LN_DLY_PK,
MAX( T.MATERIAL_NO ) MATERIAL_NO,
MAX( T.MATERIAL_NAME ) 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.ACT_LEN_MIN ) ACT_LEN_MIN,
MAX( T.ACT_LEN_MAX ) ACT_LEN_MAX,
SUM( T.ACT_LEN ) ACT_LEN,
SUM( T.ACT_COUNT ) ACT_COUNT,
SUM( T.ACT_WEIGHT ) ACT_WEIGHT,
MAX( T.CREATE_NAME ) CREATE_NAME,
MAX( T.CREATE_TIME ) CREATE_TIME,
MAX ( c.BILL_NO ) M_BILL_NO,
MAX(T.BAL_YEAR_MONTH) BAL_YEAR_MONTH,
MAX(T.PROCESS_CDOE) PROCESS_CDOE,
MAX(T.PROCESS_DESC) PROCESS_DESC,
MAX(T.STORAGE_NO) STORAGE_NO,
MAX(B.STORAGE_NAME) STORAGE_NAME,
MAX(T.BELONG_CODE) BELONG_CODE,
MAX(T.BELONG_NAME) BELONG_NAME,
MAX(T.PRO_PLAN_ID) PRO_PLAN_ID,
MAX(T.GX_PLAN_NO) GX_PLAN_NO,
MAX(T.ORDER_NO) ORDER_NO,
MAX(T.ORDER_SEQ) ORDER_SEQ,
MAX(T.LARY_NO) LARY_NO,
MAX(T.LOC_NO) LOC_NO,
MAX(T.FLAG_STOVE_NO_ZG) FLAG_STOVE_NO_ZG,
MAX(T.LOCATION_NO) LOCATION_NO
FROM
YDM_BC_INLIST T
INNER JOIN
( SELECT BILL_NO, RECEIVE_FLAG, JUDGE_STOVE_NO, BATCH_NO, GROUP_NO FROM YDM_ZC_BILL_C GROUP BY BILL_NO, RECEIVE_FLAG,JUDGE_STOVE_NO, BATCH_NO, GROUP_NO ) C
ON T.BILL_NO = C.BILL_NO AND T.INSTOCK_DOC = C.RECEIVE_FLAG
and t.FLAG_STOVE_NO_ZG = c.JUDGE_STOVE_NO
and T.BATCH_NO = C.BATCH_NO and T.BATCH_NO = C.BATCH_NO
LEFT JOIN YDM_BS_STORAGE B ON B.STORAGE_NO = T.STORAGE_NO
WHERE
T.BATCH_NO = C.BATCH_NO
#condition#
GROUP BY
T.INSTOCK_DOC,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.BATCH_GROUD_NO
) TT
SELECT
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.GROUP_NO,
T.ORDER_NO || '/' || T.ORDER_SEQ AS ORDER_SEQ_NO1,
T.ORDER_NO,
T.ORDER_SEQ,
T.ORDER_SEQ_NO,
T.BILL_NO,
T.VEHICLE_NO,
MAX( T.MATERIAL_NO ) MATERIAL_NO,
MAX( T.PRODUCNAME ) PRODUCNAME,
MAX( T.GRADENAME ) GRADENAME,
MAX( T.STEELNAME ) STEELNAME,
MAX( T.SPEC_NAME ) SPEC_NAME,
MAX( T.MODEL_DESC ) MODEL_DESC,
MAX( T.STORAGE_NO ) STORAGE_NO,
MAX( B.STORAGE_NAME ) STORAGE_NAME,
MAX( T.STD_CODE ) STD_CODE,
MAX( T.STD_NAME ) STD_NAME,
MAX( T.STD_STYLE_DESC ) STD_STYLE_DESC,
MAX( T.CREATE_NAME ) CREATE_NAME,
MAX( T.CREDIT_NO ) CREDIT_NO,
MAX( T.PORT_DESC ) PORT_DESC,
TO_CHAR( MAX( T.Create_Time ), 'YYYY-MM-DD HH24:MI:SS' ) AS CREATE_TIME,
MAX( T.PONDER_NO ) AS PONDER_NO,
T.ORD_PK,
T.ORD_LN_PK,
T.ORD_LN_DLY_PK,
MAX( T.VSTEL_DESC ) VSTEL_DESC,
-- TO_CHAR( T.ACT_LEN_MIN, 'FM990.00' ) || '-' || TO_CHAR( T.ACT_LEN_MAX, 'FM990.00' ) AS LENFW,
DECODE(
(
SELECT
MAX( B.PRT_FLAG )
FROM
YDM_ZC_BILL_C B
WHERE
B.BILL_NO = T.BILL_NO
AND B.JUDGE_STOVE_NO = T.JUDGE_STOVE_NO
AND NVL( B.BATCH_NO, '/' ) = NVL( T.BATCH_NO, '/' )
AND B.GROUP_NO = T.GROUP_NO
AND B.ORD_LN_DLY_PK = T.ORD_LN_DLY_PK
AND B.VALIDFLAG = '1'
),
'0',
'否',
'1',
'是'
) AS WEIGH_FLAG,
TO_CHAR( NVL( SUM( T.ACT_LEN ), 0 ), 'FM999999990.00' ) AS ACT_LEN,
NVL( SUM( T.ACT_COUNT ), 0 ) AS ACT_COUNT,
TO_CHAR( NVL( SUM( T.ACT_WEIGHT ), 0 ), 'FM999999990.000' ) AS ACT_WEIGHT,
TO_CHAR( NVL( SUM( T.PONDER_GROSS_WT ), '0' ), 'FM999999990.000' ) AS PONDER_GROSS_WT,
NVL( SUM( T.SEND_NUM ), 0 ) AS SEND_NUM,
MAX( S.SUPPLY_UNIT ) SUPPLY_UNIT,
TO_CHAR( MAX( W.RECORD_DATE2 ), 'YYYY-MM-DD HH24:MI:SS' ) RECORD_DATE2
FROM
YDM_ZC_LOADVEHICLE_MAT T
LEFT JOIN YDM_BS_STORAGE B ON B.STORAGE_NO = T.STORAGE_NO
LEFT JOIN SLM_ORDER_HEAD S ON S.ORD_PK = T.ORD_PK
LEFT JOIN CMM_WEIGHT_RESULT W ON W.RESULT_NO = T.PONDER_NO
WHERE
T.BILL_NO = ?
AND T.JUDGE_STOVE_NO = ?
AND T.BATCH_NO = ?
AND T.GROUP_NO = ?
AND T.RETURN_FLAG = '0'
GROUP BY
T.BILL_NO,
T.JUDGE_STOVE_NO,
T.BATCH_NO,
T.GROUP_NO,
T.VEHICLE_NO,
T.ORD_PK,
T.ORD_LN_PK,
T.ORD_LN_DLY_PK,
T.ORDER_NO,
T.ORDER_SEQ,
T.ORDER_SEQ_NO
SELECT
B.*
FROM
YDM_ZC_BILL_M M,
YDM_ZC_BILL_C T
INNER JOIN YDM_BC_INLIST B ON T.MAT_NO = B.MAT_NO
WHERE
T.BILL_NO = M.BILL_NO
AND T.ORD_PK = M.ORD_PK
AND T.ORD_LN_PK = M.ORD_LN_PK
AND T.ORD_LN_DLY_PK = M.ORD_LN_DLY_PK
AND T.BILL_NO = ''
AND T.ORD_PK = ''
AND T.ORD_LN_PK = ''
AND T.ORD_LN_DLY_PK = ''
AND T.JUDGE_STOVE_NO = ''
AND T.BATCH_NO = ''
AND T.GROUP_NO = ''
SELECT COUNT(1)ACT_COUNT
FROM MAT_BC_M T, YDM_BC_BUTTRESS S
WHERE T.MAT_NO = S.MAT_NO
AND T.BELONG_CODE = '002001001'
AND T.JUDGE_STOVE_NO = ?
AND T.BATCH_NO = ?
AND T.BATCH_GROUD_NO = ?
AND T.ORDER_NO = ?
SELECT COUNT(1)APPLY_ACT_COUNT
FROM MAT_BC_M T
WHERE T.BELONG_CODE = '002001001'
AND T.JUDGE_STOVE_NO = ?
AND T.BATCH_NO = ?
AND T.BATCH_GROUD_NO = ?
AND T.ORDER_NO = ?
AND T.JUGDE_APPLY_CODE IS NOT NULL
0 THEN
SELECT CHECK_NO INTO V_CHECK_NO FROM QCM_ZC_CHECKCONSIGN WHERE
JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND BATCH_NO = '#BATCH_NO#'
GROUP BY CHECK_NO;
DELETE FROM QCM_ZC_CHECKCONSIGN WHERE CHECK_NO = V_CHECK_NO;
DELETE FROM QCM_ZC_CHECKCONSIGN_DETAIL WHERE CHECK_NO = V_CHECK_NO;
DELETE FROM QCM_JHY_PHYRESULT WHERE SAMPLE_ID = V_CHECK_NO;
DELETE FROM QCM_JHY_ELEMENTS WHERE SAMPLE_ID = V_CHECK_NO;
END IF;
UPDATE YDM_ZC_BILL_C SET RECEIVE_FLAG = '0' WHERE RECEIVE_FLAG = '#INSTOCK_DOC#' AND BILL_NO = '#M_BILL_NO#';
DELETE FROM MIL_INSTORE_RESULT T WHERE T.PRO_PLAN_ID = '#PRO_PLAN_ID#' AND T.GX_PLAN_NO = '#GX_PLAN_NO#';
DELETE FROM MIL_MT_RESULT T WHERE RESULT_NO = '#JUDGE_STOVE_NO#' AND JUDGE_STOVE_NO LIKE '#JUDGE_STOVE_NO#' || '%';
UPDATE PLN_ORDER_ZG_S T
SET T.FINISHNUM = TO_NUMBER(NVL(T.FINISHNUM,0)) - TO_NUMBER('#ACT_COUNT#'),
T.FINISHWEIGHT = TO_NUMBER(NVL(T.FINISHWEIGHT,0)) -
TO_NUMBER('#ACT_WEIGHT#')
WHERE T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
AND T.GX_PLAN_NO = '#GX_PLAN_NO#';
END;
]]>
SELECT T.WHOLE_BACKLOG_DESC,
T.PRO_ORDER_NO,
T.PRO_PLAN_ID,
T.GX_PLAN_NO,
T.DECISION,
T.PLAN_GROUP_ID,
T.ORDER_SOURCE,
T.ORD_LN_DLY_PK,
T.PLN_DIVIDE_ID,
T.ORDER_NO,
T.ORDER_SEQ,
T.DELIVERY_NO,
T.REQ_BL_ID,
T.PLINE_CODE,
T.PLINE_NAME,
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,
T.LEN_CUTHEAD,
T.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,
T.ISENDGX,
T.IF_MONITOR_ZG,
T.PRDCR_NO,
T.MONITOR_POINT,
T.CRAFT_FILE_NO,
T.CRAFT_FILE_MAN,
T.CRAFT_SEQ,
T.STATION_ROAD,
T.PRO_MONTH,
T.CIC,
T.PIC,
T.SIC,
T.DIC,
T.WIC,
T.GIC,
T.GX_PRO_SEQ,
T.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','关闭')EXE_STATUS,
T.IS_REPAIR_PLN,
T.REPAIR_TYPE,
T.IS_PLAN_OK,
T.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,
T.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,
S.STD_CODE,
S.STD_NAME,
S.MATERIAL_NO,
S.MATERIAL_DESC,
S.PRODUCCODE,
S.PRODUCNAME,
S.STEELCODE,
S.STEELNAME,
S.SPEC_CODE,
S.SPEC_NAME,
S.MODEL_CODE,
S.MODEL_DESC,
S.STD_STYLE_DESC,
T.INDEX_SEQ
FROM PLN_ORDER_ZG_S T,PLN_SALEORD S
WHERE T.ORD_LN_DLY_PK = S.ORD_LN_DLY_PK AND T.TH_ORDER_NO_SEQ like '%'|| {0} ||'%' AND T.PRODUCTION_TH_FLAG = '123506'
SELECT 'IQ' || TO_CHAR(SYSDATE, '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 = '800709'
AND T.INSTOCK_DOC LIKE 'IQ' || TO_CHAR(SYSDATE, 'YYMMDD') || '_____'
SELECT T.LOCATION_NAME,T.LOCATION_NO FROM YDM_BS_LOCATION T WHERE T.STORAGE_NO = ? ORDER BY T.LOCATION_NO ASC
SELECT T.STORAGE_NAME,T.STORAGE_NO FROM YDM_BS_STORAGE T WHERE T.STORAGE_TYPE_NO IN('800202','800205') AND T.VALIDFLAG = '1'