From 2c487973ca82fd08019bb4b2db08020eded4c1ad Mon Sep 17 00:00:00 2001
From: Alawn <alawn.cn@gmail.com>
Date: Fri, 6 Jan 2023 19:27:24 +0800
Subject: [PATCH] =?UTF-8?q?=E6=8B=9B=E8=A1=8C=E9=9A=94=E6=97=A5=E6=B5=81?=
 =?UTF-8?q?=E6=B0=B4=E4=B8=ADdsk=5Fnam=E6=95=B0=E6=8D=AE=E8=A1=A5=E5=85=85?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 cap/etc/channel/cmb/QUERY_CMB.XML | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/cap/etc/channel/cmb/QUERY_CMB.XML b/cap/etc/channel/cmb/QUERY_CMB.XML
index 6a67470..1318b69 100644
--- a/cap/etc/channel/cmb/QUERY_CMB.XML
+++ b/cap/etc/channel/cmb/QUERY_CMB.XML
@@ -65,6 +65,21 @@
          </Sentence>
          <Fields>ACC_NBR|TRS_DAT|</Fields>
       </DynSentence>
+       
+      <DynSentence name="UPD_CAPCMBHIJNL_RFDSKNO"> <!--更新7日内隔日退款流水批次信息 -->
+         <Sentence>
+            UPDATE CAPCMBHIJNL A
+            SET
+            DSK_NAM
+            =
+            NVL((SELECT  DSK_NAM
+            FROM CAPBATINF B
+            WHERE  B.CORG_DSK_NO=A.YUR_REF
+            ),' ') 
+            WHERE  ACC_NBR=? AND TRS_DAT BETWEEN ? AND ?  AND A.YUR_REF!=' ' AND TRS_COD='AGRD' AND DSK_NAM=' '
+         </Sentence>
+         <Fields>ACC_NBR|RF_TRS_DAT|TRS_DAT|</Fields>
+      </DynSentence>       
       <FlowCtrl>
          <Delete>TRSP_CD</Delete>
          <Delete>TRSP_MSG</Delete>
@@ -233,6 +248,18 @@
                <Return/>
             </If>
 
+            <Set>RF_TRS_DAT=CALCDATE($TRS_DAT,-,d,7)</Set>    
+            <!--根据小批号关联流水更新隔日退款交易大批号-->
+            <Exec func="PUB:ExecSql" error="IGNORE">
+               <Arg name="SqlCmd"    value="UPD_CAPCMBHIJNL_RFDSKNO"/>
+            </Exec>
+            <If condition="~RetCod=-1">
+               <Set>Rsp_Cd=80</Set>
+               <Set>Rsp_Msg=更新代发交易明细发放批次信息失败</Set>
+               <Exec func="PUB:RollbackWork" />
+               <Return/>
+            </If>
+
          </If>
 
          <Set>CRE_TM=GETDATETIME()</Set>