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

<?xml version="1.0" encoding="UTF-8"?>
<queryMap desc = "修改坯长">
<query id = "FrmUpdateLenth.doQuery" desc = "查询未送判余材">
SELECT T.STOVE_NO,
       T.JUDGE_STOVE_NO,
       T.MATERIAL_NO,
       T.MATERIAL_NAME,
       T.GRADECODE,
       T.GRADENAME,
       T.PRO_ORDER_NO,
       T.PLINE_CODE,
       T.PLINE_NAME,
       T.DIMATER,
       T.ACT_LEN,
       T.ACT_LEN AS UPDATE_LEN,
       T.FIX_NUM,
       T.FIX_LEN,
       SUM(T.ACT_COUNT) ACT_COUNT,
       SUM(T.ACT_WEIGHT) ACT_WEIGHT,
       T.BELONG_CODE,
       T.BELONG_NAME,
       T.GROUD_NO,
       T.PRO_PLAN_ID,
       T.GX_PLAN_NO,
       T.EF_PLINE_CODE,
       T.EF_PLINE_NAME
  FROM MAT_GP_M T
 WHERE 1 = 1
 AND T.JUGDE_APPLY_CODE IS NULL
 AND T.QCM_STAUS = '00'
 AND T.PRO_PLAN_ID_ZG IS NULL
</query>
<query id = "FrmUpdateLenth.updateLen" desc = "修改坯长">
<![CDATA[
DECLARE
BEGIN
  FOR MYROW IN (SELECT * FROM (SELECT T.MAT_NO
                  FROM MAT_GP_M T
                 WHERE T.STOVE_NO = '#STOVE_NO#'
                   AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
                   AND T.FIX_NUM = '#FIX_NUM#'
                   AND T.ACT_LEN = TO_NUMBER('#ACT_LEN#')
                   AND T.JUGDE_APPLY_CODE IS NULL
                   AND T.QCM_STAUS = '00'
                   AND T.PRO_PLAN_ID_ZG IS NULL
                 ORDER BY T.MAT_NO ASC)WHERE ROWNUM <= #ACT_COUNT#) LOOP
    UPDATE MAT_GP_M T
       SET T.ACT_LEN = '#UPDATE_LEN#'
     WHERE T.MAT_NO = MYROW.MAT_NO;
  END LOOP;
END;
]]>
</query>
</queryMap>