lr测试脚本参考

尽量拷贝，不要手敲.

Action()

{

 lr_start_transaction("外汇入金");

 web_service_call( "StepName=UniqueTrans_104",

  "SOAPMethod=partyBaseService|BaseServerPort|UniqueTrans",

  "ResponseParam=response",

  "Service=partyBaseService",

  "ExpectedResponse=SoapResult",

  "Snapshot=t1550350746.inf",

  BEGIN_ARGUMENTS,

  "xml:UniqueTransRequest="

   "<UniqueTransRequest>"

    "<ReqSvcHeader>"

     "<CVersion>V2</CVersion>"

     "<TransCode>417307</TransCode>"

     "<SourceSystem>mg.client</SourceSystem>"

     "<TellerId>mg.client.teller</TellerId>"

    "</ReqSvcHeader>"

    "<SvcBody>{\"CardNo\":\"{hehehe}\",\"CashFlag\":\"0\",\"CertNo\":\"0123456789\",\"Chanel\":\"0\",\"CifCertType\":\"0\",\"CurrencyId\":\"USD\",\"DepuCertNo\":\"320000200002022220\",\"DepuCertType\":\"0\",\"TransAmount\":100000.90}</SvcBody>"

   "</UniqueTransRequest>",

  END_ARGUMENTS,

  BEGIN_RESULT,

  END_RESULT,

  LAST);

    lr_save_string(lr_eval_string("{response}"), "XML_Input_Param");

 lr_xml_get_values("XML={XML_Input_Param}",

  "ValueParam=P_ReturnCode",

 "Query=/Envelope/Body/UniqueTransResponse/RspSvcHeader/ReturnCode",

      

 LAST );

// lr_output_message(lr_eval_string("返回结果 = {P_ReturnCode}"));

 if(strcmp(lr_eval_string("{P_ReturnCode}"),"6000") == 0){

  lr_end_transaction("外汇入金",LR_PASS);

 }else{

  lr_end_transaction("外汇入金",LR_FAIL);

  lr_output_message(lr_eval_string("返回结果 = {P_ReturnCode}"));

 }

 //lr_end_transaction("外汇入金", LR_AUTO);

 return 0;

}