SELECT
'N' CHK
,'' CONFIRM
, CCM.OLD_SAMPL_NO OLD_SAMPL_NO
, a.PRDNM_CD --品名
, b.COIL_NO --coil号
, a.SMP_NO --试样号(试样编号)
, a.SMP_CUT_LOC --位置
, a.SMP_PROG_CD --位置(SMP_PROG_CD)
, b.COIL_THK --厚度
, a.SPEC_ABBSYM --标准号
, a.SPEC_STL_GRD --标准钢号
, a.SMP_INTO_DTIME --试样入库
, a.SMP_GET_DTIME
, a.SMP_WORK_DTIME --试样检验时间
, A.SMP_SEND_DTIME --送样时间
, a.SMP_SEND_ID
, DECODE(A.SMP_SEND_DTIME , NULL , 'Y' , '' ) YESS
, CCM.MILL_DTIME
FROM TBB02_LOT_COM a , TBB02_LOT_COIL b , TBH02_COIL_COMM CCM
WHERE a.SMP_NO = b.SMP_NO
AND CCM.COIL_NO = B.COIL_NO
AND a.SMP_CUT_LOC = b.SMP_CUT_LOC
AND b.SMP_TIT_YN = 'Y'
AND A.SMP_PROG_CD != 'A'
SELECT * FROM TBB02_LOT_COM T WHERE T.SMP_NO = ? AND ( T.SMP_PROG_CD = 'B' OR T.SMP_PROG_CD = 'C')
SELECT T.DCS_THK FROM TBH02_COIL_COMM T WHERE T.SAMPL_NO = ? AND T.SAMPL_PICK_YN = 'Y' AND T.SMP_DIR_PIC_YN = 'Y'
UPDATE TBB02_LOT_COM
SET SMP_SEND_ID = ?
,SMP_SEND_DTIME = TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
WHERE SMP_NO = ?
UPDATE JHP_QLTY_BAS T
SET T.SPETKEY = ?
WHERE T.SMP_NO = ?
UPDATE JHP_QLTY_OPE T
SET T.SPETKEY = ?
WHERE T.SMP_NO = ?
UPDATE TBB02_LOT_COIL T
SET T.COIL_THK = ?
WHERE T.SMP_NO = ?
AND T.SMP_TIT_YN = 'Y'