LGMESServer/WebRoot/WEB-INF/query/Stuffmanage/FrmStuffFurnace.xml

<?xml version="1.0" encoding="UTF-8"?>
<queryMap desc = "离线组炉管理">
<query id = "FrmStuffFurnace.doQueryOfflieResult" desc = "查询离线数据">
<![CDATA[
 SELECT T.FURNACENO,
       T.STOVE_NO,
       T.JUDGE_STOVE_NO,
       T.DIAMETER,
       T.LENGTH,
       T.FIX_NUM,
       T.FIX_LEN,
       T.PLINE_CODE,
       T.OFFLINE_NUM,
       T.BACKLINE_NUM,
       T.ZP_WEIGHT,
       T.SUBCONTRACT_NUM,
       T.SUBCONTRACTCOMPLETE_NUM,
       T.SUBCONTRACT_NO,
       T.GRADECODE,
       T.GRADENAME,
       T.STD_CODE,
       T.STD_NAME,
       T.MATERIAL_NO,
       T.MATERIAL_NAME,
       T.IS_VALID,
       T.STATUS,
       DECODE(T.COL_SHIFT,
              '0',
              '常白班',
              '1',
              '早班',
              '2',
              '中班',
              '3',
              '夜班') COL_SHIFT,
       DECODE(T.COL_GROUP,
              '1',
              '甲班',
              '2',
              '乙班',
              '3',
              '丙班',
              '4',
              '丁班') COL_GROUP,
       T.COL_USER,
       T.GROUP_NUM,
       DECODE(T.ZP_FLAG, '0', '正常下线', '1', '组炉') ZP_FLAG,
       T.PRO_PLAN_ID,
       T.GX_PLAN_NO,
       T.GPREQ_ID,
       TO_CHAR(T.OFFLINE_TIME, 'YYYY-MM-DD HH:MI:SS') OFFLINE_TIME,
       T.SEQUENCENO,
       T.JUDGE_STOVE_NO_SEQ,
       T.PRO_ORDER_NO,
       T.MAIN_JUDGE_STOVE_NO
  FROM STL_LG_OFFLINE T
 WHERE 1 = 1
   AND T.STATUS = '0'
 ]]>
</query>
<query id = "FrmStuffFurnace.doQueryFurnace" desc = "查询组炉实绩">
<![CDATA[
  SELECT 
       T.FURNACENO,
       T.SEQUENCENO,
       T.STOVE_NO,
       T.CCMSTOVENO,
       T.JUDGE_STOVE_NO,
       T.JUDGE_STOVE_NO_SEQ,
       T.CAST_NO,
       T.HEATCNT,
       T.CCMID,
       T.FLOWNO,
       T.CUTSEQNO,
       T.MATERIAL_NO,
       T.MATERIAL_NAME,
       T.GRADECODE,
       T.GRADENAME,
       T.BATCH_GROUD_NO,
       T.FLAG_STOVE_NO,
       T.STANDARDSCODE,
       T.STANDARDREMAK,
       T.DIAMETER,
       T.FIX_NUM,
       T.FIX_LEN,
       SUM(T.ACT_COUNT)ACT_COUNT,
       SUM(T.WEIGHT)WEIGHT,
       T.MAIN_JUDGE_STOVE_NO,
       TO_CHAR(T.ZP_TIME,'YYYY-MM-DD HH:MM:SS')ZP_TIME,
       T.COL_USER,
      DECODE(T.COL_SHIFT,
              '0',
              '常白班',
              '1',
              '早班',
              '2',
              '中班',
              '3',
              '夜班') COL_SHIFT,
       DECODE(T.COL_GROUP,
              '1',
              '甲班',
              '2',
              '乙班',
              '3',
              '丙班',
              '4',
              '丁班') COL_GROUP
 FROM STL_LG_GROUP T
 WHERE 1=1
 ]]>
</query>
<query id = "FrmStuffFurnace.doQueryFurnaceGroup" desc = "查询组炉详细实绩">
<![CDATA[
 SELECT T.*
 FROM STL_LG_GROUP T
 WHERE T.FURNACENO = ?
 AND T.SEQUENCENO = ?
 AND T.STOVE_NO = ?
 AND T.JUDGE_STOVE_NO_SEQ = ?
 ]]>
</query>
<query id = "FrmStuffFurnace.doQueryOperation" desc = "查询操作实绩">
<![CDATA[
 SELECT 
       T.STOVE_NO,
       T.JUDGE_STOVE_NO,
       DECODE(T.OPERATION_TYPE,'0','复检')OPERATION_TYPE,
       T.ACT_COUNT,
       T.ACT_WEIGHT,
       TO_CHAR(T.COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
       T.REMARK,
       T.COL_USER,
       DECODE(T.COL_SHIFT,
              '0',
              '常白班',
              '1',
              '早班',
              '2',
              '中班',
              '3',
              '夜班') COL_SHIFT,
       DECODE(T.COL_GROUP,
              '1',
              '甲班',
              '2',
              '乙班',
              '3',
              '丙班',
              '4',
              '丁班') COL_GROUP,
       T.OPERATION_ID,
       T.PLINE_CODE,
       T.FURNACENO,
       T.BACK_JUDGE_STOVE_NO,
       T.PRO_PLAN_ID,
       T.GX_PLAN_NO,
       T.GPREQ_ID,
       T.JUDGE_STOVE_NO_SEQ,
       T.SEQUENCENO,
       T.FIX_NUM,
       T.FIX_LEN,
       T.LENGTH,
       T.DIAMETER
 FROM STL_LG_OFFLINE_DETIA T
 WHERE 1=1
 ]]>
</query>
<query id = "FrmStuffFurnace.doQuerySubcontract" desc = "查询委外实绩">
<![CDATA[
SELECT 
       T.SUBCONTRACT_NO,
       T.STOVE_NO,
       T.JUDGE_STOVE_NO,
       T.PLINE_CODE,
       T.SUBCONTRACTCOMPLETE_NUM,
       T.SUBCONTRACT_NUM,
       TO_CHAR(T.ENTRUSTED_TIME, 'YYYY-MM-DD HH24:MI:SS') ENTRUSTED_TIME,
       T.REMARK,
       T.COL_USER,
       DECODE(T.COL_SHIFT,
              '0',
              '常白班',
              '1',
              '早班',
              '2',
              '中班',
              '3',
              '夜班') COL_SHIFT,
       DECODE(T.COL_GROUP,
              '1',
              '甲班',
              '2',
              '乙班',
              '3',
              '丙班',
              '4',
              '丁班') COL_GROUP,
       T.SUBCONTRACT_FLAG,
       T.SUBCONTRACTSCRAP_NUM,
       T.ENTRUSTED_FLAG,
       T.ENTRUSTED_PLINE_CODE,
       T.ENTRUSTED_PLINE_NAME,
       T.ENTRUSTED_REMARK,
       T.SUBCONTRACT_WGT,
       T.SUBCONTRACT_COMPLETE_WGT,
       T.SUBCONTRACT_NO_SEQ,
       T.SUBCONTRACT_TYPE,
       T.JUDGE_STOVE_NO_SEQ,
       T.FURNACENO,
       T.SEQUENCENO,
       T.FIX_NUM,
       T.FIX_LEN,
       T.LENGTH,
       T.DIAMETER
 FROM STL_LG_ENTRUST_BILL T
 WHERE 1= 1
 ]]>
</query>
<query id = "FrmStuffFurnace.doFurnace" desc = "插入组炉履历表">
 INSERT INTO STL_LG_GROUP(
        FURNACENO,
        SEQUENCENO,
        STOVE_NO,
        JUDGE_STOVE_NO,
        MATERIAL_NO,
        MATERIAL_NAME,
        GRADECODE,
        GRADENAME,
        BATCH_GROUD_NO,
        FLAG_STOVE_NO,
        STANDARDSCODE,
        STANDARDREMAK,
        DIAMETER,
        FIX_LEN,
        ACT_COUNT,
        PLINE_CODE,
        OLD_MATERIAL_NO,
        OLD_MATERIAL_NAME,
        OLD_GRADECODE,
        OLD_GRADENAME,
        OLD_JUDGE_STOVE_NO,
        OLD_DIAMETER,
        WEIGHT,
        FIX_NUM,
        OLD_FIX_NUM,
        PRO_PLAN_ID,
        GX_PLAN_NO,
        GPREQ_ID,
        PRO_ORDER_NO,
        OLD_PRO_PLAN_ID,
        OLD_GX_PLAN_NO,
        OLD_GPREQ_ID,
        JUDGE_STOVE_NO_SEQ,
        OLD_JUDGE_STOVE_NO_SEQ,
        OLD_FURNACENO,
        OLD_SEQUENCENO,
        MAIN_JUDGE_STOVE_NO,
        OLD_STOVE_NO,
        ZP_TIME,
        COL_USER,
        COL_SHIFT,
        COL_GROUP)
 VALUES( 
        '#FURNACENO#',
        '#SEQUENCENO#',
        '#STOVE_NO#',
        '#JUDGE_STOVE_NO#',
        '#MATERIAL_NO#',
        '#MATERIAL_NAME#',
        '#GRADECODE#',
        '#GRADENAME#',
        '#BATCH_GROUD_NO#',
        '#FLAG_STOVE_NO#',
        '#STANDARDSCODE#',
        '#STANDARDREMAK#',
        '#DIAMETER#',
        '#FIX_LEN#',
        '#ACT_COUNT#',
        '#PLINE_CODE#',
        '#OLD_MATERIAL_NO#',
        '#OLD_MATERIAL_NAME#',
        '#OLD_GRADECODE#',
        '#OLD_GRADENAME#',
        '#OLD_JUDGE_STOVE_NO#',
        '#OLD_DIAMETER#',
        '#WEIGHT#',
        '#FIX_NUM#',
        '#OLD_FIX_NUM#',
        '#PRO_PLAN_ID#',
        '#GX_PLAN_NO#',
        '#GPREQ_ID#',
        '#PRO_ORDER_NO#',
        '#OLD_PRO_PLAN_ID#',
        '#OLD_GX_PLAN_NO#',
        '#OLD_GPREQ_ID#',
        '#JUDGE_STOVE_NO_SEQ#',
        '#OLD_JUDGE_STOVE_NO_SEQ#',
        '#OLD_FURNACENO#',
        '#OLD_SEQUENCENO#',
        '#MAIN_JUDGE_STOVE_NO#',
        '#OLD_STOVE_NO#',
        TO_DATE('#ZP_TIME#','YYYY-MM-DD HH24:MI:SS'),
        '#COL_USER#',
        '#COL_SHIFT#',
        '#COL_GROUP#')
</query>
<query id = "FrmStuffFurnace.crateNewJudgeNo" desc = "生成新炉序号">
SELECT ? || '-' ||
         LPAD(NVL(MAX(SUBSTR(T.JUDGE_STOVE_NO_SEQ, 8)), 0) + 1, 2, 0) JUDGE_STOVE_NO_SEQ
    FROM PLN_STEELFOR_ORD T
   WHERE T.JUDGE_STOVE_NO = ?
     AND T.PLINE_CODE = ?
     AND SUBSTR(T.FURNACENO,0,12) = ?
     AND T.SEQUENCENO = ?
</query>
<query id = "FrmStuffFurnace.crateNewFuraceNo" desc = "生成新虚拟炉号">
SELECT ? || '-' ||
         LPAD(NVL(MAX(SUBSTR(T.FURNACENO, 14)), 0) + 1, 2, 0) FURNACENO
    FROM PLN_STEELFOR_ORD T
   WHERE T.JUDGE_STOVE_NO = ?
     AND T.EF_PLINE_CODE = ?
     AND SUBSTR(T.FURNACENO,0,12) = ?
     AND T.SEQUENCENO = ?
</query>
<query id  = "FrmStuffFurnace.updateProcessGroupFlag" desc = "修改组炉标识">
<![CDATA[
DECLARE
BEGIN
  FOR MYROWM IN (SELECT *
                   FROM STL_LG_GROUP T
                  WHERE T.FURNACENO = '#FURNACENO#'
                    AND T.SEQUENCENO = '#SEQUENCENO#'
                    AND T.STOVE_NO = '#STOVE_NO#'
                    AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#') LOOP
    FOR MYROW IN (SELECT *
                    FROM (SELECT *
                            FROM STL_LG_PROGRRSS T
                           WHERE T.STOVE_NO = MYROWM.OLD_STOVE_NO
                             AND T.JUDGE_STOVE_NO_SEQ = MYROWM.OLD_JUDGE_STOVE_NO_SEQ
                             AND T.FURNACENO = MYROWM.OLD_FURNACENO
                             AND T.SEQUENCENO = MYROWM.OLD_SEQUENCENO
                             AND T.FIX_NUM = MYROWM.OLD_FIX_NUM
                             AND T.GROUP_FLAG = '1'
                           ORDER BY T.MAT_NO ASC)
                   WHERE ROWNUM <= MYROWM.ACT_COUNT) LOOP
      UPDATE STL_LG_PROGRRSS T
         SET T.GROUP_FLAG = '0'
       WHERE T.STOVE_NO = MYROW.STOVE_NO
         AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
         AND T.FURNACENO = MYROW.FURNACENO
         AND T.SEQUENCENO = MYROW.SEQUENCENO
         AND T.FIX_NUM = MYROW.FIX_NUM
         AND T.GROUP_FLAG = '1'
         AND T.MAT_NO = MYROW.MAT_NO;
    END LOOP;
  END LOOP;
END;
]]>
</query>
<query id = "FrmStuffFurnace.doInsertOffline" desc = "插入离线实绩表">
 INSERT INTO STL_LG_OFFLINE(
        FURNACENO,
        STOVE_NO,
        JUDGE_STOVE_NO,
        DIAMETER,
        LENGTH,
        FIX_NUM,
        FIX_LEN,
        PLINE_CODE,
        OFFLINE_NUM,
        ZP_FLAG,
        ZP_WEIGHT,
        GRADECODE,
        GRADENAME,
        STD_CODE,
        STD_NAME,
        MATERIAL_NO,
        MATERIAL_NAME,
        STATUS,
        OFFLINE_TIME,
        COL_USER,
        COL_SHIFT,
        COL_GROUP,
        PRO_PLAN_ID,
        GX_PLAN_NO,
        GPREQ_ID,
        PRO_ORDER_NO,
        JUDGE_STOVE_NO_SEQ,
        SEQUENCENO,
        MAIN_JUDGE_STOVE_NO)
 VALUES( 
        '#FURNACENO#',
        '#STOVE_NO#',
        '#JUDGE_STOVE_NO#',
        '#DIAMETER#',
        '#LENGTH#',
        '#FIX_NUM#',
        '#FIX_LEN#',
        '#PLINE_CODE#',
        '#OFFLINE_NUM#',
        '1',
        '#ZP_WEIGHT#',
        '#GRADECODE#',
        '#GRADENAME#',
        '#STD_CODE#',
        '#STD_NAME#',
        '#MATERIAL_NO#',
        '#MATERIAL_NAME#',
        '#STATUS#',
        TO_DATE('#OFFLINE_TIME#','YYYY-MM-DD HH24:MI:SS'),
        '#COL_USER#',
        '#COL_SHIFT#',
        '#COL_GROUP#',
        '#PRO_PLAN_ID#',
        '#GX_PLAN_NO#',
        '#GPREQ_ID#',
        '#PRO_ORDER_NO#',
        '#JUDGE_STOVE_NO_SEQ#',
        '#SEQUENCENO#',
        '#MAIN_JUDGE_STOVE_NO#')
</query>
<query id = "FrmStuffFurnace.updateOffline" desc = "修改离线表状态">
UPDATE STL_LG_OFFLINE T
   SET T.STATUS    = '1',
       T.GROUP_NUM = TO_NUMBER(NVL(T.GROUP_NUM, 0)) + TO_NUMBER('#OFFLINE_NUM#')
 WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
   AND T.STOVE_NO = '#STOVE_NO#'
   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
   AND T.FURNACENO = '#FURNACENO#'
   AND T.SEQUENCENO = '#SEQUENCENO#'
   AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
   AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
</query>
<query id = "FrmStuffFurnace.cancelFurnace" desc = "撤销组炉">
DECLARE
BEGIN
  DELETE FROM STL_LG_GROUP T
   WHERE T.STOVE_NO = '#STOVE_NO#'
     AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
     AND T.FURNACENO = '#FURNACENO#'
     AND T.SEQUENCENO = '#SEQUENCENO#';
  DELETE FROM STL_LG_OFFLINE T
   WHERE T.STOVE_NO = '#STOVE_NO#'
     AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
     AND T.FURNACENO = '#FURNACENO#'
     AND T.SEQUENCENO = '#SEQUENCENO#';
END;
</query>
<query id = "FrmStuffFurnace.updateGroupFlag" desc = "撤销组炉时回置组炉标识">
<![CDATA[
DECLARE
BEGIN
  FOR MYROWM IN (SELECT *
                   FROM STL_LG_GROUP T
                  WHERE T.FURNACENO = '#FURNACENO#'
                    AND T.SEQUENCENO = '#SEQUENCENO#'
                    AND T.STOVE_NO = '#STOVE_NO#'
                    AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#') LOOP
    FOR MYROW IN (SELECT *
                    FROM (SELECT *
                            FROM STL_LG_PROGRRSS T
                           WHERE T.STOVE_NO = MYROWM.OLD_STOVE_NO
                             AND T.JUDGE_STOVE_NO_SEQ =
                                 MYROWM.OLD_JUDGE_STOVE_NO_SEQ
                             AND T.FURNACENO = MYROWM.OLD_FURNACENO
                             AND T.SEQUENCENO = MYROWM.OLD_SEQUENCENO
                             AND T.FIX_NUM = MYROWM.OLD_FIX_NUM
                             AND T.GROUP_FLAG = '1'
                           ORDER BY T.MAT_NO ASC)
                   WHERE ROWNUM <= MYROWM.ACT_COUNT) LOOP
      UPDATE STL_LG_PROGRRSS T
         SET T.GROUP_FLAG = '0'
       WHERE T.STOVE_NO = MYROW.STOVE_NO
         AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
         AND T.FURNACENO = MYROW.FURNACENO
         AND T.SEQUENCENO = MYROW.SEQUENCENO
         AND T.FIX_NUM = MYROW.FIX_NUM
         AND T.GROUP_FLAG = '1'
         AND T.MAT_NO = MYROW.MAT_NO;
    END LOOP;
    UPDATE STL_LG_OFFLINE T
       SET T.STATUS = '0',T.GROUP_NUM = TO_NUMBER(NVL(T.GROUP_NUM,0))-TO_NUMBER(MYROWM.ACT_COUNT)
     WHERE T.FURNACENO = MYROWM.OLD_FURNACENO
       AND T.SEQUENCENO = MYROWM.OLD_SEQUENCENO
       AND T.STOVE_NO = MYROWM.OLD_STOVE_NO
       AND T.JUDGE_STOVE_NO_SEQ = MYROWM.OLD_JUDGE_STOVE_NO_SEQ;
  END LOOP;
END;
]]>
</query>
<query id = "FrmStuffFurnace.doQuerySurfaceResult" desc = "查询是否已做其他操作">
SELECT *
  FROM STL_LG_OFFLINE T
 WHERE T.STOVE_NO = ?
   AND T.JUDGE_STOVE_NO_SEQ = ?
   AND T.FURNACENO = ?
   AND T.SEQUENCENO = ?
   AND T.STATUS = '1'
</query>
<query id = "FrmStuffFurnace.insertStlLgEntrustBill" desc = "插入委托表">
 INSERT INTO STL_LG_ENTRUST_BILL(
        SUBCONTRACT_NO,
        STOVE_NO,
        JUDGE_STOVE_NO,
        PLINE_CODE,
        SUBCONTRACT_NUM,
        ENTRUSTED_TIME,
        COL_USER,
        COL_SHIFT,
        COL_GROUP,
        SUBCONTRACT_WGT,
        FIX_NUM,
        FIX_LEN,
        LENGTH,
        DIAMETER,
        PRO_PLAN_ID,
        GX_PLAN_NO,
        GPREQ_ID,
        SUBCONTRACT_NO_SEQ,
        JUDGE_STOVE_NO_SEQ,
        FURNACENO,
        SEQUENCENO)
 VALUES( 
        '#SUBCONTRACT_NO#',
        '#STOVE_NO#',
        '#JUDGE_STOVE_NO#',
        '#PLINE_CODE#',
        '#SUBCONTRACT_NUM#',
        SYSDATE,
        '#COL_USER#',
        '#COL_SHIFT#',
        '#COL_GROUP#',
        '#SUBCONTRACT_WGT#',
        '#FIX_NUM#',
        '#FIX_LEN#',
        '#LENGTH#',
        '#DIAMETER#',
        '#PRO_PLAN_ID#',
        '#GX_PLAN_NO#',
        '#GPREQ_ID#',
        '#SUBCONTRACT_NO_SEQ#',
        '#JUDGE_STOVE_NO_SEQ#',
        '#FURNACENO#',
        '#SEQUENCENO#')
</query>
<query id = "FrmStuffFurnace.updateOfflineStaus" desc = "修改离线实绩信息">
UPDATE STL_LG_OFFLINE T
   SET T.STATUS          = '1',
       T.SUBCONTRACT_NUM = TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
                           TO_NUMBER('#OFFLINE_NUM#'),
       T.SUBCONTRACT_NO = '#SUBCONTRACT_NO#'
 WHERE T.STOVE_NO = '#STOVE_NO#'
   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
   AND T.FURNACENO = '#FURNACENO#'
   AND T.SEQUENCENO = '#SEQUENCENO#'
   AND T.FIX_NUM = '#FIX_NUM#'
</query>
<query id = "FrmStuffFurnace.getSubContractNo" desc = "生成委托单号">
SELECT ? || TO_CHAR(SYSDATE, 'YYMMDD') ||
       LPAD(NVL(MAX(SUBSTR(T.SUBCONTRACT_NO, 11)), 0) + 1, 4, 0) SUBCONTRACT_NO
  FROM STL_LG_ENTRUST_BILL T
 WHERE TO_CHAR(T.ENTRUSTED_TIME, 'YYYY-MM-DD') =
       TO_CHAR(SYSDATE, 'YYYY-MM-DD')
</query>
<query id = "FrmStuffFurnace.selectEntrustFlag" desc = "查询委外实绩是否回报">
SELECT COUNT(1)ACOUNT
  FROM STL_LG_ENTRUST_BILL T
 WHERE T.SUBCONTRACT_NO = '#SUBCONTRACT_NO#'
   AND T.SUBCONTRACT_NO_SEQ = '#SUBCONTRACT_NO_SEQ#'
   AND T.STOVE_NO = '#STOVE_NO#'
   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
   AND T.FIX_NUM = '#FIX_NUM#'
   AND T.SUBCONTRACT_FLAG = '1'
</query>
<query id = "FrmStuffFurnace.cancelSubContractor" desc = "撤销委外">
DELETE FROM STL_LG_ENTRUST_BILL T
 WHERE T.SUBCONTRACT_NO = '#SUBCONTRACT_NO#'
   AND T.SUBCONTRACT_NO_SEQ = '#SUBCONTRACT_NO_SEQ#'
   AND T.STOVE_NO = '#STOVE_NO#'
   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
   AND T.FIX_NUM = '#FIX_NUM#'
</query>
<query id = "FrmStuffFurnace.updateOfflineSub" desc = "修改离线实绩状态">
DECLARE
BEGIN
  FOR MYROW IN (SELECT *
                  FROM STL_LG_PROGRRSS T
                 WHERE T.SUBCONTRACT_NO = '#SUBCONTRACT_NO#'
                   AND T.SUBCONTRACT_NO_SEQ = '#SUBCONTRACT_NO_SEQ#'
                   AND T.STOVE_NO = '#STOVE_NO#'
                   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#') LOOP
    UPDATE STL_LG_PROGRRSS T
       SET T.SUBCONTRACT_NO = '', T.SUBCONTRACT_NO_SEQ = ''
     WHERE T.SUBCONTRACT_NO = '#SUBCONTRACT_NO#'
     AND T.SUBCONTRACT_NO_SEQ = '#SUBCONTRACT_NO_SEQ#'
     AND T.MAT_NO = MYROW.MAT_NO;
  END LOOP;
  UPDATE STL_LG_OFFLINE T
     SET T.STATUS          = '0',
         T.SUBCONTRACT_NUM = TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) -
                             TO_NUMBER('#SUBCONTRACT_NUM#'),
         T.SUBCONTRACT_NO  = ''
   WHERE T.STOVE_NO = '#STOVE_NO#'
     AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
     AND T.FIX_NUM = '#FIX_NUM#'
     AND T.SUBCONTRACT_NO = '#SUBCONTRACT_NO#';
END;
</query>
<query id = "FrmStuffFurnace.insertOfflineDetial" desc= "插入操作记录表">
 INSERT INTO STL_LG_OFFLINE_DETIA(
        STOVE_NO,
        JUDGE_STOVE_NO,
        ACT_COUNT,
        ACT_WEIGHT,
        COL_TIME,
        COL_USER,
        COL_SHIFT,
        COL_GROUP,
        PLINE_CODE,
        FURNACENO,
        BACK_JUDGE_STOVE_NO,
        PRO_PLAN_ID,
        GX_PLAN_NO,
        GPREQ_ID,
        OPERATION_TYPE,
        FIX_NUM,
        FIX_LEN,
        LENGTH,
        DIAMETER,
        JUDGE_STOVE_NO_SEQ,
        SEQUENCENO)
 VALUES( 
        '#STOVE_NO#',
        '#JUDGE_STOVE_NO#',
        '#ACT_COUNT#',
        '#ACT_WEIGHT#',
        SYSDATE,
        '#COL_USER#',
        '#COL_SHIFT#',
        '#COL_GROUP#',
        '#PLINE_CODE#',
        '#FURNACENO#',
        '#BACK_JUDGE_STOVE_NO#',
        '#PRO_PLAN_ID#',
        '#GX_PLAN_NO#',
        '#GPREQ_ID#',
        '0',
        '#FIX_NUM#',
        '#FIX_LEN#',
        '#LENGTH#',
        '#DIAMETER#',
        '#JUDGE_STOVE_NO_SEQ#',
        '#SEQUENCENO#')
</query>
<query id = "FrmStuffFurnace.updateOfflineTrust" desc = "修改离线实绩状态">
UPDATE STL_LG_OFFLINE T
   SET T.STATUS          = '1',
       T.BACKLINE_NUM = TO_NUMBER(NVL(T.BACKLINE_NUM, 0)) +
                           TO_NUMBER('#OFFLINE_NUM#')
 WHERE T.STOVE_NO = '#STOVE_NO#'
   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
   AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
   AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
   AND T.FURNACENO = '#FURNACENO#'
   AND T.SEQUENCENO = '#SEQUENCENO#'
   AND T.FIX_NUM = '#FIX_NUM#'
</query>
<query id = "FrmStuffFurnace.updateStlProcessTrust" desc = "修改进程表状态同时生成新的队列">
<![CDATA[
DECLARE
  V_ZP_FLAG    STL_LG_OFFLINE.ZP_FLAG%TYPE := NULL;
  V_CCMSTOVENO STL_LG_PROGRRSS.CCMSTOVENO%TYPE := NULL;
  V_CAST_NO    STL_LG_PROGRRSS.CAST_NO%TYPE := NULL;
  V_HEATCNT    STL_LG_PROGRRSS.HEATCNT%TYPE := NULL;
  V_CCMID      STL_LG_PROGRRSS.CCMID%TYPE := NULL;
  V_FLOWNO     STL_LG_PROGRRSS.FLOWNO%TYPE := NULL;
  V_CUTSEQNO   STL_LG_PROGRRSS.CUTSEQNO%TYPE := NULL;
  V_JUDGE_STOVE_NO_SEQ STL_LG_PROGRRSS.JUDGE_STOVE_NO_SEQ%TYPE := NULL;
BEGIN

  SELECT '#JUDGE_STOVE_NO#' || '-' ||
         LPAD(NVL(MAX(SUBSTR(T.JUDGE_STOVE_NO_SEQ, 8)), 0) + 1, 2, 0) JUDGE_STOVE_NO_SEQ
    INTO V_JUDGE_STOVE_NO_SEQ
    FROM PLN_STEELFOR_ORD T
   WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
     AND T.STOVE_NO = '#STOVE_NO#'
     AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
     AND T.GX_PLAN_NO = '#GX_PLAN_NO#';
  SELECT T.ZP_FLAG
    INTO V_ZP_FLAG
    FROM STL_LG_OFFLINE T
   WHERE T.STOVE_NO = '#STOVE_NO#'
     AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
     AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
     AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
     AND T.FIX_NUM = '#FIX_NUM#';
  IF (V_ZP_FLAG = 1) THEN
    FOR MYSTOVE IN (SELECT *
                      FROM STL_LG_GROUP T
                     WHERE T.STOVE_NO = '#STOVE_NO#'
                       AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
                       AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
                       AND T.GX_PLAN_NO = '#GX_PLAN_NO#') LOOP
      SELECT T.CCMSTOVENO,
             T.CAST_NO,
             T.HEATCNT,
             T.CCMID,
             T.FLOWNO,
             T.CUTSEQNO
        INTO V_CCMSTOVENO,
             V_CAST_NO,
             V_HEATCNT,
             V_CCMID,
             V_FLOWNO,
             V_CUTSEQNO
        FROM STL_LG_PROGRRSS T
       WHERE T.JUDGE_STOVE_NO_SEQ = MYSTOVE.MAIN_JUDGE_STOVE_NO
         AND T.PRO_PLAN_ID = MYSTOVE.PRO_PLAN_ID
         AND T.GX_PLAN_NO = MYSTOVE.GX_PLAN_NO
         AND ROWNUM = 1;
      FOR MYROWM IN (SELECT *
                       FROM (SELECT *
                               FROM STL_LG_PROGRRSS T
                              WHERE T.STOVE_NO = MYSTOVE.OLD_STOVE_NO
                                AND T.JUDGE_STOVE_NO_SEQ =
                                    MYSTOVE.OLD_JUDGE_STOVE_NO_SEQ
                                AND T.PRO_PLAN_ID = MYSTOVE.OLD_PRO_PLAN_ID
                                AND T.GX_PLAN_NO = MYSTOVE.OLD_GX_PLAN_NO
                                AND T.FIX_NUM = MYSTOVE.OLD_FIX_NUM
                                AND T.GROUP_FLAG = '1'
                              ORDER BY T.MAT_NO ASC)
                      WHERE ROWNUM <= MYSTOVE.ACT_COUNT) LOOP
        INSERT INTO STL_LG_PROGRRSS
          (MAT_NO,
           STOVE_NO,
           CCMSTOVENO,
           JUDGE_STOVE_NO,
           CAST_NO,
           HEATCNT,
           CCMID,
           FLOWNO,
           CUTSEQNO,
           MATERIAL_NO,
           MATERIAL_NAME,
           GRADECODE,
           GRADENAME,
           BATCH_GROUD_NO,
           FLAG_STOVE_NO,
           STANDARDSCODE,
           STANDARDREMAK,
           DIAMETER,
           FIX_NUM,
           FIX_LEN,
           LENGTH,
           ACT_COUNT,
           WEIGHT,
           RECIVE_FLAG,
           STATUS,
           CUTTIME,
           AFFIRM_FLAG,
           SCRAP_REASON,
           OLD_MAT_NO,
           ALARM_REASON,
           TEST_COUNT,
           IS_VALID,
           FURNACENO,
           GROUP_FLAG,
           PLINE_CODE,
           PRINT_STOVE_NO,
           PRO_PLAN_ID,
           GX_PLAN_NO,
           GPREQ_ID,
           BAL_YEAR_MONTH,
           PLINE_NAME,
           CIC,
           PIC,
           SIC,
           DIC,
           JUDGE_STOVE_NO_SEQ,
           GPTYPE,
           SEQUENCENO)
        VALUES
          (MYROWM.MAT_NO,
           '#STOVE_NO#',
           V_CCMSTOVENO,
           '#JUDGE_STOVE_NO#',
           V_CAST_NO,
           V_HEATCNT,
           V_CCMID,
           V_FLOWNO,
           V_CUTSEQNO,
           '#MATERIAL_NO#',
           '#MATERIAL_NAME#',
           '#GRADECODE#',
           '#GRADENAME#',
           '#FIX_NUM#',
           '#FLAG_STOVE_NO#',
           '#STD_CODE#',
           '#STD_NAME#',
           '#DIAMETER#',
           '#FIX_NUM#',
           '#FIX_LEN#',
           '#LENGTH#',
           MYROWM.ACT_COUNT,
           MYROWM.WEIGHT,
           MYROWM.RECIVE_FLAG,
           '0',
           MYROWM.CUTTIME,
           MYROWM.AFFIRM_FLAG,
           '',
           MYROWM.OLD_MAT_NO,
           '',
           TO_NUMBER(MYROWM.TEST_COUNT) + 1,
           '0',
           '#FURNACENO#',
           '0',
           MYROWM.PLINE_CODE,
           MYROWM.PRINT_STOVE_NO,
           '#PRO_PLAN_ID#',
           '#GX_PLAN_NO#',
           '#GPREQ_ID#',
           MYROWM.BAL_YEAR_MONTH,
           MYROWM.PLINE_NAME,
           MYROWM.CIC,
           MYROWM.PIC,
           MYROWM.SIC,
           MYROWM.DIC,
           V_JUDGE_STOVE_NO_SEQ,
           MYROWM.GPTYPE,
           '#SEQUENCENO#');
           UPDATE STL_LG_PROGRRSS T
         SET T.STATUS = '3'
       WHERE T.STOVE_NO = MYROWM.STOVE_NO
         AND T.JUDGE_STOVE_NO_SEQ = MYROWM.JUDGE_STOVE_NO_SEQ
         AND T.FIX_NUM = MYROWM.FIX_NUM
         AND T.STATUS = '1'
         AND T.MAT_NO = MYROWM.MAT_NO;
         DELETE FROM MAT_GP_M T WHERE T.MAT_NO = MYROWM.MAT_NO AND T.QCM_STAUS = '11';
         DELETE FROM YDM_GP_BUTTRESS T WHERE T.MAT_NO = MYROWM.MAT_NO;
      END LOOP;
    END LOOP;
  ELSE
    FOR MYROW IN (SELECT *
                    FROM (SELECT *
                            FROM STL_LG_PROGRRSS T
                           WHERE T.STOVE_NO = '#STOVE_NO#'
                             AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
                             AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
                             AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
                             AND T.FIX_NUM = '#FIX_NUM#'
                             AND T.STATUS = '1'
                           ORDER BY T.MAT_NO ASC)
                   WHERE ROWNUM <= #OFFLINE_NUM#) LOOP
      INSERT INTO STL_LG_PROGRRSS
        (MAT_NO,
         STOVE_NO,
         CCMSTOVENO,
         JUDGE_STOVE_NO,
         CAST_NO,
         HEATCNT,
         CCMID,
         FLOWNO,
         CUTSEQNO,
         MATERIAL_NO,
         MATERIAL_NAME,
         GRADECODE,
         GRADENAME,
         BATCH_GROUD_NO,
         FLAG_STOVE_NO,
         STANDARDSCODE,
         STANDARDREMAK,
         DIAMETER,
         FIX_NUM,
         FIX_LEN,
         LENGTH,
         ACT_COUNT,
         WEIGHT,
         RECIVE_FLAG,
         STATUS,
         CUTTIME,
         AFFIRM_FLAG,
         SCRAP_REASON,
         OLD_MAT_NO,
         ALARM_REASON,
         TEST_COUNT,
         IS_VALID,
         FURNACENO,
         GROUP_FLAG,
         PLINE_CODE,
         PRINT_STOVE_NO,
         PRO_PLAN_ID,
         GX_PLAN_NO,
         GPREQ_ID,
         BAL_YEAR_MONTH,
         PLINE_NAME,
         CIC,
           PIC,
           SIC,
           DIC,
           JUDGE_STOVE_NO_SEQ,
           GPTYPE,
           SEQUENCENO)
      VALUES
        (MYROW.MAT_NO,
         MYROW.STOVE_NO,
         MYROW.CCMSTOVENO,
         MYROW.JUDGE_STOVE_NO,
         MYROW.CAST_NO,
         MYROW.HEATCNT,
         MYROW.CCMID,
         MYROW.FLOWNO,
         MYROW.CUTSEQNO,
         MYROW.MATERIAL_NO,
         MYROW.MATERIAL_NAME,
         MYROW.GRADECODE,
         MYROW.GRADENAME,
         MYROW.BATCH_GROUD_NO,
         MYROW.FLAG_STOVE_NO,
         MYROW.STANDARDSCODE,
         MYROW.STANDARDREMAK,
         MYROW.DIAMETER,
         MYROW.FIX_NUM,
         MYROW.FIX_LEN,
         MYROW.LENGTH,
         MYROW.ACT_COUNT,
         MYROW.WEIGHT,
         MYROW.RECIVE_FLAG,
         '0',
         MYROW.CUTTIME,
         MYROW.AFFIRM_FLAG,
         '',
         MYROW.OLD_MAT_NO,
         '',
         TO_NUMBER(MYROW.TEST_COUNT) + 1,
         '0',
         MYROW.FURNACENO,
         MYROW.GROUP_FLAG,
         MYROW.PLINE_CODE,
         MYROW.PRINT_STOVE_NO,
         MYROW.PRO_PLAN_ID,
         MYROW.GX_PLAN_NO,
         MYROW.GPREQ_ID,
         MYROW.BAL_YEAR_MONTH,
         MYROW.PLINE_NAME,
         MYROW.CIC,
           MYROW.PIC,
           MYROW.SIC,
           MYROW.DIC,
           V_JUDGE_STOVE_NO_SEQ,
           MYROW.GPTYPE,
           MYROW.SEQUENCENO);
      UPDATE STL_LG_PROGRRSS T
         SET T.STATUS = '3'
       WHERE T.STOVE_NO = MYROW.STOVE_NO
         AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
         AND T.FIX_NUM = MYROW.FIX_NUM
         AND T.STATUS = '1'
         AND T.MAT_NO = MYROW.MAT_NO;
         DELETE FROM MAT_GP_M T WHERE T.MAT_NO = MYROW.MAT_NO AND T.QCM_STAUS = '11';
         DELETE FROM YDM_GP_BUTTRESS T WHERE T.MAT_NO = MYROW.MAT_NO;
    END LOOP;
  END IF;
END;
]]>
</query>
<query id = "FrmStuffFurnace.insertPlnOrd" desc = "生成切割计划">
DECLARE
  V_JUDGE_STOVE_NO_SEQ PLN_STEELFOR_ORD.JUDGE_STOVE_NO_SEQ%TYPE := NULL;
  V_FURNACENO PLN_STEELFOR_ORD.FURNACENO%TYPE := NULL;
BEGIN
  SELECT '#JUDGE_STOVE_NO#' || '-' ||
         LPAD(NVL(MAX(SUBSTR(T.JUDGE_STOVE_NO_SEQ, 8)), 0) + 1, 2, 0) JUDGE_STOVE_NO_SEQ
    INTO V_JUDGE_STOVE_NO_SEQ
    FROM PLN_STEELFOR_ORD T
   WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
     AND T.STOVE_NO = '#STOVE_NO#'
     AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
     AND T.GX_PLAN_NO = '#GX_PLAN_NO#';
  FOR MYROW IN (SELECT *
                  FROM PLN_STEELFOR_ORD T
                 WHERE T.STOVE_NO = '#STOVE_NO#'
                   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
                   AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
                   AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
                ) LOOP
   INSERT INTO PLN_STEELFOR_ORD(
        FURNACENO,
        SEQUENCENO,
        FURNACENO_SEQ,
        PRO_PLAN_ID,
        GX_PLAN_NO,
        CAST_NO,
        CAST_SEQ,
        CAST_STOVE_SEQ,
        CCM_SEQ,
        STOVE_NO,
        JUDGE_STOVE_NO,
        JUDGE_STOVE_NO_SEQ,
        FLAG_STOVE_NO,
        STATUS,
        CCM_STATE,
        CCM_PLN_TYPE,
        GPTYPE,
        CASTINGTYPE,
        PLINE_CODE,
        PLINE_NAME,
        CCMID,
        FLOWNO,
        EF_PLINE_CODE,
        EF_PLINE_NAME,
        WLID_IN,
        WLDESC_IN,
        MATERIAL_NO,
        MATERIAL_NAME,
        GRADECODE,
        GRADENAME,
        DIAMETER,
        LEN_GP_SINGLE,
        CUT_NUM_GP,
        LENGTH_M,
        WEIGHT_GP_ONE,
        WEIGHT_M,
        TOT_MUM_M,
        TOT_WEIGHT_M,
        ACT_WEIGHT_M,
        ACT_MUM_M,
        SURPLUSFLAG,
        EXCESS_WT,
        EXCESS_NUM,
        SURPLUS_TYPE,
        IF_SURPLUS_ALLOTED,
        CIC,
        PIC,
        SIC,
        DIC,
        CHEM_JUDGE_ID,
        PHY_JUDGE_ID,
        COLLIGATE_JUDGE_ID,
        MEMO,
        MAKEMAN,
        MAKETIME,
        DOWNMAN,
        DOWNTIME,
        PRO_MONTH,
        ORDER_NO,
        FINAL_USER_DESC,
        STEELCODE,
        STEELNAME,
        PRODUCCODE,
        PRODUCNAME,
        GOWHERE_CODE,
        GOWHERE_NAME,
        ISENDGX,
        STATE_LK,
        IF_MONITOR_LG,
        PRDCR_NO,
        MERGE_NO,
        PDEPT_NAME,
        PRDCR_MAN,
        CUT_NUM)
 VALUES( 
        '#FURNACENO#',
        MYROW.SEQUENCENO,
        MYROW.FURNACENO_SEQ,
        MYROW.PRO_PLAN_ID,
        MYROW.GX_PLAN_NO,
        MYROW.CAST_NO,
        MYROW.CAST_SEQ,
        MYROW.CAST_STOVE_SEQ,
        MYROW.CCM_SEQ,
        '#STOVE_NO#',
        '#JUDGE_STOVE_NO#',
        V_JUDGE_STOVE_NO_SEQ,
        MYROW.FLAG_STOVE_NO,
        MYROW.STATUS,
        '10',
        '10',
        MYROW.GPTYPE,
        MYROW.CASTINGTYPE,
        MYROW.PLINE_CODE,
        MYROW.PLINE_NAME,
        MYROW.CCMID,
        MYROW.FLOWNO,
        MYROW.EF_PLINE_CODE,
        MYROW.EF_PLINE_NAME,
        MYROW.WLID_IN,
        MYROW.WLDESC_IN,
        MYROW.MATERIAL_NO,
        MYROW.MATERIAL_NAME,
        MYROW.GRADECODE,
        MYROW.GRADENAME,
        MYROW.DIAMETER,
        '#LEN_GP_SINGLE#',
        '#CUT_NUM_GP#',
        '#LENGTH_M#',
        MYROW.WEIGHT_GP_ONE,
        MYROW.WEIGHT_M,
        '#TOT_MUM_M#',
        '#TOT_WEIGHT_M#',
        '',
        '',
        MYROW.SURPLUSFLAG,
        '',
        '',
        MYROW.SURPLUS_TYPE,
        MYROW.IF_SURPLUS_ALLOTED,
        MYROW.CIC,
        MYROW.PIC,
        MYROW.SIC,
        MYROW.DIC,
        MYROW.CHEM_JUDGE_ID,
        MYROW.PHY_JUDGE_ID,
        MYROW.COLLIGATE_JUDGE_ID,
        MYROW.MEMO,
        '#MAKEMAN#',
        SYSDATE,
        MYROW.DOWNMAN,
        SYSDATE,
        MYROW.PRO_MONTH,
        MYROW.ORDER_NO,
        MYROW.FINAL_USER_DESC,
        MYROW.STEELCODE,
        MYROW.STEELNAME,
        MYROW.PRODUCCODE,
        MYROW.PRODUCNAME,
        MYROW.GOWHERE_CODE,
        MYROW.GOWHERE_NAME,
        MYROW.ISENDGX,
        MYROW.STATE_LK,
        MYROW.IF_MONITOR_LG,
        MYROW.PRDCR_NO,
        MYROW.MERGE_NO,
        MYROW.PDEPT_NAME,
        MYROW.PRDCR_MAN,
        MYROW.CUT_NUM);
  END LOOP;
END;
</query>
<query id = "FrmStuffFurnace.selectFurnaceno" desc = "生成虚拟炉号">
SELECT ?||'-'||LPAD(NVL(MAX(SUBSTR(T.FURNACENO, 14)), 0) + 1, 2, 0) FURNACENO
  FROM PLN_STEELFOR_ORD T
 WHERE SUBSTR(T.FURNACENO,0,12) = ?
   AND T.SEQUENCENO = ?
</query>
<query id = "FrmStuffFurnace.cancelQualityTrust" desc = "撤销表检委托">
<![CDATA[
DECLARE
  V_COUNT STL_LG_PROGRRSS.ACT_COUNT%TYPE := NULL;
  V_BELONG_CODE MAT_GP_M.BELONG_CODE%TYPE := NULL;
  V_BELONG_NAME MAT_GP_M.BELONG_NAME%TYPE := NULL;
BEGIN
  SELECT T.DEPARTMENT_CODE
    INTO V_BELONG_CODE
    FROM COM_BASE_PLINE T
   WHERE T.PLINE_CODE = '#PLINE_CODE#'
     AND T.VALIDFLAG = '1';
  SELECT T.DEPARTMENT_DESC
    INTO V_BELONG_NAME
    FROM COM_BASE_PLINE T
   WHERE T.PLINE_CODE = '#PLINE_CODE#'
     AND T.VALIDFLAG = '1';
  SELECT COUNT(1)
    INTO V_COUNT
    FROM STL_LG_GROUP T
   WHERE T.STOVE_NO = '#STOVE_NO#'
     AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
     AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
     AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
     AND T.FIX_NUM = '#FIX_NUM#';
  IF (V_COUNT > 0) THEN
    FOR MYSTOVE IN (SELECT *
                      FROM STL_LG_GROUP T
                     WHERE T.STOVE_NO = '#STOVE_NO#'
                       AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
                       AND T.FURNACENO = '#FURNACENO#'
                       AND T.SEQUENCENO = '#SEQUENCENO#'
                       AND T.FIX_NUM = '#FIX_NUM#') LOOP
      FOR MYROWM IN (SELECT *
                       FROM (SELECT *
                               FROM STL_LG_PROGRRSS T
                              WHERE T.STOVE_NO = MYSTOVE.OLD_STOVE_NO
                                AND T.JUDGE_STOVE_NO_SEQ =
                                    MYSTOVE.OLD_JUDGE_STOVE_NO_SEQ
                                AND T.FURNACENO = MYSTOVE.OLD_FURNACENO
                                AND T.SEQUENCENO = MYSTOVE.OLD_SEQUENCENO
                                AND T.FIX_NUM = MYSTOVE.OLD_FIX_NUM
                                AND T.STATUS = '3'
                                AND T.GROUP_FLAG = '1'
                              ORDER BY T.MAT_NO DESC)
                      WHERE ROWNUM <= MYSTOVE.ACT_COUNT) LOOP
                      INSERT INTO MAT_GP_M
        (MAT_NO,
         PRODUCT_FLAG,
         MAT_STATUS,
         STOVE_NO,
         FLAG_STOVE_NO,
         JUDGE_STOVE_NO,
         CAST_NO,
         CCMID,
         MATERIAL_NO,
         MATERIAL_NAME,
         GRADECODE,
         GRADENAME,
         STD_CODE,
         STD_NAME,
         PLINE_CODE,
         PLINE_NAME,
         DIMATER,
         ACT_LEN,
         FIX_NUM,
         FIX_LEN,
         ACT_COUNT,
         ACT_WEIGHT,
         BELONG_CODE,
         BELONG_NAME,
         JUGDE_APPLY_FLAG,
         INSTOCK_TIME,
         BAL_YEAR_MONTH,
         CREATE_NAME,
         CREATE_TIME,
         GROUD_NO,
         PRINT_STOVE_NO,
         PRO_PLAN_ID,
         GX_PLAN_NO,
         GPREQ_ID,
         DB_ACT_COUNT,
         CIC,
         PIC,
         SIC,
         DIC,
         GPTYPE,
         SEQUENCENO,
         FURNACENO,
         QCM_STAUS)
      VALUES
        (MYROWM.MAT_NO,
         '801401',
         '80150101',
         MYROWM.STOVE_NO,
         MYROWM.FLAG_STOVE_NO,
         MYROWM.JUDGE_STOVE_NO,
         MYROWM.CAST_NO,
         MYROWM.CCMID,
         MYROWM.MATERIAL_NO,
         MYROWM.MATERIAL_NAME,
         MYROWM.GRADECODE,
         MYROWM.GRADENAME,
         MYROWM.STANDARDSCODE,
         MYROWM.STANDARDREMAK,
         MYROWM.PLINE_CODE,
         MYROWM.PLINE_NAME,
         MYROWM.DIAMETER,
         MYROWM.LENGTH,
         MYROWM.FIX_NUM,
         MYROWM.FIX_LEN,
         '1',
         MYROWM.WEIGHT,
         V_BELONG_CODE,
         V_BELONG_NAME,
         '0',
         SYSDATE,
         '',
         '#COL_USER#',
         SYSDATE,
         MYROWM.FIX_NUM,
         MYROWM.PRINT_STOVE_NO,
         MYROWM.PRO_PLAN_ID,
         MYROWM.GX_PLAN_NO,
         MYROWM.GPREQ_ID,
         MYROWM.FIX_NUM,
         MYROWM.CIC,
         MYROWM.PIC,
         MYROWM.SIC,
         MYROWM.DIC,
         MYROWM.GPTYPE,
         MYROWM.SEQUENCENO,
         MYROWM.FURNACENO,
         '11');
         INSERT INTO YDM_GP_BUTTRESS(
        MAT_NO,
        STOVE_NO,
        FLAG_STOVE_NO,
        JUDGE_STOVE_NO,
        STORAGE_NO,
        LOCATION_NO,
        LARY_NO,
        LOC_NO,
        CREATE_NAME,
        CREATE_TIME,
        GROUD_NO)
 VALUES( 
        MYROWM.MAT_NO,
        MYROWM.STOVE_NO,
        MYROWM.FLAG_STOVE_NO,
        MYROWM.JUDGE_STOVE_NO,
        '#STORAGE_NO#',
        '#LOCATION_NO#',
        '',
        '',
        '#COL_USER#',
        SYSDATE,
        MYROWM.FIX_NUM);         
        UPDATE STL_LG_PROGRRSS T
           SET T.STATUS = '1'
         WHERE T.STOVE_NO = MYROWM.STOVE_NO
           AND T.JUDGE_STOVE_NO_SEQ = MYROWM.JUDGE_STOVE_NO_SEQ
           AND T.FURNACENO = MYROWM.FURNACENO
           AND T.SEQUENCENO = MYROWM.SEQUENCENO
           AND T.MAT_NO = MYROWM.MAT_NO
           AND T.STATUS = '3'
           AND T.GROUP_FLAG = '1';
        DELETE FROM STL_LG_PROGRRSS T
         WHERE T.STOVE_NO = MYSTOVE.STOVE_NO
           AND T.JUDGE_STOVE_NO_SEQ = MYSTOVE.JUDGE_STOVE_NO_SEQ
           AND T.FURNACENO = MYSTOVE.FURNACENO
           AND T.SEQUENCENO = MYSTOVE.SEQUENCENO
           AND T.MAT_NO = MYROWM.MAT_NO
           ;
      END LOOP;
    END LOOP;
  ELSE
    FOR MYROW IN (SELECT *
                    FROM (SELECT *
                            FROM STL_LG_PROGRRSS T
                           WHERE T.STOVE_NO = '#STOVE_NO#'
                             AND T.JUDGE_STOVE_NO_SEQ =
                                 '#BACK_JUDGE_STOVE_NO#'
                             AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
                             AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
                             AND T.FIX_NUM = '#FIX_NUM#'
                           ORDER BY T.MAT_NO DESC)
                   WHERE ROWNUM <= #ACT_COUNT#) LOOP
      INSERT INTO MAT_GP_M
        (MAT_NO,
         PRODUCT_FLAG,
         MAT_STATUS,
         STOVE_NO,
         FLAG_STOVE_NO,
         JUDGE_STOVE_NO,
         CAST_NO,
         CCMID,
         MATERIAL_NO,
         MATERIAL_NAME,
         GRADECODE,
         GRADENAME,
         STD_CODE,
         STD_NAME,
         PLINE_CODE,
         PLINE_NAME,
         DIMATER,
         ACT_LEN,
         FIX_NUM,
         FIX_LEN,
         ACT_COUNT,
         ACT_WEIGHT,
         BELONG_CODE,
         BELONG_NAME,
         JUGDE_APPLY_FLAG,
         INSTOCK_TIME,
         BAL_YEAR_MONTH,
         CREATE_NAME,
         CREATE_TIME,
         GROUD_NO,
         PRINT_STOVE_NO,
         PRO_PLAN_ID,
         GX_PLAN_NO,
         GPREQ_ID,
         DB_ACT_COUNT,
         CIC,
         PIC,
         SIC,
         DIC,
         GPTYPE,
         SEQUENCENO,
         FURNACENO,
         QCM_STAUS)
      VALUES
        (MYROW.MAT_NO,
         '801401',
         '80150101',
         MYROW.STOVE_NO,
         MYROW.FLAG_STOVE_NO,
         MYROW.JUDGE_STOVE_NO,
         MYROW.CAST_NO,
         MYROW.CCMID,
         MYROW.MATERIAL_NO,
         MYROW.MATERIAL_NAME,
         MYROW.GRADECODE,
         MYROW.GRADENAME,
         MYROW.STANDARDSCODE,
         MYROW.STANDARDREMAK,
         MYROW.PLINE_CODE,
         MYROW.PLINE_NAME,
         MYROW.DIAMETER,
         MYROW.LENGTH,
         MYROW.FIX_NUM,
         MYROW.FIX_LEN,
         '1',
         MYROW.WEIGHT,
         V_BELONG_CODE,
         V_BELONG_NAME,
         '0',
         SYSDATE,
         '',
         '#COL_USER#',
         SYSDATE,
         MYROW.FIX_NUM,
         MYROW.PRINT_STOVE_NO,
         MYROW.PRO_PLAN_ID,
         MYROW.GX_PLAN_NO,
         MYROW.GPREQ_ID,
         MYROW.FIX_NUM,
         MYROW.CIC,
         MYROW.PIC,
         MYROW.SIC,
         MYROW.DIC,
         MYROW.GPTYPE,
         MYROW.SEQUENCENO,
         MYROW.FURNACENO,
         '11');
         INSERT INTO YDM_GP_BUTTRESS(
        MAT_NO,
        STOVE_NO,
        FLAG_STOVE_NO,
        JUDGE_STOVE_NO,
        STORAGE_NO,
        LOCATION_NO,
        LARY_NO,
        LOC_NO,
        CREATE_NAME,
        CREATE_TIME,
        GROUD_NO)
 VALUES( 
        MYROW.MAT_NO,
        MYROW.STOVE_NO,
        MYROW.FLAG_STOVE_NO,
        MYROW.JUDGE_STOVE_NO,
        '#STORAGE_NO#',
        '#LOCATION_NO#',
        '',
        '',
        '#COL_USER#',
        SYSDATE,
        MYROW.FIX_NUM);
      UPDATE STL_LG_PROGRRSS T
         SET T.STATUS = '1'
       WHERE T.STOVE_NO = MYROW.STOVE_NO
         AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
         AND T.FURNACENO = MYROW.FURNACENO
         AND T.SEQUENCENO = MYROW.SEQUENCENO
         AND T.MAT_NO = MYROW.MAT_NO
         AND T.STATUS = '3';
         DELETE FROM STL_LG_PROGRRSS T
       WHERE T.STOVE_NO = MYROW.STOVE_NO
         AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
         AND T.FURNACENO = MYROW.FURNACENO
         AND T.SEQUENCENO = MYROW.SEQUENCENO
         AND T.MAT_NO = MYROW.MAT_NO
         ;
    END LOOP;
  END IF;
  DELETE FROM PLN_STEELFOR_ORD T
   WHERE SUBSTR(T.FURNACENO, 0, 12) = '#FURNACENO#'
     AND T.SEQUENCENO = '#SEQUENCENO#'
     AND T.JUDGE_STOVE_NO_SEQ = '#BACK_JUDGE_STOVE_NO#';
END;
]]>
</query>
<query id = "FrmStuffFurnace.deleteQualityTrust" desc = "删除操作实绩">
DECLARE
BEGIN
  UPDATE STL_LG_OFFLINE T
     SET T.BACKLINE_NUM = '0', T.STATUS = '0'
   WHERE T.STOVE_NO = '#STOVE_NO#'
     AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
     AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
     AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
     AND T.FIX_NUM = '#FIX_NUM#';
  DELETE FROM STL_LG_SURFACE_M T 
  WHERE T.STOVE_NO = '#STOVE_NO#'
     AND T.JUDGE_STOVE_NO_SEQ = '#BACK_JUDGE_STOVE_NO#'
     AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
     AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
     AND T.FIX_NUM = '#FIX_NUM#';
  
  DELETE FROM STL_LG_OFFLINE_DETIA T
   WHERE T.STOVE_NO = '#STOVE_NO#'
     AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
     AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
     AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
     AND T.FIX_NUM = '#FIX_NUM#';
END;
</query>
<query id = "FrmStuffFurnace.selectMaxSubContractNoSeq" desc = "查询最大委托序号">
SELECT (NVL(MAX(T.SUBCONTRACT_NO_SEQ),0)+1)SUBCONTRACT_NO_SEQ 
  FROM STL_LG_ENTRUST_BILL T
 WHERE T.STOVE_NO = '#STOVE_NO#'
   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
   AND T.FIX_NUM = '#FIX_NUM#'
</query>
<query id = "FrmStuffFurnace.updateStlProcessSub" desc = "修改进程表并赋予委托单号">
<![CDATA[
DECLARE
BEGIN
  FOR MYROW IN (SELECT *
                  FROM (SELECT *
                          FROM STL_LG_PROGRRSS T
                         WHERE T.STOVE_NO = '#STOVE_NO#'
                           AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
                           AND T.FURNACENO = '#FURNACENO#'
                           AND T.SEQUENCENO = '#SEQUENCENO#'
                           AND T.FIX_NUM = '#FIX_NUM#'
                           AND T.STATUS = '1'
                         ORDER BY T.MAT_NO ASC)
                 WHERE ROWNUM <= #SUBCONTRACT_NUM#) LOOP
    UPDATE STL_LG_PROGRRSS T
       SET T.SUBCONTRACT_NO = '#SUBCONTRACT_NO#',
       T.SUBCONTRACT_NO_SEQ = '#SUBCONTRACT_NO_SEQ#'
     WHERE T.MAT_NO = MYROW.MAT_NO;
  END LOOP;
END;
]]>
</query>
<query id = "FrmStuffFurnace.doQueryPlanStaus" desc = "查询切割计划执行状态">
SELECT T.CCM_STATE
  FROM PLN_STEELFOR_ORD T
 WHERE SUBSTR(T.FURNACENO,0,12) = '#FURNACENO#'
   AND T.SEQUENCENO = '#SEQUENCENO#'
   AND T.STOVE_NO = '#STOVE_NO#'
   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
</query>
<query id = "FrmStuffFurnace.doQueryPlanStaus1" desc = "查询切割计划执行状态">
SELECT T.CCM_STATE
  FROM PLN_STEELFOR_ORD T
 WHERE SUBSTR(T.FURNACENO,0,12) = '#FURNACENO#'
   AND T.SEQUENCENO = '#SEQUENCENO#'
   AND T.STOVE_NO = '#STOVE_NO#'
   AND T.JUDGE_STOVE_NO_SEQ = '#BACK_JUDGE_STOVE_NO#'
</query>
<query id = "FrmStuffFurnace.insertSurFaceResult" desc = "委托新增表检实绩表">
DECLARE
  V_JUDGE_STOVE_NO_SEQ PLN_STEELFOR_ORD.JUDGE_STOVE_NO_SEQ%TYPE := NULL;
  V_FURNACENO          PLN_STEELFOR_ORD.FURNACENO%TYPE := NULL;
  V_JUDGE_STOVE_NO     PLN_STEELFOR_ORD.JUDGE_STOVE_NO%TYPE := NULL;
BEGIN
  FOR MYROW IN (SELECT *
                  FROM STL_LG_SURFACE_M T
                 WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
                   AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO#'||'-01'
                   AND T.STOVE_NO = '#STOVE_NO#'
                   AND T.FURNACENO = '#FURNACENO#'
                   AND T.SEQUENCENO = '#SEQUENCENO#'
                   AND ROWNUM = 1) LOOP
                    INSERT INTO STL_LG_SURFACE_M(
        SURFACE_CHECK_NO,
        JUDGE_STOVE_NO,
        GROUD_NO,
        STOVE_NO,
        GRADECODE,
        GRADENAME,
        STD_CODE,
        STD_NAME,
        DIMATER,
        LENGTH_M,
        FIX_NUM,
        FIX_LEN,
        BUG_NO,
        CHECK_RESULT,
        QUANTITY,
        PRO_ORDER_NO,
        CREATE_NAME,
        CREATE_TIME,
        UPDATE_NAME,
        UPDATE_TIME,
        VALIDFLAG,
        MEMO,
        PLINE_CODE,
        PLINE_NAME,
        FLOW_NO1,
        FLOW_NO11,
        FLOW_NO2,
        FLOW_NO21,
        FLOW_NO3,
        FLOW_NO31,
        FLOW_NO4,
        FLOW_NO41,
        FLOW_NO5,
        FLOW_NO51,
        FLOW_NO6,
        FLOW_NO61,
        MIN_DIAMETER1,
        MIN_DIAMETER11,
        MIN_DIAMETER2,
        MIN_DIAMETER21,
        MIN_DIAMETER3,
        MIN_DIAMETER31,
        MIN_DIAMETER4,
        MIN_DIAMETER41,
        MIN_DIAMETER5,
        MIN_DIAMETER51,
        MIN_DIAMETER6,
        MIN_DIAMETER61,
        MAX_DIAMETER1,
        MAX_DIAMETER11,
        MAX_DIAMETER2,
        MAX_DIAMETER21,
        MAX_DIAMETER3,
        MAX_DIAMETER31,
        MAX_DIAMETER4,
        MAX_DIAMETER41,
        MAX_DIAMETER5,
        MAX_DIAMETER51,
        MAX_DIAMETER6,
        MAX_DIAMETER61,
        CASTING_LENGTH1,
        CASTING_LENGTH11,
        CASTING_LENGTH2,
        CASTING_LENGTH21,
        CASTING_LENGTH3,
        CASTING_LENGTH31,
        CASTING_LENGTH4,
        CASTING_LENGTH41,
        CASTING_LENGTH5,
        CASTING_LENGTH51,
        CASTING_LENGTH6,
        CASTING_LENGTH61,
        CHAMFERCUT1,
        WITHIN1,
        STRAIGHTNESS1,
        INSPECTION,
        TREATING_RESULT,
        REMARKS,
        COL_SHIFT,
        COL_GROUP,
        IS_VALID,
        FLAG_STOVE_NO,
        FURNACENO,
        CHAMFERCUT11,
        CHAMFERCUT2,
        CHAMFERCUT21,
        CHAMFERCUT3,
        CHAMFERCUT31,
        CHAMFERCUT4,
        CHAMFERCUT41,
        CHAMFERCUT5,
        CHAMFERCUT51,
        CHAMFERCUT6,
        CHAMFERCUT61,
        WITHIN11,
        WITHIN2,
        WITHIN21,
        WITHIN3,
        WITHIN31,
        WITHIN4,
        WITHIN41,
        WITHIN5,
        WITHIN51,
        WITHIN6,
        WITHIN61,
        STRAIGHTNESS11,
        STRAIGHTNESS2,
        STRAIGHTNESS21,
        STRAIGHTNESS3,
        STRAIGHTNESS31,
        STRAIGHTNESS4,
        STRAIGHTNESS41,
        STRAIGHTNESS5,
        STRAIGHTNESS51,
        STRAIGHTNESS6,
        STRAIGHTNESS61,
        NODE_FUR_FLAG,
        PRO_PLAN_ID,
        GX_PLAN_NO,
        GPREQ_ID,
        JUDGE_STOVE_NO_SEQ,
        SEQUENCENO,
        IMPRESS_DIAMETER1,
        IMPRESS_DIAMETER2,
        IMPRESS_DIAMETER3,
        IMPRESS_DIAMETER4,
        IMPRESS_DIAMETER5,
        IMPRESS_DIAMETER6)
 VALUES( 
        '#SURFACE_CHECK_NO#',
        '#INSERT_JUDGE_STOVE_NO#',
        '#FIX_NUM#',
        '#STOVE_NO#',
        '#GRADECODE#',
        '#GRADENAME#',
        '#STD_CODE#',
        '#STD_NAME#',
        '#DIMATER#',
        '#LENGTH_M#',
        '#FIX_NUM#',
        '#FIX_LEN#',
        MYROW.BUG_NO,
        MYROW.CHECK_RESULT,
        '#QUANTITY#',
        MYROW.PRO_ORDER_NO,
        '#CREATE_NAME#',
        SYSDATE,
        '',
        SYSDATE,
        '1',
        MYROW.MEMO,
        MYROW.PLINE_CODE,
        MYROW.PLINE_NAME,
        MYROW.FLOW_NO1,
        MYROW.FLOW_NO11,
        MYROW.FLOW_NO2,
        MYROW.FLOW_NO21,
        MYROW.FLOW_NO3,
        MYROW.FLOW_NO31,
        MYROW.FLOW_NO4,
        MYROW.FLOW_NO41,
        MYROW.FLOW_NO5,
        MYROW.FLOW_NO51,
        MYROW.FLOW_NO6,
        MYROW.FLOW_NO61,
        MYROW.MIN_DIAMETER1,
        MYROW.MIN_DIAMETER11,
        MYROW.MIN_DIAMETER2,
        MYROW.MIN_DIAMETER21,
        MYROW.MIN_DIAMETER3,
        MYROW.MIN_DIAMETER31,
        MYROW.MIN_DIAMETER4,
        MYROW.MIN_DIAMETER41,
        MYROW.MIN_DIAMETER5,
        MYROW.MIN_DIAMETER51,
        MYROW.MIN_DIAMETER6,
        MYROW.MIN_DIAMETER61,
        MYROW.MAX_DIAMETER1,
        MYROW.MAX_DIAMETER11,
        MYROW.MAX_DIAMETER2,
        MYROW.MAX_DIAMETER21,
        MYROW.MAX_DIAMETER3,
        MYROW.MAX_DIAMETER31,
        MYROW.MAX_DIAMETER4,
        MYROW.MAX_DIAMETER41,
        MYROW.MAX_DIAMETER5,
        MYROW.MAX_DIAMETER51,
        MYROW.MAX_DIAMETER6,
        MYROW.MAX_DIAMETER61,
        MYROW.CASTING_LENGTH1,
        MYROW.CASTING_LENGTH11,
        MYROW.CASTING_LENGTH2,
        MYROW.CASTING_LENGTH21,
        MYROW.CASTING_LENGTH3,
        MYROW.CASTING_LENGTH31,
        MYROW.CASTING_LENGTH4,
        MYROW.CASTING_LENGTH41,
        MYROW.CASTING_LENGTH5,
        MYROW.CASTING_LENGTH51,
        MYROW.CASTING_LENGTH6,
        MYROW.CASTING_LENGTH61,
        MYROW.CHAMFERCUT1,
        MYROW.WITHIN1,
        MYROW.STRAIGHTNESS1,
        MYROW.INSPECTION,
        MYROW.TREATING_RESULT,
        MYROW.REMARKS,
        '#COL_SHIFT#',
        '#COL_GROUP#',
        '0',
        MYROW.FLAG_STOVE_NO,
        '#FURNACENO#',
        MYROW.CHAMFERCUT11,
        MYROW.CHAMFERCUT2,
        MYROW.CHAMFERCUT21,
        MYROW.CHAMFERCUT3,
        MYROW.CHAMFERCUT31,
        MYROW.CHAMFERCUT4,
        MYROW.CHAMFERCUT41,
        MYROW.CHAMFERCUT5,
        MYROW.CHAMFERCUT51,
        MYROW.CHAMFERCUT6,
        MYROW.CHAMFERCUT61,
        MYROW.WITHIN11,
        MYROW.WITHIN2,
        MYROW.WITHIN21,
        MYROW.WITHIN3,
        MYROW.WITHIN31,
        MYROW.WITHIN4,
        MYROW.WITHIN41,
        MYROW.WITHIN5,
        MYROW.WITHIN51,
        MYROW.WITHIN6,
        MYROW.WITHIN61,
        MYROW.STRAIGHTNESS11,
        MYROW.STRAIGHTNESS2,
        MYROW.STRAIGHTNESS21,
        MYROW.STRAIGHTNESS3,
        MYROW.STRAIGHTNESS31,
        MYROW.STRAIGHTNESS4,
        MYROW.STRAIGHTNESS41,
        MYROW.STRAIGHTNESS5,
        MYROW.STRAIGHTNESS51,
        MYROW.STRAIGHTNESS6,
        MYROW.STRAIGHTNESS61,
        '0',
        '#PRO_PLAN_ID#',
        '#GX_PLAN_NO#',
        '',
        '#JUDGE_STOVE_NO_SEQ#',
        '#SEQUENCENO#',
        '#IMPRESS_DIAMETER1#',
        '#IMPRESS_DIAMETER2#',
        '#IMPRESS_DIAMETER3#',
        '#IMPRESS_DIAMETER4#',
        '#IMPRESS_DIAMETER5#',
        '#IMPRESS_DIAMETER6#');
  END LOOP;
END;
</query>
</queryMap>