= DECODE(:2,NULL,1,:3)
AND DECODE(:4,NULL,1,SUBSTR(B02MC.CRET_NO_DTIME,1,8)) <= DECODE(:5,NULL,1,:6)
AND B02MC.ORD_NO LIKE :7||'%'
ORDER BY B02MC.CRET_NO
]]>
= NVL(:3,'00000101')
AND NVL(SUBSTR(B02MC.CRET_NO_DTIME,1,8),'99991231') <= NVL(:4,'99991231')
AND NVL(B02MCO.CAR_GP,' ') LIKE :5||'%'
AND NVL(H02CC.DLIV_DIRNO,' ') LIKE :6||'%'
AND NVL(B02MC.INV_NO,' ') LIKE :7||'%'
AND NVL(B02MC.SPEC_STL_GRD , ' ') LIKE ?||'%'
AND (CASE WHEN B02MC.SEND_TP IS NULL THEN 'N' ELSE 'Y' END ) = DECODE(? , 'ALL' , (CASE WHEN B02MC.SEND_TP IS NULL THEN 'N' ELSE 'Y' END ) , ?)
ORDER BY B02MC.CRET_NO
]]>
= SQ.THK_MIN AND A.COIL_THK <= SQ.THK_MAX AND SQ.ORD_USE_TP = G.ORD_USE_TP AND SQ.QLTY_CD = B.QLTY_CD AND ROWNUM = 1 ) MS_QLTY_SIZ
,A.COIL_THK COILTHK
,DECODE(SUBSTR(C.MS_QLTY_TEM,1,1)
,'0','-'||TO_NUMBER(SUBSTR(C.MS_QLTY_TEM,2,3))
,'1',TO_NUMBER(SUBSTR(C.MS_QLTY_TEM,2,3))
,'2','') MS_QLTY_TEM, -- 温度
MS_QLTY_TEM MS_QLTY_TEM1, -- 温度
C.MS_QLTY_RP, -- Rp
(CASE WHEN SUBSTR(C.QLTY_CD,1,3) = 'IMS' THEN 'TT' ELSE SUBSTR(C.QLTY_CD, 1, 2) END) QLTY_CD,
C.QLTY_CD_CFNM -- 指标名
,C.MS_QLTY_DIR
FROM TBB02_MS_COIL A, TBB02_WORK_QLTY B, TBB01_SEQ_QLTY C,TBB02_MS_COM D ,TBH02_COIL_COMM F
,TBB01_ORD_HEAD G , TBB01_ORD_QLTY OQ
WHERE A.CRET_NO = ?
AND A.SMP_NO = B.SMP_NO
AND A.SMP_CUT_LOC = DECODE(B.SMP_CUT_LOC, '1', 'W', '2', 'W', B.SMP_CUT_LOC)
AND B.QLTY_CD = C.QLTY_CD
AND A.CRET_NO = D.CRET_NO
AND F.TOT_DEC_GRD = '1'
AND (F.MATLQLTY_DEC_GRD = '1' OR F.MATLQLTY_DEC_GRD = '0')
AND A.COIL_NO = F.COIL_NO
AND D.ORD_NO = G.ORD_NO
AND D.ORD_SEQ = G.ORD_SEQ
AND B.QLTY_CD = OQ.QLTY_CD
AND G.ORD_NO = OQ.ORD_NO
AND G.ORD_SEQ = OQ.ORD_SEQ
AND OQ.QLTY_DEC_CD IS NULL
AND OQ.DSN_KIND = (SELECT MIN(BO.DSN_KIND) FROM TBB01_ORD_QLTY BO WHERE BO.ORD_NO = OQ.ORD_NO AND BO.ORD_SEQ = OQ.ORD_SEQ )
ORDER BY A.OLD_SAMPL_NO , QLTY_CD , QLTY_CD_CFNM
]]>
INSERT INTO ZL_ZBS_MAIN_DATA(
SENDID --明细号
,PACTID --合同号
,ORDERID --订单号
,SUBSCRIBER --订货单位
,CONSIGNEE --收货单位
,PRODUCTNAME --产品名称
,STANDARDDOC --标准号
,CARNO --车号
,WEIGHT --总重
,QUANTITY --块数
,ZBSXLS --质保书(xls格式)
,ZBS_BH --质保书号
,SENDTIME --发货日期
,DELIVERYTIME --交货日期
)
VALUES
(?
,?
,?
,?
,?
,?
,?
,?
,?
,?
,?
,?
,TO_DATE(SUBSTR(?,1,8) , 'YYYYMMDD')
,TO_DATE(SUBSTR(?,1,8) , 'YYYYMMDD')
)
INSERT INTO ZL_ZBS_DETAIL_DATA
(
SENDID --发货明细码
,P_CB_ID --批号
,SMELTINGID --炼钢炉号
,STEELNAME --牌号
,HEIGHT --厚度或直径
,LENGTH --长度
,WIDTH --宽度
,QUANTITY --数量
,WEIGHT --重量
,DELIVERYSTATE --交货状态
,ZBS_BH
)
VALUES
(
?
,?
,?
,?
,?
,?
,?
,?
,?
,?
,?
)
SELECT
CCM.SHIP_INVNO
,SUBSTR(CCM.OLD_SAMPL_NO , 1,10 ) OLD_SAMPL_NO
,SUBSTR(CCM.SLAB_NO , 1,10) SLAB_NO
,CCM.SPEC_STL_GRD
,CCM.INSTR_COIL_THK
,CCM.COIL_LEN
,CCM.INSTR_COIL_WTH
,COUNT(*) SUM_CNT
,SUM(DECODE(CCM.ACT_WGT , NULL , 0 , CCM.ACT_WGT)) SUM_WGT
,CCM.PRODNM_CD
FROM TBH02_COIL_COMM CCM WHERE CCM.CRET_NO = ?
GROUP BY
CCM.SHIP_INVNO
,SUBSTR(CCM.OLD_SAMPL_NO , 1,10 )
,SUBSTR(CCM.SLAB_NO , 1,10)
,CCM.SPEC_STL_GRD
,CCM.INSTR_COIL_THK
,CCM.COIL_LEN
,CCM.INSTR_COIL_WTH
,CCM.PRODNM_CD