Files
2021-03-26 15:49:07 +08:00

70 lines
2.7 KiB
XML

<?xml version='1.0' encoding='UTF-8'?>
<Tran>
<Transaction code="GET_TOKEN" log_switch='1' desc="获取token">
<DynSentence name="UPD_CAPPARAMTER">
<Sentence>
UPDATE CAPPARAMTER SET P_VALUES = ? ,tm_smp = ? WHERE P_KEY = 'FIL_TOKEN' AND STS = '0'
</Sentence>
<Fields>TOKEN|TXN_TM|</Fields>
</DynSentence>
<FlowCtrl>
<Quote name="Init_CAP01"/> <!--交易初始化-->
<Exec func="PUB:PARAM_GRP_GET" error="IGNORE">
<Arg name="ParamNam" value="CAPPARAMTER"/>
<Arg name="KeyNam" value="FIL_TOKEN_URL"/>
<Arg name="GrpNam" value="URL"/>
</Exec>
<Set>FIL_TOKEN_URL=$URL.P_VALUES</Set>
<Exec func="PUB:PARAM_GRP_GET" error="IGNORE">
<Arg name="ParamNam" value="CAPPARAMTER"/>
<Arg name="KeyNam" value="FIL_TOKEN_URL"/>
<Arg name="GrpNam" value="URL"/>
</Exec>
<Set>FIL_TOKEN_URL=$URL.P_VALUES</Set>
<Exec func="PUB:PARAM_GRP_GET" error="IGNORE">
<Arg name="ParamNam" value="CAPPARAMTER"/>
<Arg name="KeyNam" value="FIL_TOKEN_NAME"/>
<Arg name="GrpNam" value="NAME"/>
</Exec>
<Set>FIL_TOKEN_NAME=$NAME.P_VALUES</Set>
<Exec func="PUB:PARAM_GRP_GET" error="IGNORE">
<Arg name="ParamNam" value="CAPPARAMTER"/>
<Arg name="KeyNam" value="FIL_TOKEN_PWD"/>
<Arg name="GrpNam" value="PWD"/>
</Exec>
<Set>FIL_TOKEN_PWD=$PWD.P_VALUES</Set>
<!--调用获取token接口-->
<Exec func="CTG:getToken">
<Arg name="url" value="$FIL_TOKEN_URL"/>
<Arg name="name" value="$FIL_TOKEN_NAME"/>
<Arg name="pwd" value="$FIL_TOKEN_PWD"/>
</Exec>
<If condition="~RetCod!=0">
<Set>Rsp_Cd=80</Set>
<Set>Rsp_Msg="系统异常"</Set>
<Return/>
</If>
<Set>TOKEN=$OUT_DAT.TOKEN</Set>
<Exec func="PUB:ExecSql" error="IGNORE">
<Arg name="SqlCmd" value="UPD_CAPPARAMTER"/>
</Exec>
<If condition="~RetCod != 0">
<Set>Rsp_Cd=80</Set>
<Set>Rsp_Msg="更新数据库失败"</Set>
<Return/>
</If>
<Exec func="PUB:GWASetMsg">
<Arg name="MsgCd" value="BAT00000" />
</Exec>
<Set>Rsp_Cd=00</Set>
<Set>Rsp_Msg=交易成功</Set>
</FlowCtrl>
</Transaction>
</Tran>