| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943 |
- <?xml version="1.0" encoding="UTF-8"?>
- <queryMap desc = "镦拔扩分批取样">
- <query id = "FrmVrpBatchSaplmeNew.doQueryPlan" desc = "查询轧管炉计划">
- SELECT T.*,
- (SELECT C.CRAFT_PATH
- FROM CRAFT_ORD_DESIGN C
- WHERE C.ORD_LN_PK = T.ORD_LN_PK
- AND C.CRAFT_SEQ = T.CRAFT_SEQ) CRAFT_PATH
- FROM (SELECT T.*,
- S.ORD_LN_PK,
- (SELECT T1.ABRVITION
- FROM SLM_BASE_CUSTOMER T1
- WHERE T1.CUSTOMER_NO = S.FINAL_USER) ABRVITION,
- (SELECT S.PDEPT_NAME
- FROM SLM_ORDER_LINE_PRDCR_LST T, SLM_BASE_PRDCR_DEPT S
- WHERE T.PDEPT_NO = S.PDEPT_NO
- AND T.PROCESS_CODE = 'E'
- AND T.PRDCR_NO = T.PRDCR_NO
- AND ROWNUM = 1) PDEPT_NAME
- FROM PLN_ZY_DBK_M T, PLN_SALEORD S
- WHERE T.ORD_LN_DLY_PK = S.ORD_LN_DLY_PK) T
- WHERE 1 = 1
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryBasePlan" desc = "查询炉计划基础信息">
- SELECT T.* FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ?
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryCheckPlan" desc = "查询检验计划主表信息">
- SELECT T.*
- FROM CRAFT_SAMPLING_M T WHERE T.PROCESS_CODE = 'E'
- AND T.ORD_LN_PK = ?
- AND T.CRAFT_NO = ?
- AND T.CRAFT_SEQ = ?
- AND (T.STOVE_NUM = ? OR T.STOVE_NUM IS NULL)
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryCheckPlanDetial" desc = "查询检验计划从表信息">
- SELECT T.*
- FROM CRAFT_SAMPLING_DETAIL T WHERE T.PROCESS_CODE = 'E'
- AND T.ORD_LN_PK = ?
- AND T.CRAFT_NO = ?
- AND T.CRAFT_SEQ = ?
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryRack" desc = "查询管号队列">
- SELECT ROWNUM SEQ,
- MAT_NO,
- SAMPLE_PIPE_LEN_A,
- SAMPLE_PIPE_LEN_B,
- HEAT_PLAN_NO,
- JUDGE_STOVE_NO,
- PHY_BATCH_NO,
- MAT_STATUS,
- IS_SAMPLE_PIPE
- FROM (SELECT T.MAT_NO,
- T.SAMPLE_PIPE_LEN_A,
- T.SAMPLE_PIPE_LEN_B,
- T.HEAT_PLAN_NO,
- T.JUDGE_STOVE_NO,
- T.PHY_BATCH_NO,
- DECODE(T.MAT_STATUS, '00', '是', '否') MAT_STATUS,
- T.IS_SAMPLE_PIPE
- FROM PORT_VRP_BATCH_SAMPLE_RESULT T
- WHERE T.HEAT_PLAN_NO = ?
- AND T.JUDGE_STOVE_NO = ?
- ORDER BY T.MAT_STATUS,T.MAT_NO ASC)
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updateMilPlan" desc = "修改炉计划标识">
- UPDATE PLN_ZY_DBK_M T
- SET T.IS_BATCH = '#IS_BATCH#'
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updatePortMilResult" desc = "修改样管管号队列">
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.IS_SAMPLE_PIPE = '#IS_SAMPLE_PIPE#',
- T.SAMPLE_PIPE_LEN_A = '#SAMPLE_PIPE_LEN_A#',
- T.PHY_BATCH_NO = '#PHY_BATCH_NO#',
- T.PHY_CODE_GROUP = '#PHY_CODE_GROUP#',
- T.SAMPLE_PIPE_LEN_B = '#SAMPLE_PIPE_LEN_B#',
- T.PHY_CODE_GROUPB = '#PHY_CODE_GROUPB#',
- T.SAMPLE_PIPE_LEN = TO_NUMBER(NVL('#SAMPLE_PIPE_LEN_A#',0))+TO_NUMBER(NVL('#SAMPLE_PIPE_LEN_B#',0)),
- T.GET_SAMPLE_NAME = '#GET_SAMPLE_NAME#',
- T.GET_SAMPLE_TIME = TO_DATE('#GET_SAMPLE_TIME#','YYYY-MM-DD HH24:MI:SS'),
- T.GET_SAMPLE_SHIFT = '#GET_SAMPLE_SHIFT#',
- T.GET_SAMPLE_CLASS = '#GET_SAMPLE_CLASS#'
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.MAT_NO = '#MAT_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updateMilPortBacth" desc = "分批完成修改进程管号队列">
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET
- T.PHY_BATCH_NO = '#PHY_BATCH_NO#'
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.MAT_NO = '#MAT_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updatePortMilResultSample" desc = "分批取样完成修改管号队列">
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.IS_SAMPLE_PIPE = '#IS_SAMPLE_PIPE#',
- T.SAMPLE_PIPE_LEN_A = '#SAMPLE_PIPE_LEN_A#',
- T.PHY_CODE_GROUP = '#PHY_CODE_GROUP#',
- T.SAMPLE_PIPE_LEN_B = '#SAMPLE_PIPE_LEN_B#',
- T.PHY_CODE_GROUPB = '#PHY_CODE_GROUPB#',
- T.SAMPLE_PIPE_LEN = TO_NUMBER(NVL('#SAMPLE_PIPE_LEN_A#',0))+TO_NUMBER(NVL('#SAMPLE_PIPE_LEN_B#',0)),
- T.GET_SAMPLE_NAME = '#GET_SAMPLE_NAME#',
- T.GET_SAMPLE_TIME = TO_DATE('#GET_SAMPLE_TIME#','YYYY-MM-DD HH24:MI:SS'),
- T.GET_SAMPLE_SHIFT = '#GET_SAMPLE_SHIFT#',
- T.GET_SAMPLE_CLASS = '#GET_SAMPLE_CLASS#'
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.MAT_NO = '#MAT_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.selectIsBacth" desc = "查询分批取样标识">
- SELECT T.IS_BATCH FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.cancelBatchSeting" desc = "撤销分批取样">
- DECLARE
- BEGIN
- UPDATE PLN_ZY_DBK_M T
- SET T.IS_BATCH = '0'
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.PHY_BATCH_NO = '', T.IS_SAMPLE_PIPE = '0', T.SAMPLE_PIPE_LEN = '',T.SAMPLE_PIPE_LEN_A = '',T.SAMPLE_PIPE_LEN_B = '',
- T.GET_SAMPLE_NAME = '',
- T.GET_SAMPLE_TIME = '',
- T.GET_SAMPLE_SHIFT = '',
- T.GET_SAMPLE_CLASS = ''
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
- END;
- </query>
- <query id = "FrmVrpBatchSaplmeNew.cancelBatch" desc = "撤销分批">
- DECLARE
- BEGIN
- UPDATE PLN_ZY_DBK_M T
- SET T.IS_BATCH = '0'
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.PHY_BATCH_NO = ''
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
- END;
- </query>
- <query id = "FrmVrpBatchSaplmeNew.cancelGetSample" desc = "撤销取样">
- DECLARE
- BEGIN
- UPDATE PLN_ZY_DBK_M T
- SET T.IS_BATCH = '1'
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.IS_SAMPLE_PIPE = '0', T.SAMPLE_PIPE_LEN = '',T.SAMPLE_PIPE_LEN_A = '',T.SAMPLE_PIPE_LEN_B = '',
- T.GET_SAMPLE_NAME = '',
- T.GET_SAMPLE_TIME = '',
- T.GET_SAMPLE_SHIFT = '',
- T.GET_SAMPLE_CLASS = ''
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
- END;
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQuerySampleInfo" desc = "查询样管基础信息">
- SELECT
- PHY_BATCH_NO,
- MAT_NO,
- SAMPLE_PIPE_LEN_A,
- SAMPLE_PIPE_LEN_B,
- PHY_CODE_GROUP,
- PHY_CODE_GROUPB
- FROM PORT_VRP_BATCH_SAMPLE_RESULT
- WHERE IS_SAMPLE_PIPE = '1'
- AND HEAT_PLAN_NO = ?
- AND JUDGE_STOVE_NO = ?
- ORDER BY PHY_BATCH_NO,MAT_NO
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryChem" desc = "查询成分信息">
- SELECT T.DESGIN_KEY,
- T.CIC,
- T.USE_CODE,
- T.USE_DESC,
- T.SPECL_FL,
- T.INDEX_SEQ,
- T.CHEM_CODE,
- T.CHEM_NAME,
- T.CHEM_TYPE,
- T.CHEM_FORMULA,
- T.ISCHECK,
- T.ISJUDGE,
- T.ISQUOTE,
- T.COMPLEX_TYPE,
- T.STDMIN_SIGN,
- T.STDMIN,
- T.STDMAX_SIGN,
- T.STDMAX,
- T.STDTARGET,
- T.MODEL_CODE,
- T.MODEL_DESC,
- T.STDMEMO,
- T.ELE_CODE,
- T.ELE_NAME,
- T.ELE_MIN_SIGN,
- T.ELE_MIN,
- T.ELE_MAX_SIGN,
- T.ELE_MAX,
- T.SIZE_CODE2,
- T.SIZE_NAME2,
- T.SIZE_MIN_SIGN2,
- T.SIZE_MIN2,
- T.SIZE_MAX_SIGN2,
- T.SIZE_MAX2,
- T.SIZE_CODE,
- T.SIZE_NAME,
- T.SIZE_MIN_SIGN,
- T.SIZE_MIN,
- T.SIZE_MAX_SIGN,
- T.SIZE_MAX,
- T.SPEC_JG,
- T.SPEC_JG_DESC,
- T.REP_CODE,
- T.REP_NAME,
- T.REP_MIN_SIGN,
- T.REP_MIN,
- T.REP_MAX_SIGN,
- T.REP_MAX,
- T.REP_VAL
- FROM PLN_ZY_DBK_M S,
- PLN_SALEORD T2,
- CRAFT_ORD_DESIGN T3,
- CRAFT_ORD_DESIGN_STD_CIC T
- 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.CHEM_TYPE = 'A'
- AND S.IF_PRODUCT = '1'
- AND S.CIC = T.CIC
- AND (T.ISCHECK = '1' OR T.ISJUDGE = '1')
- AND T.CHEM_CODE NOT IN ('C012', 'C013', 'C014')
- AND T.PROCESS_CODE = 'A'
- AND S.PRO_PLAN_ID = ?
- AND S.GX_PLAN_NO = ?
- AND S.JUDGE_STOVE_NO = ?
- UNION ALL
- SELECT T.DESGIN_KEY,
- T.CIC,
- T.USE_CODE,
- T.USE_DESC,
- T.SPECL_FL,
- T.INDEX_SEQ,
- T.CHEM_CODE,
- T.CHEM_NAME,
- T.CHEM_TYPE,
- T.CHEM_FORMULA,
- T.ISCHECK,
- T.ISJUDGE,
- T.ISQUOTE,
- T.COMPLEX_TYPE,
- T.STDMIN_SIGN,
- T.STDMIN,
- T.STDMAX_SIGN,
- T.STDMAX,
- T.STDTARGET,
- T.MODEL_CODE,
- T.MODEL_DESC,
- T.STDMEMO,
- T.ELE_CODE,
- T.ELE_NAME,
- T.ELE_MIN_SIGN,
- T.ELE_MIN,
- T.ELE_MAX_SIGN,
- T.ELE_MAX,
- T.SIZE_CODE2,
- T.SIZE_NAME2,
- T.SIZE_MIN_SIGN2,
- T.SIZE_MIN2,
- T.SIZE_MAX_SIGN2,
- T.SIZE_MAX2,
- T.SIZE_CODE,
- T.SIZE_NAME,
- T.SIZE_MIN_SIGN,
- T.SIZE_MIN,
- T.SIZE_MAX_SIGN,
- T.SIZE_MAX,
- T.SPEC_JG,
- T.SPEC_JG_DESC,
- T.REP_CODE,
- T.REP_NAME,
- T.REP_MIN_SIGN,
- T.REP_MIN,
- T.REP_MAX_SIGN,
- T.REP_MAX,
- T.REP_VAL
- FROM PLN_ZY_DBK_M S,
- PLN_SALEORD T2,
- CRAFT_ORD_DESIGN T3,
- CRAFT_ORD_DESIGN_STD_CIC T
- 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.CHEM_TYPE = 'A'
- AND T.CHEM_CODE IN ('C012', 'C013', 'C014')
- AND T.SPECL_FL = '1'
- AND (T.ISCHECK = '1' OR T.ISJUDGE = '1')
- AND S.IF_PRODUCT = '1'
- AND S.PRO_PLAN_ID = ?
- AND S.GX_PLAN_NO = ?
- AND S.JUDGE_STOVE_NO = ?
- UNION ALL
- SELECT T.DESGIN_KEY,
- T.CIC,
- T.USE_CODE,
- T.USE_DESC,
- T.SPECL_FL,
- T.INDEX_SEQ,
- T.CHEM_CODE,
- T.CHEM_NAME,
- T.CHEM_TYPE,
- T.CHEM_FORMULA,
- T.ISCHECK,
- T.ISJUDGE,
- T.ISQUOTE,
- T.COMPLEX_TYPE,
- T.STDMIN_SIGN,
- T.STDMIN,
- T.STDMAX_SIGN,
- T.STDMAX,
- T.STDTARGET,
- T.MODEL_CODE,
- T.MODEL_DESC,
- T.STDMEMO,
- T.ELE_CODE,
- T.ELE_NAME,
- T.ELE_MIN_SIGN,
- T.ELE_MIN,
- T.ELE_MAX_SIGN,
- T.ELE_MAX,
- T.SIZE_CODE2,
- T.SIZE_NAME2,
- T.SIZE_MIN_SIGN2,
- T.SIZE_MIN2,
- T.SIZE_MAX_SIGN2,
- T.SIZE_MAX2,
- T.SIZE_CODE,
- T.SIZE_NAME,
- T.SIZE_MIN_SIGN,
- T.SIZE_MIN,
- T.SIZE_MAX_SIGN,
- T.SIZE_MAX,
- T.SPEC_JG,
- T.SPEC_JG_DESC,
- T.REP_CODE,
- T.REP_NAME,
- T.REP_MIN_SIGN,
- T.REP_MIN,
- T.REP_MAX_SIGN,
- T.REP_MAX,
- T.REP_VAL
- FROM PLN_ZY_DBK_M S,
- PLN_SALEORD T2,
- CRAFT_ORD_DESIGN T3,
- CRAFT_ORD_DESIGN_STD_CIC T
- 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.CHEM_TYPE = 'A'
- AND T.CHEM_CODE IN ('C012', 'C013', 'C014')
- AND T.SPECL_FL = '0'
- AND (T.ISCHECK = '1' OR T.ISJUDGE = '1')
- AND NOT EXISTS (SELECT 1
- FROM CRAFT_ORD_DESIGN_STD_CIC E2
- WHERE E2.CHEM_CODE = T.CHEM_CODE
- AND E2.DESGIN_KEY = T.DESGIN_KEY
- AND E2.SPECL_FL = '1')
- AND S.IF_PRODUCT = '1'
- AND S.PRO_PLAN_ID = ?
- AND S.GX_PLAN_NO = ?
- AND S.JUDGE_STOVE_NO = ?
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryPhy" desc = "查询理化详细信息">
- SELECT *
- 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_MIN ||
- NVL2(S1.SPLINE_ITEM_CODE_F, '_' || S1.SPLINE_ITEM_CODE_F, S1.SPLINE_ITEM_CODE_S) ||
- NVL2(T.ITEM_CODE_W, '_' || T.ITEM_CODE_W, S1.SPLINE_ITEM_CODE_S) ||
- NVL2(S1.SPLINE_ITEM_CODE_S, '_' || S1.SPLINE_ITEM_CODE_S, S1.SPLINE_ITEM_CODE_S) SAMPLE_KEY, --试样组方向温度尺寸
-
- T.PHY_NAME_MIN ||
- NVL2(S1.SPLINE_ITEM_NAME_F, '_' || S1.SPLINE_ITEM_NAME_F, S1.SPLINE_ITEM_NAME_F) ||
- NVL2(T.ITEM_NAME_W, '_' || T.ITEM_NAME_W, T.ITEM_NAME_W) ||
- NVL2(S1.SPLINE_ITEM_NAME_S, '_' || S1.SPLINE_ITEM_NAME_S, S1.SPLINE_ITEM_NAME_S) SAMPLE_KEY_DESC, --试样组描述
-
- 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,
- S1.SPLINE_ITEM_CODE_S,
- S1.SPLINE_ITEM_NAME_S,
- S1.SPLINE_ITEM_CODE_F,
- S1.SPLINE_ITEM_NAME_F,
- 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,
- 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 PLN_ZY_DBK_M 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 = 'E'
- AND S.PRO_PLAN_ID = ?
- AND S.GX_PLAN_NO = ?
- AND S.JUDGE_STOVE_NO = ?) T
- WHERE RN = '1'
- --ORDER BY T.PHY_CODE_MAX,
- -- T.PHY_CODE_MIN,
- -- T.PHY_CODE,
- -- T.ITEM_CODE_F,
- -- T.ITEM_CODE_W,
- -- T.ITEM_CODE_S
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryPhyRate" desc = "查询取样频次">
- SELECT *
- 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,
-
- S1.RATE,
- S1.DESC_RATE,
- S1.TOP_STOVE,
- S1.LOOP_VALUE,
- ROW_NUMBER() OVER(PARTITION BY T.DESGIN_KEY, T.PHY_CODE_MAX, T.PHY_CODE_MIN ORDER BY T.SPECL_FL DESC) RN
- FROM PLN_ZY_DBK_M 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 = 'E'
- AND S.PRO_PLAN_ID = ?
- AND S.GX_PLAN_NO = ?
- AND S.JUDGE_STOVE_NO = ?) T
- WHERE RN = '1'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.CheckConsingCount" desc = "查询已委托炉数">
- SELECT NVL(COUNT(1),0)ACOUNT
- FROM PIPE_CHECKCONSIGN_BASEINFO T
- WHERE T.LOT_NO = '#ZY_BATCH_ID#'
- AND T.PROCESS_CODE = 'E'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.SelectSeqCheckNo" desc = "查询取第几炉结果作为当前炉的结果">
- SELECT CHECK_NO FROM (SELECT ROWNUM SEQ,CHECK_NO FROM ( SELECT T.CHECK_NO
- FROM PIPE_CHECKCONSIGN_BASEINFO T
- WHERE T.LOT_NO = '#ZY_BATCH_ID#'
- AND T.PROCESS_CODE = 'E'
- AND T.CHECK_COUNT = '0'
- ORDER BY T.CONSIGN_TIME ASC)) WHERE SEQ = ?
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryPhySamp" desc = "查询取样要求">
- SELECT T.*
- FROM (SELECT T.*,
- ROW_NUMBER() OVER(PARTITION BY T.DESGIN_KEY, T.PHY_CODE_MIN,T.ITEM_CODE_F,T.ITEM_CODE_W,T.ITEM_CODE_C ORDER BY T.SPECL_FL DESC) RN
- FROM (SELECT (SELECT A.PHY_CODE
- 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') PHY_CODE_MAX,
- (SELECT A.PHY_TYPE
- 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') PHY_NAME_MAX,
- (SELECT B.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.DESGIN_KEY,
- T.PIC,
- T.SIC,
- T.PHY_CODE_MIN,
- T.PHY_NAME_MIN,
- T.STD_CODE,
- T.STD_NAME,
- T.LENGTH,
- T.DESC_LENGTH,
- T.RATE,
- T.DESC_RATE,
- T.SSC_CONDITION,
- T.TOP_STOVE,
- T.LOOP_VALUE,
- T.DESC_COUNT,
- T.POSITION,
- T.DESC_POSITION,
- T.SAMPLE_COUNT,
- T.MEMO,
- T.SAMPLE_STYLE,
- T.BATCH_CNT,
- T.WIDTH,
- T.BATCH_UNIT,
- T.EIC,
- T.PHY_DIR,
- T.SIZE_DESC,
- T.ITEM_CODE_F,
- T.ITEM_CODE_W,
- T.ITEM_CODE_C,
-
- T.STD_CODE_TEST,
- T.STD_NAME_TEST,
- T.SPLINE_ITEM_CODE_S,
- T.SPLINE_ITEM_NAME_S,
- T.SPLINE_ITEM_CODE_F,
- T.SPLINE_ITEM_NAME_F,
- DECODE(T.SAMPLE_STYLE,
- '408101',
- '片状',
- '408102',
- '环状') AS DESC_SAMPLE_STYLE,
- (SELECT SPLINE_NO
- FROM COM_BASE_SPLINE C
- WHERE C.EIC = T.EIC) SPLINE_NO, --试样编码
- (SELECT DISTINCT M.SPECL_FL
- FROM CRAFT_ORD_DESIGN_STD_PIC M
- WHERE M.DESGIN_KEY = T.DESGIN_KEY
- AND M.PIC = T.PIC) SPECL_FL
-
- FROM PLN_ZY_DBK_M S,
- PLN_SALEORD T2,
- CRAFT_ORD_DESIGN T3,
- CRAFT_ORD_DESIGN_STD_PIC_SMP T
- 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.PROCESS_CODE = 'E'
- AND S.PRO_PLAN_ID = ?
- AND S.GX_PLAN_NO = ?
- AND S.JUDGE_STOVE_NO = ?
- AND T.PHY_CODE_MIN = ?) T) T
- WHERE RN = '1'
- ORDER BY T.PHY_CODE_MAX,
- T.PHY_CODE_MIN,
- T.ITEM_CODE_F,
- T.ITEM_CODE_W,
- T.ITEM_CODE_C
- </query>
- <query id = "FrmVrpBatchSaplmeNew.getCheckNo" desc = "生成检验编号">
- SELECT ? || REGEXP_REPLACE('#JUDGE_STOVE_NO#', '-.*', '') ||
- LPAD(NVL(MAX(REPLACE(T.CHECK_NO,
- ? ||
- REGEXP_REPLACE('#JUDGE_STOVE_NO#', '-.*', ''),
- '')),
- 0) + 1,
- 1,
- 0) CHECK_NO
- FROM PIPE_CHECKCONSIGN_BASEINFO T
- WHERE T.HEAT_NO = REGEXP_REPLACE('#JUDGE_STOVE_NO#', '-.*', '')
- AND T.PROCESS_CODE = ?
- AND T.CHECK_COUNT = '0'
- AND T.CRAFT_SOURCE IN ('0', '1')
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updateMilPlanIsBatch" desc = "修改炉计划标识">
- UPDATE PLN_ZY_DBK_M T SET T.IS_BATCH = '#IS_BATCH#',T.CHECK_NO = '#CHECK_NO#' WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryDetialSampleNo" desc = "查询检验委托试样组信息">
- SELECT S.*
- FROM PIPE_CHECKCONSIGN_BASEINFO T, PIPE_CHECKCONSIGN_DETAIL S
- WHERE T.CHECK_NO = S.CHECK_NO
- AND T.PROCESS_CODE = 'E'
- AND S.CHECK_NO = ?
- ORDER BY S.BATCH_NO,S.SAMPLE_NO
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updateMatBcIsSample" desc = "重新标记样管">
- DECLARE
- V_MAT_NO MAT_BC_M.ZG_MAT_NO%TYPE := NULL;
- BEGIN
- UPDATE MAT_BC_M T
- SET T.QCM_STAUS = '22',
- T.JUDGE_RESULT_CODE = '40740705',
- T.JUDGE_RESULT = '废品',
- T.JUDGE_MAKER = 'SYSTEM'
- WHERE T.ZG_MAT_NO = '#MAT_NO#'
- AND T.BATCH_NO = '#BATCH_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.MAT_STATUS = '10'
- WHERE T.MAT_NO = '#MAT_NO#'
- AND T.MAT_STATUS = '00';
- SELECT MAT_NO
- INTO V_MAT_NO
- FROM (SELECT T.MAT_NO
- FROM PORT_VRP_BATCH_SAMPLE_RESULT T
- WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.BATCH_NO = '#BATCH_NO#'
- AND T.MAT_STATUS = '00'
- AND T.IS_SAMPLE_PIPE = '0'
- ORDER BY T.MAT_NO ASC)
- WHERE ROWNUM = 1;
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.IS_SAMPLE_PIPE = '1'
- WHERE T.MAT_NO = V_MAT_NO;
- UPDATE MAT_BC_M T SET T.SAMPLE_FLAG = '1' WHERE T.ZG_MAT_NO = V_MAT_NO;
- END;
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updatePortSql" desc = "删除新样管">
- DECLARE
- BEGIN
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.IS_SAMPLE_PIPE = '0'
- WHERE T.MAT_NO = '#MAT_NO#'
- AND T.MAT_STATUS = '00';
- UPDATE MAT_BC_M T
- SET T.QCM_STAUS = '00',
- T.JUDGE_RESULT_CODE = '',
- T.JUDGE_RESULT = '',
- T.JUDGE_MAKER = ''
- WHERE T.ZG_MAT_NO = '#MAT_NO#';
- END;
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updatePortOldSql" desc = "恢复旧样管">
- DECLARE
- BEGIN
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.MAT_STATUS = '00'
- WHERE T.MAT_NO = '#MAT_NO#'
- AND T.MAT_STATUS = '10'
- AND T.IS_SAMPLE_PIPE = '1';
- UPDATE MAT_BC_M T
- SET T.QCM_STAUS = '00',
- T.JUDGE_RESULT_CODE = '',
- T.JUDGE_RESULT = '',
- T.JUDGE_MAKER = ''
- WHERE T.ZG_MAT_NO = '#MAT_NO#';
- END;
- </query>
- <query id = "FrmVrpBatchSaplmeNew.deleteConsingCheckNo" desc = "删除产销检验记录">
- DECLARE
- BEGIN
- DELETE FROM QCM_ZC_CHECKCONSIGN T WHERE T.CHECK_NO = '#CHECK_NO#';
- DELETE FROM QCM_ZC_CHECKCONSIGN_DETAIL T WHERE T.CHECK_NO = '#CHECK_NO#';
- END;
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryRepeatRack" desc = "查询管号队列(复取样)">
- <![CDATA[
- SELECT ROWNUM SEQ,
- MAT_NO,
- RESAMPLE_PIPE_LEN_A,
- RESAMPLE_PIPE_LEN_B,
- SAMPLE_PIPE_LEN_A,
- SAMPLE_PIPE_LEN_B,
- HEAT_PLAN_NO,
- JUDGE_STOVE_NO,
- BATCH_NO,
- MAT_STATUS,
- IS_SAMPLE_PIPE
- FROM (SELECT T.MAT_NO,
- T.RESAMPLE_PIPE_LEN_A,
- T.RESAMPLE_PIPE_LEN_B,
- T.SAMPLE_PIPE_LEN_A,
- T.SAMPLE_PIPE_LEN_B,
- T.HEAT_PLAN_NO,
- T.JUDGE_STOVE_NO,
- T.BATCH_NO,
- DECODE(T.MAT_STATUS, '00', '是', '否') MAT_STATUS,
- T.IS_SAMPLE_PIPE
- FROM PORT_VRP_BATCH_SAMPLE_RESULT T
- WHERE T.JUDGE_STOVE_NO = ?
- ORDER BY T.MAT_STATUS ASC,T.MAT_NO)
- ]]>
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updatePortMilResultReSample" desc = "复取样完成修改管号队列">
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.IS_SAMPLE_PIPE = '#IS_SAMPLE_PIPE#',
- T.RESAMPLE_PIPE_LEN_A = '#RESAMPLE_PIPE_LEN_A#',
- T.RESAMPLE_PIPE_LEN_B = '#RESAMPLE_PIPE_LEN_B#',
- T.SAMPLE_PIPE_LEN = TO_NUMBER(NVL(T.SAMPLE_PIPE_LEN,0)) + TO_NUMBER(NVL('#RESAMPLE_PIPE_LEN_A#',0))+TO_NUMBER(NVL('#RESAMPLE_PIPE_LEN_B#',0)),
- T.RE_GET_SAMPLE_NAME = '#RE_GET_SAMPLE_NAME#',
- T.RE_GET_SAMPLE_TIME = TO_DATE('#RE_GET_SAMPLE_TIME#','YYYY-MM-DD HH24:MI:SS'),
- T.RE_GET_SAMPLE_STATUS = '#RE_GET_SAMPLE_STATUS#'
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.MAT_NO = '#MAT_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.CancelupdatePortMilResultReSample" desc = "撤销复取样完成修改管号队列">
- UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
- SET T.IS_SAMPLE_PIPE = '#IS_SAMPLE_PIPE#',
- T.RESAMPLE_PIPE_LEN_A = '#RESAMPLE_PIPE_LEN_A#',
- T.RESAMPLE_PIPE_LEN_B = '#RESAMPLE_PIPE_LEN_B#',
- T.SAMPLE_PIPE_LEN = TO_NUMBER(NVL(T.SAMPLE_PIPE_LEN,0)) - TO_NUMBER(NVL('#RESAMPLE_PIPE_LEN_A#',0))-TO_NUMBER(NVL('#RESAMPLE_PIPE_LEN_B#',0)),
- T.RE_GET_SAMPLE_NAME = '#RE_GET_SAMPLE_NAME#',
- T.RE_GET_SAMPLE_TIME = TO_DATE('#RE_GET_SAMPLE_TIME#','YYYY-MM-DD HH24:MI:SS'),
- T.RE_GET_SAMPLE_STATUS = '#RE_GET_SAMPLE_STATUS#'
- WHERE T.PLAN_ID = '#PLAN_ID#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.MAT_NO = '#MAT_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updatePortCopyMat" desc = "修改管号队列复取样状态">
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.RE_GET_SAMPLE_STATUS = '#RE_GET_SAMPLE_STATUS#'
- WHERE T.LOT_NO = '#LOT_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.MAT_NO = '#MAT_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.updateFlagSql" desc = "修改状态、删除产销委托数据">
- DECLARE
- BEGIN
- UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T
- SET T.RE_GET_SAMPLE_STATUS = '1'
- WHERE T.LOT_NO = '#LOT_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.RE_GET_SAMPLE_STATUS = '2';
- --更新炉批结果表
- FOR V2 IN (SELECT T.*
- FROM QCM_ZC_CHECKCONSIGN_DETAIL T
- WHERE T.CHECK_NO = '#NEW_CHECK_NO#') LOOP
- IF V2.RATE = '408601' THEN
- FOR V IN (SELECT D.JUDGE_STOVE_NO,
- D.BATCH_NO,
- D.PROCESS_CODE,
- D.ORD_LN_DLY_PK,
- D.CRAFT_SOURCE
- FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
- WHERE C.CHECK_NO = V2.CHECK_NO
- AND C.BATCH_NO = V2.BATCH_NO
- AND D.LOT_NO = C.LOT_NO
- AND (C.LOT_NO_GROUP IS NULL OR
- C.LOT_NO_GROUP = D.LOT_NO_GROUP)
- AND D.PROCESS_CODE = C.PROCESS_CODE
- AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
- GROUP BY D.JUDGE_STOVE_NO,
- D.BATCH_NO,
- D.PROCESS_CODE,
- D.ORD_LN_DLY_PK,
- D.CRAFT_SOURCE) LOOP
- UPDATE QCM_BC_BATCH_RESULT A
- SET A.JUDGE_RESULT_CODE = '40740704'
- WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
- AND A.BATCH_NO = V.BATCH_NO
- AND A.PROCESS_CODE = V.PROCESS_CODE
- AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
- AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
- END LOOP;
- ELSIF V2.RATE = '408603' THEN
- FOR V IN (SELECT D.JUDGE_STOVE_NO,
- D.BATCH_NO,
- D.PROCESS_CODE,
- D.ORD_LN_DLY_PK,
- D.CRAFT_SOURCE
- FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
- WHERE C.CHECK_NO = V2.CHECK_NO
- AND C.BATCH_NO = V2.BATCH_NO
- AND D.JUDGE_STOVE_NO = C.JUDGE_STOVE_NO
- AND D.PROCESS_CODE = C.PROCESS_CODE
- AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
- GROUP BY D.JUDGE_STOVE_NO,
- D.BATCH_NO,
- D.PROCESS_CODE,
- D.ORD_LN_DLY_PK,
- D.CRAFT_SOURCE) LOOP
- UPDATE QCM_BC_BATCH_RESULT A
- SET A.JUDGE_RESULT_CODE = '40740704'
- WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
- AND A.BATCH_NO = V.BATCH_NO
- AND A.PROCESS_CODE = V.PROCESS_CODE
- AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
- AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
- END LOOP;
- ELSE
- FOR V IN (SELECT C.JUDGE_STOVE_NO,
- C.BATCH_NO,
- C.PROCESS_CODE,
- C.ORD_LN_DLY_PK,
- C.CRAFT_SOURCE
- FROM QCM_ZC_CHECKCONSIGN C
- WHERE C.CHECK_NO = V2.CHECK_NO
- AND C.BATCH_NO = V2.BATCH_NO
- GROUP BY C.JUDGE_STOVE_NO,
- C.BATCH_NO,
- C.PROCESS_CODE,
- C.ORD_LN_DLY_PK,
- C.CRAFT_SOURCE) LOOP
- UPDATE QCM_BC_BATCH_RESULT A
- SET A.JUDGE_RESULT_CODE = '40740704'
- WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
- AND A.BATCH_NO = V.BATCH_NO
- AND A.PROCESS_CODE = V.PROCESS_CODE
- AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
- AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
- END LOOP;
- END IF;
- END LOOP;
- DELETE FROM QCM_ZC_CHECKCONSIGN T WHERE T.CHECK_NO = '#NEW_CHECK_NO#';
- DELETE FROM QCM_ZC_CHECKCONSIGN_DETAIL T WHERE T.CHECK_NO = '#NEW_CHECK_NO#';
- END;
- </query>
- <query id = "FrmVrpBatchSaplmeNew.doQueryResampleInfo" desc = "查询复样样管基础信息">
- SELECT
- PHY_BATCH_NO,
- MAT_NO,
- RESAMPLE_PIPE_LEN_A,
- RESAMPLE_PIPE_LEN_B,
- REPHY_CODE_GROUP,
- REPHY_CODE_GROUPB
- FROM PORT_VRP_BATCH_SAMPLE_RESULT
- WHERE IS_SAMPLE_PIPE = '1'
- AND JUDGE_STOVE_NO = ?
- AND RE_GET_SAMPLE_STATUS = '1'
- ORDER BY PHY_BATCH_NO,MAT_NO
- </query>
- <query id = "FrmVrpBatchSaplmeNew.selectPortHttResult" desc = "查询样管是否已分批">
- SELECT COUNT(1) ACOUNT
- FROM PORT_VRP_BATCH_SAMPLE_RESULT T
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.PHY_BATCH_NO IS NULL
- AND T.MAT_NO = '#MAT_NO#'
- </query>
- <query id = "FrmVrpBatchSaplmeNew.selectPortVrpCount" desc = "查询下线支数">
- SELECT SUM(T.ACT_COUNT) ACOUNT
- FROM PORT_VRP_BATCH_SAMPLE_RESULT T
- WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
- AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
- AND T.INSTORE_FLAG = '1'
- </query>
-
- <query id = "FrmVrpBatchSaplmeNew.doQueryPrdcrNo" desc = "查询监制编号">
- select t.*
- from PLN_ORDER_DBK_S t
- WHERE T.PRO_PLAN_ID = ?
- AND T.GX_PLAN_NO = ?
- </query>
- </queryMap>
|