'0'
]]>
'0'
]]>
'0'
) temp,
(select *
from tbh02_coil_comm cl
where cl.COIL_STAT = '2'
AND cl.COIL_WTH >= NVL('', '00000')
AND cl.COIL_WTH <= NVL('', '99999')
AND cl.COIL_THK >= NVL('', '000')
AND cl.COIL_THK <= NVL('', '999')
) cl
WHERE cl.OLD_SAMPL_NO = temp.INVID(+)
union
select cl.ACT_WGT / 1000 - TEMP.ASUM EFLAG,
cl.OLD_SAMPL_NO,
cl.ACT_WGT / 1000 ACT_WGT,
temp.*
from (SELECT INVID,
sum(BETRANSWGT) ASUM,
max(ALLOYNO) ALLOYNO,
max(INVTHICK) INVTHICK,
max(INVWIDTH) INVWIDTH,
max(ORDERITEM) ORDERITEM,
max(PRODTYPENO) PRODTYPENO,
max(ACCTDATE) ACCTDATE,
max(CREATEID) CREATEID,
max(INSTDISP) INSTDISP
FROM (WITH A AS (SELECT ROW_NUMBER() OVER(PARTITION BY T.INVID ORDER BY T.CREATETIME ASC) RN,
PKG_QUALITY_COMM.FZ00_COMM('A01016',
T.ACTIVITYID) ACTIVITYID,
T.INVID,
TO_CHAR(T.BETRANSWGT) BETRANSWGT,
TO_CHAR(T.CREATETIME,
'YYYY-MM-DD HH24:MI:SS') CREATETIME,
T.ALLOYNO,
T.MANAGEIP,
T.ORDERITEM,
T.EXECJOBFUNC,
T.PRODNAME,
T.PRODTYPENO,
T.ACCTDATE,
T.CREATEID,
T.INSTDISP,
TO_CHAR(T.INVLENGTH) INVLENGTH,
TO_CHAR(T.INVTHICK) INVTHICK,
TO_CHAR(T.INVWIDTH) INVWIDTH,
T.GRADE,
T.REFNOA
FROM MATAL_DETAIL_INACCOUNTING T
WHERE T.Acctdate between ? and ?
AND staus = 'N'
UNION ALL
SELECT 1,
'期初库存',
H.OLD_SAMPL_NO,
TO_CHAR(H.ACT_WGT / 1000),
'2022-04-13',
H.SPEC_STL_GRD,
'热轧',
h.ord_no,
'N',
'',
'HCR',
'20220424',
'',
'',
TO_CHAR(H.COIL_LEN),
TO_CHAR(H.COIL_THK),
TO_CHAR(H.COIL_WTH),
'',
H.SLAB_NO
FROM TBH02_COIL_STOCK H
where h.trnf_dtime = ?), B AS (SELECT ROW_NUMBER() OVER(PARTITION BY T.INVID ORDER BY T.CREATETIME ASC) RN,
PKG_QUALITY_COMM.FZ00_COMM('A01016',
T.ACTIVITYID) ACTIVITYID,
T.INVID,
TO_CHAR(T.BETRANSWGT * -1),
TO_CHAR(T.CREATETIME,
'YYYY-MM-DD HH24:MI:SS') CREATETIME,
T.ALLOYNO,
T.MANAGEIP,
T.ORDERITEM,
T.EXECJOBFUNC,
T.PRODNAME,
T.PRODTYPENO,
T.ACCTDATE,
T.CREATEID,
T.INSTDISP,
TO_CHAR(T.INVLENGTH) INVLENGTH,
TO_CHAR(T.INVTHICK) INVTHICK,
TO_CHAR(T.INVWIDTH) INVWIDTH,
T.GRADE,
T.REFNOA
FROM MATAL_DETAIL_OUTACCOUNTING T
WHERE T.Acctdate between
? and ?
AND staus = 'N')
SELECT *
FROM A
UNION ALL
SELECT *
FROM B) ZZ
group by invid
having sum(BETRANSWGT) <> '0'
) temp,
(select *
from tbh02_coil_comm cl
where (cl.COIL_STAT = '2' AND cl.COIL_WTH >= NVL('', '00000') AND
cl.COIL_WTH <= NVL('', '99999') AND
cl.COIL_THK >= NVL('', '000') AND
cl.COIL_THK <= NVL('', '999'))
OR CL.OLD_SAMPL_NO IN (
select T.OLD_SAMPL_NO
fROM c_tbk02_coil_comm t
where t.CUR_PROG_CD = 'PAB'
AND T.COIL_STAT = '1')
) cl
WHERE temp.INVID = cl.OLD_SAMPL_NO(+)
]]>
'0'
) temp,
(select *
from tbh02_coil_comm cl
where cl.COIL_STAT = '2'
AND cl.COIL_WTH >= NVL('', '00000')
AND cl.COIL_WTH <= NVL('', '99999')
AND cl.COIL_THK >= NVL('', '000')
AND cl.COIL_THK <= NVL('', '999')
) cl
WHERE cl.OLD_SAMPL_NO = temp.INVID(+)
ORDER BY cl.ACT_WGT / 1000 - TEMP.ASUM
]]>
'0'
]]>
'0'
) temp,
(select *
from c_tbk02_coil_comm cl
where cl.COIL_STAT = '2'
AND cl.CUR_LOAD_LOC like '1%'
) cl
WHERE cl.OLD_SAMPL_NO = temp.INVID(+)
ORDER BY cl.ACT_WGT / 1000 - TEMP.ASUM
]]>
'0'
]]>
'0'
) temp,
(select *
from C_TBL02_COIL_COMM
WHERE COIL_STAT = '2'
AND NVL(LINE_TP, '0') <> 'S' --屏蔽酸洗线 20171222
AND NVL(EXTSHAPE_QUALITY, 'NULLP') NOT IN ('FP') ---屏蔽废次卷
AND CUR_LOAD_LOC LIKE '' || '%'
) cl
WHERE cl.OLD_SAMPL_NO = temp.INVID(+)
ORDER BY cl.ACT_WGT / 1000 - TEMP.ASUM
]]>