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

<?xml version="1.0" encoding="UTF-8"?>
<queryMap desc = "锻造上料实绩 ">
<query id = "FrmDzFeedLoad.doQueryDataM" desc = "查询计划信息(主表)">
<![CDATA[
  SELECT 
       T.HEAT_PLAN_NO,
       T.GX_PRO_SEQ,
       T.ZY_BATCH_ID,
       T.STOVE_NO,
       T.JUDGE_STOVE_NO,
       T.FLAG_STOVE_NO,
       T.UPPER_HEATPLAN_ID,
       T.PLANSTATUS,
       T.NODE_ESTATUS,
       T.UPPER_PROCESS_CODE,
       T.NEXT_PROCESS_CODE,
       T.ISENDGX,
       T.IF_MATCH_ODD,
       T.IF_DO_HEAT_PLAN,
       T.PRO_PLAN_ID,
       T.GX_PLAN_NO,
       T.CCM_PRO_PLAN_ID,
       T.CCM_GX_PLAN_NO,
       T.GOWHERE_CODE,
       T.GOWHERE_NAME,
       T.PLINE_CODE,
       T.PLINE_NAME,
       T.CASTINGTYPE,
       T.GRADECODE,
       T.GRADENAME,
       T.STEELCODE,
       T.STEELNAME,
       T.WLID_IN,
       T.WLDESC_IN,
       T.OUTWL_ID,
       T.OUTWL_DESC,
       T.PROD_STANDARD,
       T.OUTPUT_STANDARD,
       T.DIAMETER_IN,
       T.LENGTH_IN,
       T.WT_ONE_IN,
       T.LEN_GP_SINGLE,
       T.WT_GP_SINGLE,
       T.PLN_INSINGLE_NUM,
       T.PLN_INSINGLE_WT,
       T.CUT_NUM_GP,
       T.PLN_INDOUBLE_NUM,
       T.PLN_INDOUBLE_WT,
       T.DIAMETER_OUT,
       T.LENGTH_OUT,
       T.OUT_WT_ONE,
       T.PLN_OUTSINGLE_NUM,
       T.PLN_OUTSINGLE_W,
       T.CUT_NUM_OUT,
       T.PLN_OUTDOUBLE_NUM,
       T.PLN_OUTDOUBLE_W,
       T.LEN_CUTHEAD,
       T.LEN_CUTEND,
       T.ORDER_SOURCE,
       T.ORD_LN_DLY_PK,
       T.ORDER_NO,
       T.ORDER_SEQ,
       T.DELIVERY_NO,
       T.REQ_BL_ID,
       T.IF_EXPORT,
       T.PRIORITY,
       T.PRIORITY_MEMO,
       T.PRO_MONTH,
       T.IF_MONITOR,
       T.PRDCR_NO,
       T.MONITOR_POINT,
       T.BOM,
       T.INDEX_SEQ,
       T.WHOLE_BACKLOG,
       T.WHOLE_BACKLOG_DESC,
       T.CIC,
       T.PIC,
       T.SIC,
       T.DIC,
       T.CRAFT_FILE_NO,
       T.CRAFT_FILE_MAN,
       T.CRAFT_SEQ,
       T.SEC_CRAFT_FILE_NO,
       T.STATION_ROAD,
       T.PRO_DAY,
       T.BAL_YEAR_MONTH,
       T.CREATE_NAME,
       TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
       T.UPDATE_NAME,
       TO_CHAR(T.UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
       T.DOWNMAN,
       TO_CHAR(T.DOWNTIME, 'YYYY-MM-DD HH24:MI:SS') DOWNTIME
 FROM PLN_ZY_DZ_M T
 WHERE  1 = 1
 ]]>
</query>
<query id = "FrmDzFeedLoad.doQueryDataC" desc = "查询计划信息(从表)">
<![CDATA[
  SELECT T.HEAT_PLAN_NO,
       T.HEAT_PLAN_SQE,
       T.JUGDE_APPLY_CODE,
       T.ZY_BATCH_ID,
       T.STOVE_NO,
       T.JUDGE_STOVE_NO,
       T.PRO_PLAN_ID,
       T.GX_PLAN_NO,
       T.PLINE_CODE,
       T.PLINE_NAME,
       T.DIAMETER,
       T.LEN_GP_SINGLE,
       T.WT_GP_SINGLE,
       T.CUT_NUM_GP,
       T.LENGTH_M,
       T.WEIGHT_M,
       T.PLAN_INDOUBLE_NUM,
       T.PLAN_INDOUBLE_WT,
       #something#
       T.FLAG_STOVE_NO
  FROM PLN_ZY_DZ_C T, PLN_ZY_DZ_M M
 WHERE T.HEAT_PLAN_NO = M.HEAT_PLAN_NO
  
 ]]>
</query>

<query id = "FrmDzFeedLoad.node" desc = "上料确认">
<![CDATA[
DECLARE
  V_JUDGE_STOVE_NO   YDM_GP_OUTLIST.JUDGE_STOVE_NO%TYPE := ?;
  V_JUGDE_APPLY_CODE MAT_GP_M.JUGDE_APPLY_CODE%TYPE := ?;
  V_ACT_COUNT        YDM_GP_OUTLIST.ACT_LEN%TYPE := ?;
  V_FIX_NUM          MAT_GP_M.FIX_NUM%TYPE := ?;
  V_PLINE_CODE       PLN_ZY_ZG_M.PLINE_CODE%TYPE := ?;
  V_OUTSTOCK_DOC     YDM_GP_OUTLIST.OUTSTOCK_DOC%TYPE := NULL;
  V_ICOUNT           NUMBER := 1;

BEGIN

  --生成 出库单编号
  SELECT 'OA'  || TO_CHAR(SYSDATE, 'YYMMDD') ||
         LPAD(NVL(MAX(SUBSTR(T.OUTSTOCK_DOC, 9)), 0) + 1, 5, 0) DI
    INTO V_OUTSTOCK_DOC
    FROM YDM_GP_OUTLIST T
   WHERE TO_CHAR(T.OUTSTOCK_TIME, 'YYYY-MM-DD') =
         TO_CHAR(SYSDATE, 'YYYY-MM-DD');

  FOR MYROW IN (SELECT T.*,
                       --T2.BATCH_NO,
                       T2.STORAGE_NO,
                       T2.LOCATION_NO,
                       T2.LARY_NO,
                       T2.LOC_NO,
                       T2.STORAGE_ATTR,
                       T2.STORAGE_ATTR_NAME,
                       T2.STORAGE_TYPE_NO,
                       T2.STORAGE_TYPE_NAME,
                       T2.DEPARTMENT_CODE,
                       T2.DEPARTMENT_DESC,
                       T2.MANAGEMENT_NO,
                       T2.MANAGEMENT_NAME
                  FROM MAT_GP_M T, YDM_GP_BUTTRESS T2
                 WHERE T.MAT_NO = T2.MAT_NO
                   AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
                   AND T.JUGDE_APPLY_CODE = V_JUGDE_APPLY_CODE
                   AND T.FIX_NUM = V_FIX_NUM
                   --#Something#
                   AND ROWNUM <= V_ACT_COUNT
                 ORDER BY T.MAT_NO DESC) LOOP
    --新增出库实绩表记录
    INSERT INTO YDM_GP_OUTLIST
      (OUTSTOCK_SQE,
       -- OUTSTOCK_PLAN_NO,
       OUTSTOCK_DOC,
       OUTSTOCK_TYPE_CODE,
       OUTSTOCK_TYPE_NAME,
       /*ICCAR_NO,
       VEHICLE_NO,*/
       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,
       DIMATER,
       HEIGHT,
       ACT_LEN,
       FIX_NUM,
       FIX_LEN,
       ACT_COUNT,
       ACT_WEIGHT,
       ACT_THEORY_WEIGHT,
       PONDER_NO,
       PONDER_GROSS_WT,
       PLINE_CODE,
       PLINE_NAME,
       PRO_ORDER_NO,
       ORDER_NO,
       ORDER_SEQ,
       ORDER_SEQ_NO,
       ORD_PK,
       ORD_LN_PK,
       ORD_LN_DLY_PK,
       BELONG_CODE,
       BELONG_NAME,
       BAR_CODE,
       STORAGE_NO,
       LOCATION_NO,
       LARY_NO,
       LOC_NO,
       DEPARTMENT_CODE,
       DEPARTMENT_DESC,
       MANAGEMENT_NO,
       MANAGEMENT_NAME,
       /* TAR_STORAGE_NO,
       TAR_LOCATION_NO,
       TAR_LARY_NO,
       TAR_LOC_NO,
       TAR_DEPARTMENT_CODE,
       TAR_DEPARTMENT_DESC,
       TAR_MANAGEMENT_NO,
       TAR_MANAGEMENT_NAME,*/
       --TAR_REC_FLAG,
       
       RPO_TIME,
       PRO_BC,
       PRO_BZ,
       BAL_YEAR_MONTH,
       
       OUTSTOCK_TIME,
       
       STORAGE_ATTR,
       STORAGE_ATTR_NAME,
       STORAGE_TYPE_NO,
       STORAGE_TYPE_NAME,
       --HAND_FLAG,
       --VALIDFLAG,
       MEMO,
       CREATE_NAME,
       CREATE_TIME,
       UPDATE_NAME,
       UPDATE_TIME,
       /*DELETE_NAME,
       DELETE_TIME,*/
       GROUD_NO,
       /* SEND_NUM,
       RECEIV_NO,
       RECEIV_NM,*/
       --M_BILL_NO,
       PRINT_STOVE_NO)
    VALUES
      (V_OUTSTOCK_DOC || LPAD(V_ICOUNT, 4, 0),
       -- MYROW.OUTSTOCK_PLAN_NO,
       V_OUTSTOCK_DOC,
       '800803',
       '倒库出库',
       /* MYROW.ICCAR_NO,
       MYROW.VEHICLE_NO,*/
       MYROW.MAT_NO,
       MYROW.PRODUCT_FLAG,
       MYROW.MAT_STATUS,
       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.STD_CODE,
       MYROW.STD_NAME,
       MYROW.DIMATER,
       MYROW.HEIGHT,
       MYROW.ACT_LEN,
       MYROW.FIX_NUM,
       MYROW.FIX_LEN,
       MYROW.ACT_COUNT,
       MYROW.ACT_WEIGHT,
       MYROW.ACT_THEORY_WEIGHT,
       MYROW.PONDER_NO,
       MYROW.PONDER_GROSS_WT,
       MYROW.PLINE_CODE,
       MYROW.PLINE_NAME,
       MYROW.PRO_ORDER_NO,
       MYROW.ORDER_NO,
       MYROW.ORDER_SEQ,
       MYROW.ORDER_SEQ_NO,
       MYROW.ORD_PK,
       MYROW.ORD_LN_PK,
       MYROW.ORD_LN_DLY_PK,
       MYROW.BELONG_CODE,
       MYROW.BELONG_NAME,
       MYROW.BAR_CODE,
       MYROW.STORAGE_NO,
       MYROW.LOCATION_NO,
       MYROW.LARY_NO,
       MYROW.LOC_NO,
       MYROW.DEPARTMENT_CODE,
       MYROW.DEPARTMENT_DESC,
       MYROW.MANAGEMENT_NO,
       MYROW.MANAGEMENT_NAME,
       /* MYROW.TAR_STORAGE_NO,
       MYROW.TAR_LOCATION_NO,
       MYROW.TAR_LARY_NO,
       MYROW.TAR_LOC_NO,
       MYROW.TAR_DEPARTMENT_CODE,
       MYROW.TAR_DEPARTMENT_DESC,
       MYROW.TAR_MANAGEMENT_NO,
       MYROW.TAR_MANAGEMENT_NAME,*/
       --MYROW.TAR_REC_FLAG,
       
       SYSDATE,
       MYROW.PRO_BC,
       MYROW.PRO_BZ,
       MYROW.BAL_YEAR_MONTH,
       
       SYSDATE,
       
       MYROW.STORAGE_ATTR,
       MYROW.STORAGE_ATTR_NAME,
       MYROW.STORAGE_TYPE_NO,
       MYROW.STORAGE_TYPE_NAME,
       
       MYROW.MEMO,
       MYROW.CREATE_NAME,
       SYSDATE,
       MYROW.UPDATE_NAME,
       SYSDATE,
       
       MYROW.GROUD_NO,
       /*MYROW.SEND_NUM,
       MYROW.RECEIV_NO,
       MYROW.RECEIV_NM,*/
       --MYROW.M_BILL_NO,
       MYROW.PRINT_STOVE_NO);
  
    --复制数据到历史表
    insert into MAT_GP_M_HISTORY
      select * from MAT_GP_M t where t.mat_no = MYROW.MAT_NO;
  
    --删除物料主表记录
    DELETE FROM MAT_GP_M T WHERE T.MAT_NO = MYROW.MAT_NO;
  
    --删除位置表记录
    DELETE FROM YDM_GP_BUTTRESS T2 WHERE T2.MAT_NO = MYROW.MAT_NO;
    V_ICOUNT := V_ICOUNT + 1;
  END LOOP;
END;
]]>
</query>

<query id = "FrmDzFeedLoad.updatePlnZyDzMEntity" desc = "上料：修改主表状态">
<![CDATA[
    UPDATE PLN_ZY_DZ_M T SET T.NODE_ESTATUS = '10' WHERE T.HEAT_PLAN_NO = ?
 ]]>
</query>

<query id = "FrmDzFeedLoad.updatePlnZyDzCEntity" desc = "上料：修改从表支吨">
<![CDATA[
	UPDATE PLN_ZY_DZ_C T
   SET T.REAL_INDOUBLE_NUM = ?, T.REAL_INDOUBLE_WT = ?
 WHERE T.HEAT_PLAN_NO = ?
   AND T.HEAT_PLAN_SQE = ?
 ]]>
</query>

<query id = "FrmDzFeedLoad.updatePlnZyDzMEntityBack" desc = "上料回退：修改主表状态、从表支吨">
<![CDATA[
DECLARE
  V_HEAT_PLAN_NO PLN_ZY_DZ_M.HEAT_PLAN_NO%type := ?;
BEGIN
  UPDATE PLN_ZY_DZ_M T
     SET T.NODE_ESTATUS = '00'
   WHERE T.HEAT_PLAN_NO = V_HEAT_PLAN_NO;

  UPDATE PLN_ZY_DZ_C T
     SET T.REAL_INDOUBLE_NUM = 0, T.REAL_INDOUBLE_WT = 0
   WHERE T.HEAT_PLAN_NO = V_HEAT_PLAN_NO;

  DELETE FROM FRG_LOADING_RESULT T WHERE T.HEAT_PLAN_NO = V_HEAT_PLAN_NO;
END;
 ]]>
</query>

<query id = "FrmDzFeedLoad.insertLoadingResult" desc = "插入上料实绩表">
<![CDATA[
DECLARE
  V_HEAT_PLAN_NO   PLN_ZY_DZ_C.HEAT_PLAN_NO%type := ?;
  V_HEAT_PLAN_SQE  PLN_ZY_DZ_C.HEAT_PLAN_SQE%type := ?;
  V_PLINE_CODE     PLN_ZY_DZ_C.PLINE_CODE%type := ?;
  V_JUDGE_STOVE_NO PLN_ZY_DZ_C.JUDGE_STOVE_NO%type := ?;
  V_RESULT_NO      FRG_LOADING_RESULT.RESULT_NO%type := NULL;
  V_OUTSTOCK_DOC   YDM_GP_OUTLIST.OUTSTOCK_DOC%type := NULL;
BEGIN

  SELECT V_PLINE_CODE || TO_CHAR(SYSDATE, 'YYMMDD') ||
         LPAD(NVL(MAX(SUBSTR(T.RESULT_NO, 11)), 0) + 1, 6, 0) ASD
    INTO V_RESULT_NO
    FROM FRG_LOADING_RESULT T
   WHERE T.PLINE_CODE = V_PLINE_CODE
     AND TO_CHAR(T.LOAD_TIME, 'YYYY-MM-DD') =
         TO_CHAR(SYSDATE, 'YYYY-MM-DD');

  select T.OUTSTOCK_DOC
    INTO V_OUTSTOCK_DOC
    from YDM_GP_OUTLIST t
   WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
   GROUP BY T.OUTSTOCK_DOC;

  FOR MYROW IN (SELECT T.*,
                       T1.CUT_NUM_GP CUT_NUM_GP1,
                       T1.PLAN_INDOUBLE_NUM,
                       T1.PLAN_INDOUBLE_WT,
                       T1.REAL_INDOUBLE_NUM,
                       T1.REAL_INDOUBLE_WT
                  FROM PLN_ZY_DZ_M T, PLN_ZY_DZ_C T1
                 WHERE T.HEAT_PLAN_NO = T1.HEAT_PLAN_NO
                   AND T1.HEAT_PLAN_NO = V_HEAT_PLAN_NO
                   AND T1.HEAT_PLAN_SQE = V_HEAT_PLAN_SQE) LOOP
  
    INSERT INTO FRG_LOADING_RESULT
      (RESULT_NO,
       HEAT_PLAN_NO,
       ZY_BATCH_ID,
       STOVE_NO,
       JUDGE_STOVE_NO,
       FLAG_STOVE_NO,
       PRO_PLAN_ID,
       GX_PLAN_NO,
       PLINE_CODE,
       PLINE_NAME,
       /*IF_MONITOR_RCL,
       MONITORDEMAND,*/
       PRDCR_NO,
       /*PRODUCER,
       PRODUCER_TIME,*/
       
       /*SOURE_CODE,
       SOURE_NAME,*/
       GRADECODE,
       GRADENAME,
       OUTNUM_CUT,
       DIAMETER_IN,
       LEN_SINGLE_IN,
       LENGTH_IN,
       /*LENGTHMAX_IN,
       LENGTHMIN_IN,*/
       PRO_NUM,
       PRO_WT,
       FAIL_NUM,
       FAIL_WT,
       /* FAIL_BILL,
       OFFLINE_NUM,
       OFFLINE_WT,
       RE_NUM,
       RE_WT,*/
       LOAD_TIME,
       LOAD_SHIFT,
       LOAD_GROUP,
       OUTSTOCK_DOC,
       PRO_YEAR_MONTH_DAY,
       /*BAL_YEAR_MONTH,
       COL_MODE,*/
       CREATET_USER,
       CREATE_TIME,
       /* UPDATE_TIME,
       UPDATE_NAME,
       MEMO,*/
       OUTWL_ID,
       OUTWL_DESC,
       DIAMETER_OUT,
       LENGTH_OUT,
       OUT_WT_ONE)
    VALUES
      (V_RESULT_NO,
       MYROW.HEAT_PLAN_NO,
       MYROW.ZY_BATCH_ID,
       MYROW.STOVE_NO,
       MYROW.JUDGE_STOVE_NO,
       MYROW.FLAG_STOVE_NO,
       MYROW.PRO_PLAN_ID,
       MYROW.GX_PLAN_NO,
       MYROW.PLINE_CODE,
       MYROW.PLINE_NAME,
       
       /* MYROW.IF_MONITOR_RCL,
       MYROW.MONITORDEMAND,*/
       MYROW.PRDCR_NO,
       /*MYROW.PRODUCER,
       SYSDATE,*/
       
       --MYROW.SOURE_CODE,
       --MYROW.SOURE_NAME,
       MYROW.GRADECODE,
       MYROW.GRADENAME,
       MYROW.CUT_NUM_GP1, --倍尺数
       MYROW.DIAMETER_IN,
       MYROW.LEN_GP_SINGLE, 
       MYROW.LENGTH_IN,
      /* MYROW.LENGTHMAX_IN,
       MYROW.LENGTHMIN_IN,*/
       MYROW.REAL_INDOUBLE_NUM, --实际上料支
       MYROW.REAL_INDOUBLE_WT,
       MYROW.PLAN_INDOUBLE_NUM - MYROW.REAL_INDOUBLE_NUM,
       MYROW.PLAN_INDOUBLE_WT - MYROW.REAL_INDOUBLE_WT,
       /* MYROW.FAIL_BILL,
       MYROW.OFFLINE_NUM,
       MYROW.OFFLINE_WT,
       MYROW.RE_NUM,
       MYROW.RE_WT,*/
       SYSDATE,
       ?,
       ?,
       V_OUTSTOCK_DOC,
       TO_CHAR(SYSDATE, 'YYYYMMDD'),
       --MYROW.BAL_YEAR_MONTH,
       --MYROW.COL_MODE,
       ?,
       SYSDATE,
       /*SYSDATE,
       MYROW.UPDATE_NAME,
       MYROW.MEMO,*/
       MYROW.OUTWL_ID,
       MYROW.OUTWL_DESC,
       MYROW.DIAMETER_OUT,
       MYROW.LENGTH_OUT,
       MYROW.OUT_WT_ONE);
  
  END LOOP;
END;
 ]]>
</query>

<query id = "FrmDzFeedLoad.nodeBack" desc = "上料回退">
<![CDATA[
DECLARE
  V_JUDGE_STOVE_NO   YMD_GP_OUTLIST.JUDGE_STOVE_NO%TYPE := ?;
  V_JUGDE_APPLY_CODE MAT_GP_M.JUGDE_APPLY_CODE%TYPE := ?;
  V_ACT_COUNT        YMD_GP_OUTLIST.ACT_LEN%TYPE := ?;
  V_FIX_NUM          MAT_GP_M.FIX_NUM%TYPE := ?;
  V_PLINE_CODE       MAT_GP_M.PLINE_CODE%TYPE := ?;

BEGIN
  FOR MYROW IN (SELECT T.*
                  FROM YDM_GP_OUTLIST T
                 WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
                   AND T.PLINE_CODE = V_PLINE_CODE) LOOP
  
    --恢复位置表记录
    INSERT INTO YDM_GP_BUTTRESS
      (MAT_NO,
       --LOT_NO,
       JUDGE_STOVE_NO,
       STORAGE_NO,
       LOCATION_NO,
       LARY_NO,
       LOC_NO,
       STORAGE_ATTR,
       STORAGE_ATTR_NAME,
       STORAGE_TYPE_NO,
       STORAGE_TYPE_NAME,
       DEPARTMENT_CODE,
       DEPARTMENT_DESC,
       MANAGEMENT_NO,
       MANAGEMENT_NAME)
    VALUES
      (MYROW.MAT_NO,
       --MYROW.LOT_NO,
       MYROW.JUDGE_STOVE_NO,
       MYROW.STORAGE_NO,
       MYROW.LOCATION_NO,
       MYROW.LARY_NO,
       MYROW.LOC_NO,
       MYROW.STORAGE_ATTR,
       MYROW.STORAGE_ATTR_NAME,
       MYROW.STORAGE_TYPE_NO,
       MYROW.STORAGE_TYPE_NAME,
       MYROW.DEPARTMENT_CODE,
       MYROW.DEPARTMENT_DESC,
       MYROW.MANAGEMENT_NO,
       MYROW.MANAGEMENT_NAME);
  
    DELETE FROM YDM_GP_OUTLIST T WHERE T.MAT_NO = MYROW.MAT_NO;
  
  END LOOP;

  FOR MYROW2 IN (SELECT *
                   FROM MAT_GP_M_HISTORY T
                  WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
                    AND T.JUGDE_APPLY_CODE = V_JUGDE_APPLY_CODE
                    AND T.FIX_NUM = V_FIX_NUM
                    AND ROWNUM <= V_ACT_COUNT
                  ORDER BY T.MAT_NO) LOOP
  
    --复制数据到物料主表
    insert into MAT_GP_M
      select * from MAT_GP_M_HISTORY t where t.mat_no = MYROW2.MAT_NO;
  
    --删除历史表记录
    DELETE FROM MAT_GP_M_HISTORY T WHERE T.MAT_NO = MYROW2.MAT_NO;
  
  END LOOP;
END;
]]>
</query>

<query id = "FrmDzFeedLoad.doQueryNODE_ESTATUS" desc = "查询结炉状态">
<![CDATA[
	select T.NODE_ESTATUS from PLN_ZY_DZ_M t where t.heat_plan_no = ?
 ]]>
</query>

<query id = "FrmDzFeedLoad.doQueryOUTSTOCK_DOC" desc = "查询出库单号">
<![CDATA[
	select T.OUTSTOCK_DOC
  from YDM_GP_OUTLIST t
 WHERE T.JUDGE_STOVE_NO = ?
 GROUP BY T.OUTSTOCK_DOC
 ]]>
</query>

</queryMap>