B'),'C','->C'),'R','->R'),'L','->L'),'J','->J') LINE_PROC_CD
,b.PROC_CD
,STL_GRD
,CAST_SEQ
,c.IRON_LD_NO
,a.LD_NO
FROM
(
SELECT b.CHARGE_NO,a.CHARGE_MANA_NO ,a.CAST_EDT_CHARGE_CNT||'-'||a.CAST_CHARGE_SEQ CAST_SEQ,
a.STL_GRD
,a.LINE_PROC_CD
,b.LD_NO
,KR_SER_NO
FROM TBF01_SPEC_CHARGE a,
TBG02_CHARGE_COMM b
WHERE
CHARGE_MANA_NO = PLAN_CHARGE_NO(+)
and a.STATUS_CD IN('A','B')
) a,
(
select a.CHARGE_NO,a.PROC_CD, a.REG_DTIME
from TBG03_STLMAKE_PROG a,
( SELECT CHARGE_NO,MAX(REG_DTIME) REG_DTIME FROM TBG03_STLMAKE_PROG
group by CHARGE_NO) b
WHERE a.CHARGE_NO = b.CHARGE_NO
and a.REG_DTIME = b.REG_DTIME
) b ,
(
SELECT a.LD_NO IRON_LD_NO, CHARGE_NO
FROM TBG02_CHARGE_COMM b LEFT JOIN TBG02_KR_RESULT a
ON KR_CHARGE_NO = KR_SER_NO
AND kr_stat='2'
) c
WHERE a.CHARGE_NO = b.CHARGE_NO(+)
AND c.CHARGE_NO(+) = a.CHARGE_NO
]]>
select LD_NO,CCM_DEP_DTIME from tbg03_ladle_prog
where LD_STAT = '2' and substr(LD_NO,1,1) = 'R'
select LD_NO,KR_CHARGE_NO KR_CD from TBG02_KR_RESULT
where KR_STAT = '1' and substr(LD_NO,1,1) = 'S'
update TBG02_CHARGE_COMM set LD_NO=? where CHARGE_NO =?
update TBG03_LADLE_PROG set LD_STAT= '1' where LD_NO =?
update tbg02_kr_result set KR_STAT='2' where LD_NO =?
update TBG02_CHARGE_COMM set
KR_LD_NO=?
,KR_SER_NO =?
where CHARGE_NO =?
update TBG03_LADLE_PROG set LD_STAT= '2' where LD_NO =?