57 lines
2.1 KiB
XML
57 lines
2.1 KiB
XML
<?xml version='1.0' encoding='UTF-8'?>
|
|
<Tran>
|
|
<Transaction code="DISK_RESULT" log_switch='1' desc="批量结果查询">
|
|
<!--查询文件是否入库 -->
|
|
<DynSentence name="QRY_CAPDSKINF_DSK_NAM">
|
|
<Sentence>
|
|
SELECT DSK_STS ,END_DT,END_TM ,ORN_CNT ,ORN_AMT,SUC_CNT,SUC_AMT,FAL_CNT,FAL_AMT, FILE_ID_RESULT,MD5_RESULT,TM_SMP FROM CAPDSKINF
|
|
WHERE DSK_NO = ? AND ORD_DT = ?
|
|
</Sentence>
|
|
<Fields>DSK_NO|APPLY_DATE|</Fields>
|
|
</DynSentence>
|
|
|
|
|
|
|
|
<FlowCtrl>
|
|
<Quote name="Init_CAP01"/> <!--交易初始化-->
|
|
<!-- 组合一些关键信息 -->
|
|
<Set>DSK_NO=$DISK_NO</Set>
|
|
<Set>APPLY_DATE=$APPLY_DATE</Set>
|
|
<Set>MAKE_FILE=$MAKE_FILE</Set>
|
|
<!-- 查询文件是否入库 -->
|
|
<Exec func="PUB:ReadRecord" error="IGNORE">
|
|
<Arg name="SqlCmd" value="QRY_CAPDSKINF_DSK_NAM"/>
|
|
</Exec>
|
|
<If condition="~RetCod!=0">
|
|
<Set>Rsp_Cd=80</Set>
|
|
<Set>Rsp_Msg=批次不存在</Set>
|
|
<Return/>
|
|
</If>
|
|
<If condition="IS_EQUAL_STRING($DSK_STS,9)">
|
|
<Set>DISK_STS=4</Set>
|
|
</If>
|
|
<ElseIf condition="IS_EQUAL_STRING($DSK_STS,4)">
|
|
<Set>DISK_STS=3</Set>
|
|
</ElseIf>
|
|
<Else>
|
|
<Set>DISK_STS=2</Set>
|
|
</Else>
|
|
<Set>DISK_MESSAGE=$DISK_MESSAGE</Set>
|
|
<Set>LAST_DATE=SUBSTR($TM_SMP,0,8)</Set>
|
|
<Set>LAST_TIME=SUBSTR($TM_SMP,9,6)</Set>
|
|
<Set>TOTAL_COUNT=$ORN_CNT</Set>
|
|
<Set>TOTAL_AMOUNT=FMUL($ORN_AMT,100,0)</Set>
|
|
<Set>SUCC_COUNT=$SUC_CNT</Set>
|
|
<Set>SUCC_AMOUNT=FMUL($SUC_AMT,100,0)</Set>
|
|
<Set>FAIL_COUNT=$FAL_CNT</Set>
|
|
<Set>FAIL_AMOUNT=FMUL($FAL_AMT,100,0)</Set>
|
|
<Set>FILE_PATH=$FILE_ID_RESULT</Set>
|
|
<Set>MD5=$MD5_RESULT</Set>
|
|
|
|
|
|
<Set>Rsp_Cd=00</Set>
|
|
<Set>Rsp_Msg=交易成功</Set>
|
|
</FlowCtrl>
|
|
</Transaction>
|
|
</Tran>
|