SELECT F.JUDGE_STOVE_NO AS STOVE_NO,
MAX(F.LOT_NO)LOT_NO,
F.JUDGE_STOVE_NO,
F.BATCH_NO,
MAX(F.MATERIAL_NO)MATERIAL_NO,
F.MATERIAL_NAME,
MAX(F.GRADECODE)GRADECODE,
F.GRADENAME,
MAX(F.PRODUCCODE)PRODUCCODE,
F.PRODUCNAME,
MAX(F.STEELCODE)STEELCODE,
MAX(F.STEELNAME)STEELNAME,
MAX(F.SPEC_CODE)SPEC_CODE,
F.SPEC_NAME,
MAX(F.MODEL_CODE)MODEL_CODE,
MAX(F.MODEL_DESC)MODEL_DESC,
MAX(F.STD_STYLE)STD_STYLE,
MAX(F.STD_STYLE_DESC)STD_STYLE_DESC,
MAX(F.STD_CODE)STD_CODE,
MAX(F.STD_NAME)STD_NAME,
MAX(F.ACT_DIMATER)ACT_DIMATER,
MAX(F.ACT_HEIGHT)ACT_HEIGHT,
MAX(F.ACT_LEN_MIN)ACT_LEN_MIN,
MAX(F.ACT_LEN_MAX)ACT_LEN_MAX,
MAX(F.PRO_PLAN_ID)PRO_PLAN_ID,
MAX(F.GX_PLAN_NO)GX_PLAN_NO,
F.PRO_ORDER_NO,
MAX(F.PRO_PLAN_ID)PRO_PLAN_ID,
MAX(F.GX_PLAN_NO)GX_PLAN_NO,
MAX(F.ORD_LN_DLY_PK)ORD_LN_DLY_PK,
(SELECT COUNT(1)
FROM QCM_JHY_ELEMENTS S1
WHERE S1.STOVE_NO = F.JUDGE_STOVE_NO
AND S1.ASSAYTYPE = 'B') ACT_COUNT,
'1' MEASURE_FLAG,
MAX(F.PLINE_CODE)PLINE_CODE,
MAX(F.PLINE_NAME)PLINE_NAME
FROM YDM_BC_INLIST F
WHERE F.INSTOCK_TYPE_CODE = '800701'
AND F.PLINE_CODE IN ('C065', 'C066')
AND F.PRODUCT_FLAG = '801401'
SELECT M.PHY_CODE_MAX,
M.PHY_NAME_MAX,
M.PHY_CODE_MIN,
M.PHY_NAME_MIN,
M.PHY_CODE,
M.PHY_NAME,
M.ITEM_CODE_F,
M.ITEM_NAME_F,
M.ITEM_CODE_W,
M.ITEM_NAME_W,
M.ITEM_CODE_S,
M.ITEM_NAME_S,
N.SAMPLE_ID,
N.SAMPLE_NO,
N.VALUE1,
N.VALUE2,
N.VALUE3,
N.VALUE4,
N.VALUE7,
N.VALUE8,
N.VALUE9,
N.VALUE10,
N.VALUE11,
N.VALUE12,
N.VALUE13,
N.VALUE14,
N.VALUE15,
N.AVERAGE,
N.IS_GOOD,
N.IS_DEFECT,
N.CHECK_TEMP_CODE AS ITEM_CODE_W1,
N.SAMPLE_SIZE_CODE AS ITEM_CODE_S1,
N.CHECK_TEMP AS ITEM_NAME_W1,
N.SAMPLE_SIZE AS ITEM_NAME_S1
FROM (SELECT T.*
FROM (SELECT T.DESGIN_KEY,
T.PIC,
T.SPECL_FL,
T.INDEX_SEQ,
T.PHY_CODE_MAX,
T.PHY_NAME_MAX,
(SELECT A.PHY_DEPTID
FROM COM_BASE_PHY_B A, COM_BASE_PHY_C B
WHERE T.PHY_CODE_MIN = B.PHY_CODE
AND A.PHY_CODE = B.PHY_TYPE_M
AND A.VALIDFLAG = '1'
AND B.VALIDFLAG = '1') DEPT_ID,
T.PHY_CODE_MIN,
T.PHY_NAME_MIN,
T.PHY_CODE,
T.PHY_NAME,
(SELECT D.ORDER_SEQ
FROM COM_BASE_PHY D
WHERE D.PHY_CODE = T.PHY_CODE) ORDER_SEQ,
T.ITEM_CODE_F,
T.ITEM_NAME_F,
T.ITEM_CODE_W,
T.ITEM_NAME_W,
T.ITEM_CODE_S,
T.ITEM_NAME_S,
S1.RATE,
S1.DESC_RATE,
T.GROUP_SEQ,
T.ISCHECK,
T.ISQUOTE,
T.RESULT_COUNT,
T.ISJUDGE,
T.PHY_TYPE,
T.PHY_FORMULA,
T.STDMIN_SIGN,
T.STDMIN,
T.STDMAX_SIGN,
T.STDMAX,
T.JUDGE_BASIS,
T.DELIVERYSTATE,
T.MODEL_CODE,
T.MODEL_DESC,
T.STDMEMO,
T.SIZE_CODE,
T.SIZE_NAME,
T.SIZE_MIN_SIGN,
T.SIZE_MIN,
T.SIZE_MAX_SIGN,
T.SIZE_MAX,
T.SIZE_CODE2,
T.SIZE_NAME2,
T.SIZE_MIN_SIGN2,
T.SIZE_MIN2,
T.SIZE_MAX_SIGN2,
T.SIZE_MAX2,
T.SPEC_JG,
T.SPEC_JG_DESC,
T.ADDCONDITION,
T.ADDSTDCON_CODE,
T.ADDSTD_MIN_SIGN,
T.ADDSTD_MIN,
T.ADDSTD_MAX_SIGN,
T.ADDSTD_MAX,
T.ADDPERCENT,
T.STDMIN_SIGN2,
T.STDMIN2,
T.STDMAX_SIGN2,
T.STDMAX2,
T.STD_CHOOSE,
T.BILLET_SAMPLE,
(SELECT DISTINCT PHY_UNIT
FROM COM_BASE_PHY T5
WHERE T5.VALIDFLAG = '1'
AND T5.PHY_CODE = T.PHY_CODE) PHY_UNIT,
S.JUDGE_STOVE_NO,
S.BATCH_NO,
ROW_NUMBER() OVER(PARTITION BY T.DESGIN_KEY, T.PHY_CODE_MAX, T.PHY_CODE_MIN, T.PHY_CODE, T.ITEM_CODE_F, T.ITEM_CODE_W, T.ITEM_CODE_S ORDER BY T.SPECL_FL DESC) RN
FROM (SELECT
F.JUDGE_STOVE_NO,
MAX(F.PRO_PLAN_ID) PRO_PLAN_ID,
MAX(F.GX_PLAN_NO) GX_PLAN_NO,
MAX(F.ORD_LN_DLY_PK) ORD_LN_DLY_PK,
MAX(F.BATCH_NO) BATCH_NO,
MAX(SUBSTR(S2.PIC, 0, 10)) PIC,
MAX(S2.CRAFT_SEQ) CRAFT_SEQ,
MAX(S2.INDEX_SEQ) INDEX_SEQ
FROM YDM_BC_INLIST F, PLN_ORDER_ZG_S S2
WHERE F.PRO_PLAN_ID = S2.PRO_PLAN_ID
AND F.GX_PLAN_NO = S2.GX_PLAN_NO
AND F.INSTOCK_TYPE_CODE = '800701'
AND F.PLINE_CODE IN ('C065', 'C066')
AND F.JUDGE_STOVE_NO = ?
AND F.BATCH_NO = ?
AND F.PRODUCT_FLAG = '801401'
GROUP BY F.JUDGE_STOVE_NO) S,
PLN_SALEORD T2,
CRAFT_ORD_DESIGN T3,
CRAFT_ORD_DESIGN_STD_PIC T,
CRAFT_ORD_DESIGN_STD_PIC_SMP S1
WHERE S.ORD_LN_DLY_PK = T2.ORD_LN_DLY_PK
AND T2.ORD_LN_PK = T3.ORD_LN_PK
AND T3.CRAFT_SEQ = S.CRAFT_SEQ
AND T3.DESGIN_KEY = T.DESGIN_KEY
AND T.MSC_PLINE = S.INDEX_SEQ
AND T.PIC = S.PIC
AND T.DESGIN_KEY = S1.DESGIN_KEY
AND T.PHY_CODE_MIN = S1.PHY_CODE_MIN
AND NVL(T.ITEM_CODE_F, '1') = NVL(S1.ITEM_CODE_F, '1')
AND NVL(T.ITEM_CODE_W, '1') = NVL(S1.ITEM_CODE_W, '1')
AND NVL(T.ITEM_CODE_S, '1') = NVL(S1.ITEM_CODE_C, '1')
AND T.PROCESS_CODE = 'D'
AND T2.ORD_LN_DLY_PK = ?) T
WHERE RN = '1') M
LEFT JOIN QCM_JHY_PHYRESULT N ON M.PHY_CODE_MIN = N.PHY_CODE_MIN
AND M.PHY_CODE = N.PHY_CODE
AND M.JUDGE_STOVE_NO = N.JUDGE_STOVE_NO
AND M.BATCH_NO = N.BATCH_NO
AND NVL(M.ITEM_NAME_F, '/') = NVL(N.ITEM_NAME_F, '/')
ORDER BY M.PHY_CODE_MIN,ORDER_SEQ ASC
SELECT T.PHY_TYPE,T.PHY_CODE FROM COM_BASE_PHY_C T WHERE T.VALIDFLAG = '1' ORDER BY T.PHY_CODE ASC
SELECT T.PHY_NAME,T.PHY_CODE FROM COM_BASE_PHY T WHERE T.VALIDFLAG = '1' ORDER BY T.PHY_CODE ASC
SELECT T.PHY_NAME,T.PHY_CODE FROM COM_BASE_PHY T WHERE T.VALIDFLAG = '1' AND T.PHY_TYPE_C = ? ORDER BY T.PHY_CODE ASC
SELECT (SELECT T1.ITEM_NAME
FROM COM_BASE_PHY_ITEM T1
WHERE T1.ITEM_CODE = T.ITEM_CODE_W) ITEM_NAME_W,
T.ITEM_CODE_W
FROM COM_BASE_PHY_R_POS T
WHERE T.VALIDFLAG = '1'
GROUP BY T.ITEM_CODE_W
ORDER BY T.ITEM_CODE_W ASC
SELECT (SELECT T1.ITEM_NAME
FROM COM_BASE_PHY_ITEM T1
WHERE T1.ITEM_CODE = T.ITEM_CODE_F)ITEM_NAME_F,
T.ITEM_CODE_F
FROM COM_BASE_PHY_R_ITEM T
WHERE T.VALIDFLAG = '1'
GROUP BY T.ITEM_CODE_F
ORDER BY T.ITEM_CODE_F ASC
SELECT (SELECT T1.ITEM_NAME
FROM COM_BASE_PHY_ITEM T1
WHERE T1.ITEM_CODE = T.ITEM_CODE_C)ITEM_NAME_C,
T.ITEM_CODE_C
FROM COM_BASE_PHY_R_ITEM T
WHERE T.VALIDFLAG = '1'
GROUP BY ITEM_CODE_C
ORDER BY T.ITEM_CODE_C ASC
SELECT *
FROM MAT_BC_M T
WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.BATCH_NO = '#BATCH_NO#'
AND T.PLINE_CODE = '#PLINE_CODE#'
AND ROWNUM = 1
SELECT * FROM PLN_ORDER_ZG_S T WHERE T.PRO_PLAN_ID = '#PRO_PLAN_ID#' AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
INSERT INTO QCM_ZC_CHECKCONSIGN(
CHECK_NO,
LOT_NO,
JUDGE_STOVE_NO,
BATCH_NO,
STOVE_NO,
PROCESS_CODE,
PLINE_CODE,
PLINE_NAME,
MATERIAL_NO,
MATERIAL_NAME,
PRODUCCODE,
PRODUCNAME,
STEELCODE,
STEELNAME,
GRADECODE,
GRADENAME,
SPEC_CODE,
SPEC_NAME,
MODEL_CODE,
MODEL_DESC,
STD_CODE,
STD_NAME,
STD_STYLE,
STD_STYLE_DESC,
ACT_DIMATER,
ACT_HEIGHT,
ACT_LEN_MIN,
ACT_LEN_MAX,
PRO_ORDER_ID,
GX_PLAN_NO,
ORD_LN_DLY_PK,
CRAF_NO,
CRAFT_SEQ,
INDEX_SEQ,
STEEL_STANDRAD,
CIC,
PIC,
VALIDFLAG,
CONSIGN_NAME,
CONSIGN_TIME,
CONSIGN_MEMO,
CRAFT_SOURCE,
QUOTE_STATE)
VALUES(
'#CHECK_NO#',
'#LOT_NO#',
'#JUDGE_STOVE_NO#',
'#BATCH_NO#',
'#STOVE_NO#',
'#PROCESS_CODE#',
'#PLINE_CODE#',
'#PLINE_NAME#',
'#MATERIAL_NO#',
'#MATERIAL_NAME#',
'#PRODUCCODE#',
'#PRODUCNAME#',
'#STEELCODE#',
'#STEELNAME#',
'#GRADECODE#',
'#GRADENAME#',
'#SPEC_CODE#',
'#SPEC_NAME#',
'#MODEL_CODE#',
'#MODEL_DESC#',
'#STD_CODE#',
'#STD_NAME#',
'#STD_STYLE#',
'#STD_STYLE_DESC#',
'#ACT_DIMATER#',
'#ACT_HEIGHT#',
'#ACT_LEN_MIN#',
'#ACT_LEN_MAX#',
'#PRO_ORDER_ID#',
'#GX_PLAN_NO#',
'#ORD_LN_DLY_PK#',
'#CRAF_NO#',
'#CRAFT_SEQ#',
'#INDEX_SEQ#',
'#STEEL_STANDRAD#',
'#CIC#',
'#PIC#',
'#VALIDFLAG#',
'#CONSIGN_NAME#',
SYSDATE,
'#CONSIGN_MEMO#',
'#CRAFT_SOURCE#',
'#QUOTE_STATE#')
INSERT INTO QCM_ZC_CHECKCONSIGN_DETAIL(
CHECK_NO,
BATCH_NO,
SAMPLE_NO,
PHY_CODE_MAX,
PHY_NAME_MAX,
RATE,
DESC_RATE)
VALUES(
'#CHECK_NO#',
'#BATCH_NO#',
'#SAMPLE_NO#',
'#PHY_CODE_MAX#',
'#PHY_NAME_MAX#',
'#RATE#',
'#DESC_RATE#')
INSERT INTO QCM_JHY_PHYRESULT(
SAMPLE_ID,
SAMPLE_NO,
INDEX_SEQ,
LOT_NO,
STOVE_NO,
JUDGE_STOVE_NO,
BATCH_NO,
SAMPLE_TYPE,
CONSIGNER,
PLINE_CODE,
PHY_CODE_MAX,
PHY_NAME_MAX,
PHY_CODE_MIN,
PHY_NAME_MIN,
PHY_CODE,
PHY_NAME,
ITEM_CODE_F,
ITEM_NAME_F,
ITEM_CODE_W,
ITEM_NAME_W,
ITEM_CODE_S,
ITEM_NAME_S,
VALUE1,
VALUE2,
VALUE3,
VALUE4,
VALUE5,
VALUE6,
VALUE7,
VALUE8,
VALUE9,
VALUE10,
VALUE11,
VALUE12,
VALUE13,
VALUE14,
VALUE15,
AVERAGE,
CREATE_NAME,
CREATE_TIME,
VALIDFLAG,
ORIGINAL_AREA,
IS_GOOD,
IS_DEFECT,
CHECK_TEMP,
SAMPLE_SIZE,
CHECK_TEMP_CODE,
SAMPLE_SIZE_CODE)
VALUES(
'#SAMPLE_ID#',
'#SAMPLE_NO#',
'#INDEX_SEQ#',
'#LOT_NO#',
'#STOVE_NO#',
'#JUDGE_STOVE_NO#',
'#BATCH_NO#',
'#SAMPLE_TYPE#',
'#CONSIGNER#',
'#PLINE_CODE#',
(SELECT T.PHY_CODE FROM COM_BASE_PHY_B T,COM_BASE_PHY_C T1 WHERE T.PHY_CODE = T1.PHY_TYPE_M
AND T1.PHY_CODE = '#PHY_CODE_MIN#'),
(SELECT T.PHY_TYPE FROM COM_BASE_PHY_B T,COM_BASE_PHY_C T1 WHERE T.PHY_CODE = T1.PHY_TYPE_M
AND T1.PHY_CODE = '#PHY_CODE_MIN#'),
'#PHY_CODE_MIN#',
'#PHY_NAME_MIN#',
'#PHY_CODE#',
'#PHY_NAME#',
'#ITEM_CODE_F#',
'#ITEM_NAME_F#',
'#ITEM_CODE_W#',
'#ITEM_NAME_W#',
'#ITEM_CODE_S#',
'#ITEM_NAME_S#',
'#VALUE1#',
'#VALUE2#',
'#VALUE3#',
'#VALUE4#',
'#VALUE5#',
'#VALUE6#',
'#VALUE7#',
'#VALUE8#',
'#VALUE9#',
'#VALUE10#',
'#VALUE11#',
'#VALUE12#',
'#VALUE13#',
'#VALUE14#',
'#VALUE15#',
'#AVERAGE#',
'#CREATE_NAME#',
SYSDATE,
'#VALIDFLAG#',
'#ORIGINAL_AREA#',
'#IS_GOOD#',
'#IS_DEFECT#',
'#CHECK_TEMP#',
'#SAMPLE_SIZE#',
'#CHECK_TEMP_CODE#',
'#SAMPLE_SIZE_CODE#'
)
UPDATE QCM_JHY_PHYRESULT T
SET
T.VALUE1 = '#VALUE1#',
T.VALUE2 = '#VALUE2#',
T.VALUE3 = '#VALUE3#',
T.VALUE4 = '#VALUE4#',
T.VALUE5 = '#VALUE5#',
T.VALUE6 = '#VALUE6#',
T.VALUE7 = '#VALUE7#',
T.VALUE8 = '#VALUE8#',
T.VALUE9 = '#VALUE9#',
T.VALUE10 = '#VALUE10#',
T.VALUE11 = '#VALUE11#',
T.VALUE12 = '#VALUE12#',
T.VALUE13 = '#VALUE13#',
T.VALUE14 = '#VALUE14#',
T.VALUE15 = '#VALUE15#',
T.AVERAGE = '#AVERAGE#',
T.IS_GOOD = '#IS_GOOD#',
T.IS_DEFECT = '#IS_DEFECT#',
T.CHECK_TEMP_CODE = '#ITEM_CODE_W1#',
T.CHECK_TEMP = '#ITEM_NAME_W1#',
T.SAMPLE_SIZE_CODE = '#ITEM_CODE_S1#',
T.SAMPLE_SIZE = '#ITEM_NAME_S1#',
T.ITEM_CODE_F = '#ITEM_CODE_F#',
T.ITEM_NAME_F = '#ITEM_NAME_F#',
T.ITEM_CODE_W = '#ITEM_CODE_W#',
T.ITEM_NAME_W = '#ITEM_NAME_W#',
T.ITEM_CODE_S = '#ITEM_CODE_S#',
T.ITEM_NAME_S = '#ITEM_NAME_S#'
WHERE
T.SAMPLE_ID = '#SAMPLE_ID#'
AND T.SAMPLE_NO = '#SAMPLE_NO#'
AND T.PHY_CODE_MIN = '#PHY_CODE_MIN#'
AND T.PHY_CODE = '#PHY_CODE#'
DELETE FROM QCM_JHY_PHYRESULT T
WHERE T.SAMPLE_ID = '#SAMPLE_ID#'
AND T.SAMPLE_NO = '#SAMPLE_NO#'
AND T.PHY_CODE_MIN = '#PHY_CODE_MIN#'
AND T.PHY_CODE = '#PHY_CODE#'
DECLARE
V_COUNT YDM_BC_INLIST.ACT_COUNT%TYPE := NULL;
V_ACOUNT YDM_BC_INLIST.ACT_COUNT%TYPE := NULL;
BEGIN
SELECT COUNT(1)
INTO V_COUNT
FROM QCM_JHY_PHYRESULT T
WHERE T.SAMPLE_ID = '#SAMPLE_ID#'
AND T.SAMPLE_NO = '#SAMPLE_NO#'
AND T.PHY_CODE_MIN = '#PHY_CODE_MIN#';
IF (V_COUNT = 0) THEN
DELETE FROM QCM_ZC_CHECKCONSIGN_DETAIL T
WHERE T.CHECK_NO = '#SAMPLE_ID#'
AND T.SAMPLE_NO = '#SAMPLE_NO#'
AND T.PHY_CODE_MAX = '#PHY_CODE_MIN#';
END IF;
SELECT COUNT(1)
INTO V_ACOUNT
FROM QCM_ZC_CHECKCONSIGN_DETAIL T
WHERE T.CHECK_NO = '#SAMPLE_ID#';
IF(V_ACOUNT = 0)THEN
DELETE FROM QCM_ZC_CHECKCONSIGN T WHERE T.CHECK_NO = '#SAMPLE_ID#';
END IF;
END;
SELECT COUNT(1) ACOUNT
FROM QCM_ZC_CHECKCONSIGN T
WHERE T.CHECK_NO = '#CHECK_NO#'
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.BATCH_NO = '#BATCH_NO#'
AND T.PROCESS_CODE = 'D'
SELECT COUNT(1) ACOUNT
FROM QCM_ZC_CHECKCONSIGN_DETAIL T
WHERE T.CHECK_NO = '#CHECK_NO#'
AND T.SAMPLE_NO = '#SAMPLE_NO#'
AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
SELECT *
FROM QCM_ZG_JUGDE_APPLY T
WHERE T.JUDGE_STOVE_NO = ?
AND T.BATCH_NO = ?
AND T.PLINE_CODE IN ('C065', 'C066')
AND T.PROCESS_CODE = 'D'
AND T.IS_FLAG = '0'
AND T.IS_ALL_SCRAP = '0'
--AND T.VALIDFLAG = '00'
UPDATE QCM_ZG_JUGDE_APPLY T
SET T.TESTING_STANDAR = '#TESTING_STANDAR#',
T.TESTING_GRADE = '#TESTING_GRADE#',
T.TESTING_TYPE = '#TESTING_TYPE#',
T.TESTING_GRADE1 = '#TESTING_GRADE1#',
T.TESTING_TYPE1 = '#TESTING_TYPE1#',
T.NOTCH_INFO = '#NOTCH_INFO#',
T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
T.NOTCH_DEPTH = '#NOTCH_DEPTH#'
WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#'
AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#'
AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
AND T.BATCH_NO = '#BATCH_NO#'
AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
AND T.PROCESS_CODE = 'D'
AND T.PLINE_CODE IN ('C065', 'C066')
AND T.IS_FLAG = '0'
AND T.IS_ALL_SCRAP = '0'
-- AND T.VALIDFLAG = '00'