9状态通知问题

This commit is contained in:
Alawn
2021-08-18 16:15:01 +08:00
parent 2b6705a3e4
commit a0d34e50fe
2 changed files with 31 additions and 16 deletions
+5 -4
View File
@@ -14,13 +14,14 @@
unfinished_num ,(case when BAT_STS in ('4','2') then 1 else 0 end) finish_num
from CAPBATINF b where b.dsk_nam in
(select DSK_NAM from CAPDSKINF a where a.dsk_sts = '1' and ORD_DT >= ? )) group by dsk_nam) c
where c.unfinished_num = 0 and c.finish_num > 0)
where c.unfinished_num = 0 and c.finish_num > 0
union select DSK_NAM from CAPDSKINF a where a.dsk_sts = '9' and ORD_DT >= ?)
AND A.Customer_Id = B.Customer_Id
order by rank )
where ROWNUM <= '1')
FOR UPDATE skip locked
</Sentence>
<Fields>DT_BEFER|</Fields>
<Fields>DT_BEFER|DT_BEFER|</Fields>
</DynSentence>
<DynSentence name="UpdCapdskinf">
<Sentence>
@@ -30,7 +31,7 @@
MD5_RESULT=?,
FILE_ID_RESULT=?
WHERE DSK_NAM = ?
AND dsk_sts = '1'
AND dsk_sts in ('1','9')
</Sentence>
<Fields>END_DT|END_TM|MD5_RESULT|FILE_ID|DSK_NAM|</Fields>
</DynSentence>
@@ -42,7 +43,7 @@
FAL_CNT = ?,
FAL_AMT = ?
WHERE DSK_NAM = ?
AND dsk_sts = '1'
AND dsk_sts in ('1','9')
</Sentence>
<Fields>SUC_CNT|SUC_AMT|FAL_CNT|FAL_AMT|DSK_NAM|</Fields>
</DynSentence>
+26 -12
View File
@@ -1029,8 +1029,8 @@
<Return/>
</If>
<Set>UNDO_CNT=$UNDO_CNT</Set>
<!--统计成功,失败笔数 -->
<!--统计成功,失败笔数 -->
<Exec func="PUB:ReadRecord" error="IGNORE">
<Arg name="SqlCmd" value="TotSuc"/>
</Exec>
@@ -1041,8 +1041,8 @@
<Set>BAT_SUC_AMT=$BAT_SUC_AMT</Set>
<Set>BAT_SUC_CNT=$BAT_SUC_CNT</Set>
<Set>BAT_FAL_AMT=$BAT_FAL_AMT</Set>
<Set>BAT_FAL_CNT=$BAT_FAL_CNT</Set>
<Set>BAT_FAL_CNT=$BAT_FAL_CNT</Set>
<If condition="$UNDO_CNT != 0">
<Set>BAT_STS=3</Set>
<Set>Rsp_Cd=00</Set>
@@ -1149,6 +1149,13 @@
<Fields>YUR_REF|BTH_DTL|TRS_DAT|</Fields>
</DynSentence>
<DynSentence name="QRY_CAPCMBRFD_OLDTXN">
<Sentence>
select 'Y' AS YN from CAPTXNJNL where trx_seq=? and corg_dsk_no=? and CORG_NO='CMB'
</Sentence>
<Fields>BTH_DTL|YUR_REF|</Fields>
</DynSentence>
<FlowCtrl>
<Delete>TRSP_CD</Delete>
<Delete>TRSP_MSG</Delete>
@@ -1163,7 +1170,7 @@
<Set>accnbr=$acctNo</Set><!--对公账号-->
<Set>bgndat=CALCDATE(GETDATE(),-,d,10)</Set><!--起始日期T-1-->
<Set>enddat=GETDATE()</Set><!--交易结束日期-->
<Set>reqnbr=</Set><!--流程实例号-->
<Set>ctnkey=</Set><!--续传字段-->
<Set>TX_COD=NTAGDRFD</Set><!--退票查询交易码-->
@@ -1228,15 +1235,22 @@
<Set>Rsp_Msg=登记流水失败</Set>
<Return/>
</If>
<Exec func="PUB:ExecSql" error="IGNORE">
<Arg name="SqlCmd" value="updRfd"/>
<!--查询退票信息原交易是否存在-->
<Exec func="PUB:ReadRecord" error="IGNORE">
<Arg name="SqlCmd" value="QRY_CAPCMBRFD_OLDTXN"/>
</Exec>
<If condition="~RetCod!=0">
<Set>Rsp_Cd=80</Set>
<Set>Rsp_Msg=更新退票流水失败</Set>
<Break/>
<If condition="~RetCod=0">
<Exec func="PUB:ExecSql" error="IGNORE">
<Arg name="SqlCmd" value="updRfd"/>
</Exec>
</If>
<ElseIf condition='~RetCod=-1'>
<Set>Rsp_Cd=80</Set>
<Set>Rsp_Msg=数据库执行错误</Set>
<Return/>
</ElseIf>
</ElseIf>
<Delete>req_nbr</Delete>