LGMESServer/WebRoot/WEB-INF/query/com/steering/Mcms/BuyGpInServer.xml

<?xml version="1.0" encoding="UTF-8"?>
<queryMap desc="">

    <query  id="BuyGpInServer.queryInList" desc="">
        <![CDATA[
SELECT SUM(ACT_WEIGHT) ACT_WEIGHT,
       SUM(PONDER_GROSS_WT) PONDER_GROSS_WT,
       SUM(ACT_COUNT) ACT_COUNT,
       MAX(INSTOCK_TIME) INSTOCK_TIME,
       INSTOCK_DOC,
       VEHICLE_NO,
       STOVE_NO,
       PRO_ORDER_NO,
       GRADECODE,
       GRADENAME,
       DIMATER,
       ORD_PK,
       ACT_LEN,
       FIX_NUM,
       FIX_LEN,
       STORAGE_NO,
       LOCATION_NO,
       LARY_NO,
       INSTOCK_REFE_NO,
       PREDICTION_ID,
       IS_JUDGE,
       IS_MOVE,
       INSTANCY_FLAG,
       SOURE_NAME,
       (SELECT LOCATION_NAME
          FROM YDM_BS_LOCATION C
         WHERE C.LOCATION_NO = T.LOCATION_NO) LOCATION_NAME,
       (SELECT C.STORAGE_NAME
          FROM YDM_BS_STORAGE C
         WHERE C.STORAGE_NO = T.STORAGE_NO) STORAGE_NAME,
       (SELECT C.SHIPPERS_NAME
          FROM CMM_WEIGHT_RESULT C
         WHERE C.RESULT_NO = T.INSTOCK_REFE_NO) SHIPPERS_NAME
  FROM (SELECT T.*,
               DECODE(M.MAT_NO,
                      NULL,
                      '已送判',
                      DECODE(M.JUGDE_APPLY_CODE, NULL, '未送判', '已送判')) IS_JUDGE,
               DECODE(T.STORAGE_NO, B.STORAGE_NO, '未倒库', '已倒库') IS_MOVE,
               DECODE(M.INSTANCY_FLAG, '1', '紧急放行', '正常') INSTANCY_FLAG
          FROM YDM_GP_INLIST T
          LEFT JOIN MAT_GP_M M
            ON T.MAT_NO = M.MAT_NO
          LEFT JOIN YDM_GP_BUTTRESS B
            ON B.MAT_NO = M.MAT_NO
         WHERE T.INSTOCK_REFE_NO IS NOT NULL
           AND T.PREDICTION_ID IS NOT NULL
           AND T.INSTOCK_TYPE_CODE = '800701' #WHERE#) T
 GROUP BY INSTOCK_DOC,
          VEHICLE_NO,
          STOVE_NO,
          PRO_ORDER_NO,
          GRADECODE,
          GRADENAME,
          DIMATER,
          ORD_PK,
          ACT_LEN,
          FIX_NUM,
          FIX_LEN,
          STORAGE_NO,
          LOCATION_NO,
          LARY_NO,
          INSTOCK_REFE_NO,
          PREDICTION_ID,
          IS_JUDGE,
          IS_MOVE,
          INSTANCY_FLAG,
          SOURE_NAME
 ORDER BY INSTOCK_DOC

           ]]>
    </query>

    <query  id="BuyGpInServer.queryInList2" desc="">
        <![CDATA[
SELECT T.*,
               DECODE(M.MAT_NO,
                      NULL,
                      '已送判',
                      DECODE(M.JUGDE_APPLY_CODE, NULL, '未送判', '已送判')) IS_JUDGE,
               DECODE(T.STORAGE_NO, B.STORAGE_NO, '未倒库', '已倒库') IS_MOVE
          FROM YDM_GP_INLIST T
          LEFT JOIN MAT_GP_M M
            ON T.MAT_NO = M.MAT_NO
          LEFT JOIN YDM_GP_BUTTRESS B
            ON B.MAT_NO = M.MAT_NO
         WHERE T.INSTOCK_REFE_NO IS NOT NULL
           AND T.PREDICTION_ID IS NOT NULL
           AND T.INSTOCK_TYPE_CODE = '800701'
           AND DECODE(M.MAT_NO,
                      NULL,
                      '已送判',
                      DECODE(M.JUGDE_APPLY_CODE, NULL, '未送判', '已送判')) = '#IS_JUDGE#'
          AND DECODE(T.STORAGE_NO, B.STORAGE_NO, '未倒库', '已倒库')  ='#IS_MOVE#'
          AND T.INSTOCK_DOC = '#INSTOCK_DOC#'
          AND T.VEHICLE_NO ='#VEHICLE_NO#'
          AND T.STOVE_NO ='#STOVE_NO#'
          AND T.PRO_ORDER_NO= '#PRO_ORDER_NO#'
          AND T.GRADECODE ='#GRADECODE#'
          AND T.GRADENAME = '#GRADENAME#'
          AND T.DIMATER ='#DIMATER#'
          AND T.ORD_PK ='#ORD_PK#'
          AND T.ACT_LEN ='#ACT_LEN#'
          AND T.FIX_NUM = '#FIX_NUM#'
          AND T.FIX_LEN ='#FIX_LEN#'
          AND T.STORAGE_NO ='#STORAGE_NO#'
          AND T.LOCATION_NO ='#LOCATION_NO#'
          AND T.LARY_NO ='#LARY_NO#'
          AND T.INSTOCK_REFE_NO ='#INSTOCK_REFE_NO#'
          AND T.PREDICTION_ID ='#PREDICTION_ID#'

           ]]>
    </query>


    <query  id="BuyGpInServer.queryInListNo" desc="">
        <![CDATA[
SELECT (SELECT S.MEMO FROM COM_BASE_INFO S WHERE S.BASECODE = ?) ||
       INSTOCK_DOC INSTOCK_DOC
  FROM (SELECT TO_CHAR(SYSDATE, 'YYMMDD') ||
               LPAD(NVL(MAX(SUBSTR(T.INSTOCK_DOC, 9)), 0) + 1, 5, 0) INSTOCK_DOC
          FROM YDM_GP_INLIST T
         WHERE INSTOCK_SQE LIKE
               (SELECT S.MEMO
                  FROM COM_BASE_INFO S
                 WHERE S.BASECODE = ?) || TO_CHAR(SYSDATE, 'YYMMDD') || '%')


           ]]>
    </query>

    <query  id="BuyGpInServer.addResult" desc="">
        <![CDATA[
INSERT INTO STL_LG_INSTORE_RESULT
  (PRO_PLAN_ID,
   GX_PLAN_NO,
   FURNACENO,
   STOVE_NO,
   FLAG_STOVE_NO,
   JUDGE_STOVE_NO,
   PRINT_STOVE_NO,
   BATCH_GROUD_NO,
   MATERIAL_NO,
   MATERIAL_NAME,
   GRADECODE,
   GRADENAME,
   DIAMETER,
   FIX_NUM,
   FIX_LEN,
   LENGTH,
   ACT_COUNT,
   WEIGHT,
   NODE_FUR_FLAG,
   JUDGE_STOVE_NO_SEQ,
   SEQUENCENO,
   CREAT_TIME)
  SELECT B.GPBUYPLANID PRO_PLAN_ID,
         '1' GX_PLAN_NO,
             '#JUDGE_STOVE_NO_OLD#' || '-' || (CASE
           WHEN MOD(#EDIT_LENGTH#, C.SINGLE_LEN) = 0 THEN
            #EDIT_LENGTH# /   TO_NUMBER(C.SINGLE_LEN)
           ELSE
            1
         END)  FURNACENO,
       '#JUDGE_STOVE_NO_OLD#',
         '',
         '',
         '',
         '',
         B.MATERIAL_NO,
         B.MATERIAL_NAME,
         B.GRADECODE,
         B.GRADENAME,
         '#ACT_DIMATER#',
         CASE
           WHEN MOD(#EDIT_LENGTH#, C.SINGLE_LEN) = 0 THEN
            #EDIT_LENGTH# /   TO_NUMBER(C.SINGLE_LEN)
           ELSE
            1
         END,
           CASE
           WHEN MOD(#EDIT_LENGTH#, C.SINGLE_LEN) = 0 THEN
            TO_NUMBER(C.SINGLE_LEN)
           ELSE
            #EDIT_LENGTH#
         END,
         #EDIT_LENGTH#,
         #EDIT_INSTOCK_NUM#,
         #EDIT_WT#,
         '1',
         '#JUDGE_STOVE_NO_OLD#' || '-01',
         '1',
         SYSDATE
    FROM CMM_BLANK_PREDICTION C
    LEFT JOIN BUY_GP_ORDER B
      ON B.ORD_NO_PK = C.ORD_NO_PK
     AND B.ORD_SQE_PK = C.ORD_SQE_PK
   WHERE C.PREDICTION_ID = '#DOCUMENT_NO#'

           ]]>
    </query>

    <query  id="BuyGpInServer.updateResult" desc="">
        <![CDATA[
UPDATE STL_LG_INSTORE_RESULT
   SET ACT_COUNT = NVL(ACT_COUNT, 0) + #EDIT_INSTOCK_NUM#,
       WEIGHT    = NVL(WEIGHT, 0) + #EDIT_WT#
 WHERE (FURNACENO, JUDGE_STOVE_NO_SEQ, SEQUENCENO, FIX_NUM, PRO_PLAN_ID,
        LENGTH) IN (SELECT   '#JUDGE_STOVE_NO_OLD#' || '-' || (CASE
           WHEN MOD(#EDIT_LENGTH#, C.SINGLE_LEN) = 0 THEN
            #EDIT_LENGTH# /   TO_NUMBER(C.SINGLE_LEN)
           ELSE
            1
         END)  FURNACENO,
                           '#JUDGE_STOVE_NO_OLD#' || '-01',
                           '1',
                           CASE
                             WHEN MOD(#EDIT_LENGTH#, C.SINGLE_LEN) = 0 THEN
                              #EDIT_LENGTH# / TO_NUMBER(C.SINGLE_LEN)
                             ELSE
                              1
                           END,
                           B.GPBUYPLANID,
                           #EDIT_LENGTH#
                      FROM CMM_BLANK_PREDICTION C
                      LEFT JOIN BUY_GP_ORDER B
                        ON B.ORD_NO_PK = C.ORD_NO_PK
                       AND B.ORD_SQE_PK = C.ORD_SQE_PK
                     WHERE C.PREDICTION_ID = '#DOCUMENT_NO#')


           ]]>
    </query>

    <query  id="BuyGpInServer.updateResult2" desc="">
        <![CDATA[
UPDATE STL_LG_INSTORE_RESULT
   SET ACT_COUNT = NVL(ACT_COUNT, 0) -#ACT_COUNT#,
       WEIGHT    = NVL(WEIGHT, 0) - #ACT_WEIGHT#
 WHERE (FURNACENO,  SEQUENCENO,JUDGE_STOVE_NO_SEQ, FIX_NUM, PRO_PLAN_ID,
        LENGTH) IN (SELECT FURNACENO, SEQUENCENO, JUDGE_STOVE_NO_SEQ, FIX_NUM, PRO_PLAN_ID,
        ACT_LEN FROM  YDM_GP_INLIST T
        WHERE T.INSTOCK_SQE = '#INSTOCK_SQE#'
        )
           ]]>
    </query>

    <query  id="BuyGpInServer.deleteResult2" desc="">
        <![CDATA[
DELETE FROM STL_LG_INSTORE_RESULT
 WHERE (FURNACENO, JUDGE_STOVE_NO_SEQ, SEQUENCENO, FIX_NUM, PRO_PLAN_ID,
        LENGTH) IN (SELECT FURNACENO, JUDGE_STOVE_NO_SEQ, SEQUENCENO, FIX_NUM, PRO_PLAN_ID,
        ACT_LEN FROM  YDM_GP_INLIST T
        WHERE T.INSTOCK_SQE = ?
        )
        AND (ACT_COUNT <=0 OR  ACT_COUNT IS NULL)
           ]]>
    </query>

    <query  id="BuyGpInServer.addInRecord" desc="">
        <![CDATA[
  INSERT INTO YDM_GP_INLIST
    (INSTOCK_SQE, --入库流水号
     INSTOCK_DOC, --入库单编号
     INSTOCK_TYPE_CODE, --入库类型编码
     INSTOCK_TYPE_NAME, --入库类型名称
     VEHICLE_NO, --车牌号
     MAT_NO, --材料号
     PRODUCT_FLAG, --材料类别
     MAT_STATUS, --材料状态
     STOVE_NO, --熔炼炉号
     JUDGE_STOVE_NO, --判定炉号
     MAT_ORIGIN_CODE, --材料来源类型代码（1外购、2机组产出等）
     MAT_ORIGIN_NAME, --材料来源类型名称
     SOURE_CODE, --材料来源地代码（产线、外委、外购对应的具体项目）
     SOURE_NAME, --材料来源地名称
     PRO_ORDER_NO,
     ORDER_NO, --合同号
     ORD_PK, --合同主键
     MATERIAL_NO, --物料码
     MATERIAL_NAME, --物料描述
     GRADECODE, --钢种代码
     GRADENAME, --钢种名称
     STD_CODE, --标准代码
     STD_NAME, --标准名称
     DIMATER, --直径或宽度（断面）
     ACT_LEN, --坯料长度（实际）
     FIX_NUM, --倍尺数（实际）
     FIX_LEN, --单倍长度（实际）
     ACT_COUNT, --材料支数（实际）
     ACT_WEIGHT, --材料实重（实际）
     ACT_THEORY_WEIGHT, --材料理论重量(实际)
     STORAGE_NO, --仓库代码
     LOCATION_NO, --库位代码
     LARY_NO, --层号
     LOC_NO, --位置
     INSTOCK_TIME, --入库时间
     IN_BC, --入库班次
     IN_BZ, --入库班组
     IN_TIME_F, --首次入库时间
     STORAGE_ATTR, --仓库类型(基础表YDM_BS_STORAGE)
     STORAGE_ATTR_NAME, --仓库类型描述(基础表YDM_BS_STORAGE)
     STORAGE_TYPE_NO, --库类别代码(基础表YDM_BS_STORAGE)
     STORAGE_TYPE_NAME, --库类别代码描述(基础表YDM_BS_STORAGE)
     CREATE_NAME, --创建人
     CREATE_TIME, --创建时间
     PLINE_NAME, --产线描述
     PLINE_CODE, --产线代码
     BELONG_CODE, --所属权单位代码
     BELONG_NAME, --所属权单位
     GROUD_NO, --组号
     JUDGE_STOVE_NO_SEQ, --判定炉号序号
     FURNACENO, --虚拟炉号
     SEQUENCENO,
     SUPPLY_UNIT_CODE, --制造商代码
     SUPPLY_UNIT, --制造商
     INSTOCK_REFE_NO,
     PREDICTION_ID,
     PONDER_NO,
     PONDER_GROSS_WT,
     PRO_PLAN_ID
     )
    SELECT ? || LPAD((SELECT TO_NUMBER(NVL(MAX(SUBSTR(T.INSTOCK_SQE,
                                                      LENGTH(?) + 1)),
                                           '0'))
                        FROM YDM_GP_INLIST T
                       WHERE T.INSTOCK_SQE LIKE ? || '____') + L.ROW_INDEX,
                     4,
                     '0'),
           ?,
           '800701',
           '产出入库',
           ?, --车牌号
           '#JUDGE_STOVE_NO_OLD#' ||
           LPAD((SELECT TO_NUMBER(NVL(MAX(SUBSTR(MAT_NO,
                                                 LENGTH('#JUDGE_STOVE_NO_OLD#') + 1)),
                                      '0'))
                   FROM (SELECT MAT_NO
                           FROM YDM_GP_INLIST
                          WHERE MAT_NO LIKE '#JUDGE_STOVE_NO_OLD#' || '___'
                         UNION ALL
                         SELECT MAT_NO
                           FROM MAT_GP_M
                          WHERE MAT_NO LIKE '#JUDGE_STOVE_NO_OLD#' || '___'
                         UNION ALL
                         SELECT MAT_NO
                           FROM MAT_GP_M_HISTORY
                          WHERE MAT_NO LIKE '#JUDGE_STOVE_NO_OLD#' || '___')) +
                L.ROW_INDEX,
                3,
                '0'),
           '801401', --材料类别
           '80150101', --材料状态
           '#JUDGE_STOVE_NO_OLD#', --熔炼炉号
           '', --判定炉号
           '801301', --材料来源类型代码（1外购、2机组产出等）
           '外购', --材料来源类型名称
           (SELECT SUPP_CODE
              FROM COM_BASE_SUPP
             WHERE SUPP_SHORT_NAME = B.SUPP_CODE), --材料来源地代码（产线、外委、外购对应的具体项目）
           B.SUPP_CODE, --材料来源地名称
           C.ORDER_NO || '/' || LPAD(C.ORDER_SQE, 3, '0'), --合同号
           C.ORDER_NO || '/' || LPAD(C.ORDER_SQE, 3, '0'), --合同号
           B.ORD_NO_PK, --合同主键
           B.MATERIAL_NO, --物料码
           B.MATERIAL_NAME, --物料描述
           B.GRADECODE, --钢种代码
           B.GRADENAME, --钢种名称
           B.STD_CODE, --标准代码
             (SELECT AGREEMENT_DESC
           FROM COM_BASE_PURCHASE_AGREEMENT
          WHERE AGREEMENT_CODE = B.STD_CODE) ,
          '#ACT_DIMATER#',
           #EDIT_LENGTH#, --坯料长度（实际）
           CASE
             WHEN MOD(#EDIT_LENGTH#, C.SINGLE_LEN) = 0 THEN
              #EDIT_LENGTH# / TO_NUMBER(C.SINGLE_LEN)
             ELSE
              1
           END, --倍尺数（实际）
           CASE
             WHEN MOD(#EDIT_LENGTH#, C.SINGLE_LEN) = 0 THEN
              TO_NUMBER(C.SINGLE_LEN)
             ELSE
              #EDIT_LENGTH#
           END, --单倍长度（实际）
           1, --材料支数（实际）
              CASE WHEN  L.ROW_INDEX = 1 THEN #EDIT_WT# - (#EDIT_INSTOCK_NUM#-1) * ROUND( #EDIT_WT#/ #EDIT_INSTOCK_NUM#,3)
             ELSE ROUND( #EDIT_WT#/ #EDIT_INSTOCK_NUM#,3)  END ,
           '', --材料理论重量(实际)
           '#STORAGE_NO#', --仓库代码
           '#LOCATION_NO#', --库位代码
           '#LARY_NO#', --层号
           NULL, --位置
           SYSDATE, --入库时间
           '', --入库班次
           '', --入库班组
           SYSDATE, --首次入库时间
           D.STORAGE_ATTR, --仓库类型(基础表YDM_BS_STORAGE)
           D.STORAGE_ATTR_NAME, --仓库类型描述(基础表YDM_BS_STORAGE)
           D.STORAGE_TYPE_NO, --库类别代码(基础表YDM_BS_STORAGE)
           D.STORAGE_TYPE_NAME, --库类别代码描述(基础表YDM_BS_STORAGE)
           ?, --创建人
           SYSDATE, --创建时间
           CASE B.GPTYPE
             WHEN '0' THEN
              '轧坯(外购)'
             WHEN '1' THEN
              '连铸坯(外购)'
             ELSE
              '锻坯(外购)'
           END, --产线描述
           CASE B.GPTYPE
             WHEN '0' THEN
              'C063'
             WHEN '1' THEN
              'C063'
             ELSE
              'C064'
           END, --产线代码
           '002023005',--tzh 24.11.2 直接写死
         '产品制造部',--tzh 24.11.2 直接写死
           CASE
             WHEN MOD(#EDIT_LENGTH#, C.SINGLE_LEN) = 0 THEN
             TO_CHAR(#EDIT_LENGTH# / TO_NUMBER(C.SINGLE_LEN))
             ELSE
             '1'
           END,  --组号
           '#JUDGE_STOVE_NO_OLD#' || '-01',
             '#JUDGE_STOVE_NO_OLD#' || '-' || (CASE
           WHEN MOD(#EDIT_LENGTH#, C.SINGLE_LEN) = 0 THEN
            #EDIT_LENGTH# /   TO_NUMBER(C.SINGLE_LEN)
           ELSE
            1
         END)  FURNACENO,
         '1',
           '120504',--tzh 24.11.2 直接写死
           '江苏天淮钢管有限公司',--tzh 24.11.2 直接写死
              '#RESULT_NO#',
               '#DOCUMENT_NO#',
                '#RESULT_NO#',

          --      CASE WHEN INSTORE_TYPE = '1' THEN
          --        CASE WHEN  L.ROW_INDEX = 1 THEN #EDIT_WT# - (#EDIT_INSTOCK_NUM#-1) * ROUND( #EDIT_WT#/ #EDIT_INSTOCK_NUM#,3)
        --     ELSE ROUND( #EDIT_WT#/ #EDIT_INSTOCK_NUM#,3)  END
         --    ELSE


               DECODE(L.ROW_INDEX, 1,
                  (CASE WHEN #UN_INSTOCK_NUM#  =  #EDIT_INSTOCK_NUM#
                  THEN  #UN_INSTOCK_WT# ELSE
                     ROUND(#UN_INSTOCK_WT#/#UN_INSTOCK_NUM# *  #EDIT_INSTOCK_NUM#,3)
                   END)
                    - (#EDIT_INSTOCK_NUM# -1) *

                    ROUND(
                    (CASE WHEN #UN_INSTOCK_NUM#  =  #EDIT_INSTOCK_NUM#  THEN  #UN_INSTOCK_WT#
               ELSE ROUND(#UN_INSTOCK_WT#/#UN_INSTOCK_NUM# *  #EDIT_INSTOCK_NUM#,3)
                    END)
                /#EDIT_INSTOCK_NUM#,3),
                ROUND(
                 (CASE WHEN #UN_INSTOCK_NUM#  =  #EDIT_INSTOCK_NUM#  THEN  #UN_INSTOCK_WT#
               ELSE ROUND(#UN_INSTOCK_WT#/#UN_INSTOCK_NUM# *  #EDIT_INSTOCK_NUM#,3)
               END)
                /#EDIT_INSTOCK_NUM#,3)
                )
              --  END
                ,
                B.GPBUYPLANID

      FROM (SELECT ROWNUM ROW_INDEX
              FROM DUAL
            CONNECT BY ROWNUM <= #EDIT_INSTOCK_NUM#) L,
           CMM_BLANK_PREDICTION C
      LEFT JOIN BUY_GP_ORDER B
        ON B.ORD_NO_PK = C.ORD_NO_PK
       AND B.ORD_SQE_PK = C.ORD_SQE_PK
      LEFT JOIN YDM_BS_STORAGE D ON D.STORAGE_NO = '#STORAGE_NO#'
     WHERE C.PREDICTION_ID = '#DOCUMENT_NO#'


           ]]>
    </query>

    <query  id="BuyGpInServer.addMat" desc="">
        <![CDATA[
 INSERT INTO MAT_GP_M
   (MAT_NO, --材料号（坯号）规则---(15)----母料号000
    PRODUCT_FLAG, --材料类别（8014在制品、成品、商品）
    MAT_STATUS, --材料状态（801501在制品阶段、801502成品、801503商品...）
    STOVE_NO, --熔炼炉号
    JUDGE_STOVE_NO, --判定炉号
    --MAT_ORIGIN_CODE, --材料来源类型代码（1外购、2机组产出等）
    MATERIAL_NO, --物料码
    MATERIAL_NAME, --物料描叙
    GRADECODE, --钢种代码
    GRADENAME, --钢种名称
    STD_CODE, --标准代码
    STD_NAME, --标准名称
    DIMATER, --直径或宽度(实际)
    ACT_LEN, --坯料长度(实际)
    FIX_NUM, --倍尺数(实际)
    FIX_LEN, --单倍长度(实际)
    ACT_COUNT, --材料支数(实际)
    ACT_WEIGHT, --材料实重(实际)
    ACT_THEORY_WEIGHT, --材料理论重量(实际)
    BELONG_CODE, --所属权单位代码
    BELONG_NAME, --所属权单位
    INSTOCK_TIME, --入库时间(首次)
    BAL_YEAR_MONTH, --结算日期（年月）
    CREATE_NAME, --创建人
    CREATE_TIME, --创建时间
    --FURNACENO,           --虚拟炉号
    PLINE_NAME, --产线名称
    PLINE_CODE, --产线代码
    GPTYPE, --管坯类型
    PRO_ORDER_NO, --采购合同号
    ORD_PK, --采购合同号PK值
    DB_ACT_COUNT, --单倍坯支数
    CIC,
    PIC,
    SIC,
    DIC,
    QCM_STAUS, --交库状态
    MAT_ORIGIN_CODE, --材料类型来源代码
    MAT_ORIGIN_NAME, --材料类型来源名称
    PRO_PLAN_ID, --铸造订单编号(传采购需求单号)
    GPREQ_ID, --传采购需求单号
    FURNACENO, --虚拟炉号
    SEQUENCENO, --顺序号
    SOURE_NAME, --材料来源地名称
    SOURE_CODE, --材料来源地代码
    GROUD_NO, --组号
    SUPPLY_UNIT_CODE, --制造商代码
    SUPPLY_UNIT, --制造商
    IS_DEALER --是否双经销
    )
   SELECT O.MAT_NO,
          O.PRODUCT_FLAG,
          O.MAT_STATUS,
          O.STOVE_NO,
          O.JUDGE_STOVE_NO,
          O.MATERIAL_NO,
          O.MATERIAL_NAME,
          O.GRADECODE,
          O.GRADENAME,
          O.STD_CODE,
          O.STD_NAME,
          O.DIMATER,
          O.ACT_LEN,
          O.FIX_NUM,
          O.FIX_LEN,
          O.ACT_COUNT,
          O.ACT_WEIGHT,
          O.ACT_THEORY_WEIGHT,
          O.BELONG_CODE,
          O.BELONG_NAME,
          O.CREATE_TIME,
          TO_CHAR(O.CREATE_TIME, 'yyyymm'), --结算日期（年月）
          O.CREATE_NAME,
          O.CREATE_TIME,
          O.PLINE_NAME,
          O.PLINE_CODE,
          B.GPTYPE, --管坯类型
          O.ORDER_NO,
          O.ORD_PK, --采购合同号PK值
          O.FIX_NUM,
          GP.CIC,
          GP.PIC,
          GP.SIC,
          GP.DIC,
          '00', --交库状态
          O.MAT_ORIGIN_CODE,
          O.MAT_ORIGIN_NAME,
          B.GPBUYPLANID, --铸造订单编号(传采购需求单号)
          B.GPBUYPLANID, --传采购需求单号
          O.FURNACENO,
          O.SEQUENCENO,
          O.SOURE_NAME,
          O.SOURE_CODE,
          O.GROUD_NO,
          O.SUPPLY_UNIT_CODE,
          O.SUPPLY_UNIT,
          C.TYPE_FLAG
     FROM YDM_GP_INLIST O, CMM_BLANK_PREDICTION C
     LEFT JOIN BUY_GP_ORDER B
       ON B.ORD_NO_PK = C.ORD_NO_PK
      AND B.ORD_SQE_PK = C.ORD_SQE_PK
     LEFT JOIN PLN_REQINF_GP GP
       ON GP.GPREQ_ID = B.GPBUYPLANID
    WHERE C.PREDICTION_ID = O.PREDICTION_ID
      AND O.PREDICTION_ID IS NOT NULL
      AND O.INSTOCK_DOC = ?


           ]]>
    </query>

    <query  id="BuyGpInServer.addBut" desc="">
        <![CDATA[
 INSERT INTO YDM_GP_BUTTRESS T
  (MAT_NO, --材料号
   STOVE_NO, --熔炼炉号
   JUDGE_STOVE_NO, --判定炉号
   STORAGE_NO, --仓库代码
   LOCATION_NO, --库位代码
   LARY_NO, --层号
   LOC_NO, --位置
   STORAGE_ATTR, --仓库类型(基础表YDM_BS_STORAGE)
   STORAGE_ATTR_NAME, --仓库类型描述(基础表YDM_BS_STORAGE)
   STORAGE_TYPE_NO, --库类别代码(基础表YDM_BS_STORAGE)
   STORAGE_TYPE_NAME, --库类别代码描述(基础表YDM_BS_STORAGE)
   CREATE_NAME, --创建人
   CREATE_TIME, --创建时间
   GROUD_NO, --组号(判定炉号对应长度分组)写倍尺
   LOCATION_NAME --库位名称
   )
  SELECT O.MAT_NO, --材料号
         O.STOVE_NO, --熔炼炉号
         O.JUDGE_STOVE_NO, --判定炉号
         O.STORAGE_NO, --仓库代码
         O.LOCATION_NO, --库位代码
         O.LARY_NO, --层号
         O.LOC_NO, --位置
         O.STORAGE_ATTR, --仓库类型(基础表YDM_BS_STORAGE)
         O.STORAGE_ATTR_NAME, --仓库类型描述(基础表YDM_BS_STORAGE)
         O.STORAGE_TYPE_NO, --库类别代码(基础表YDM_BS_STORAGE)
         O.STORAGE_TYPE_NAME, --库类别代码描述(基础表YDM_BS_STORAGE)
         O.CREATE_NAME, --创建人
         O.CREATE_TIME, --创建时间
         O.GROUD_NO, --组号(判定炉号对应长度分组)写倍尺
         (SELECT LOCATION_NAME
            FROM YDM_BS_LOCATION
           WHERE LOCATION_NO = O.LOCATION_NO) --库位名称
    FROM YDM_GP_INLIST O
   WHERE O.PREDICTION_ID IS NOT NULL
     AND O.INSTOCK_DOC = ?
           ]]>
    </query>




    <query  id="BuyGpInServer.deleteMat" desc="">
        <![CDATA[
              DELETE FROM MAT_GP_M WHERE MAT_NO = ?
           ]]>
    </query>

    <query  id="BuyGpInServer.deleteBut" desc="">
        <![CDATA[
              DELETE FROM YDM_GP_BUTTRESS WHERE MAT_NO = ?
           ]]>
    </query>

    <query  id="BuyGpInServer.deleteList" desc="">
        <![CDATA[
              DELETE FROM YDM_GP_INLIST WHERE INSTOCK_SQE = ?
           ]]>
    </query>

</queryMap>