Webservices in HTTP

Action()
{
    web_add_header("SR_API_KEY","xxx-4c88-8ddc-31cfaa113735");
    web_set_sockets_option("INITIAL_BASIC_AUTH","1");
    web_set_user("xxx_inqaaccess", "xxxYUi987", "axxtindex-xxb-perf.test.xxx.com");
   
    web_reg_save_param("Response",
        "LB=",
        "RB=",
        LAST);

 lr_start_transaction("retrievePolicyIdByPolicyNum");

 web_custom_request("retrievePolicyIdByPolicyNum",
 "Method=POST",
 "Mode=HTML",
 "RecContentType=text/xml",
 "EncType=text/xml; charset=utf-8",
 "URL=http://agrmtindex-esb-perf.test.xxx.com/AgreementInquiry/",
  "Body=<soapenv:Envelope xmlns:soapenv=\"http://schemas.xmlsoap.org/soap/envelope/\" xmlns:ser=\"http://service.AgreementInquiry.dc3.sf/\n">
   "<soapenv:Header/>\n"
   "<soapenv:Body>\n"
   "<ser:retrievePolicyIdByPolicyNum>\n"
   "<policyInput>\n"
   "<agreSrcSysCd>1</agreSrcSysCd>\n"
   "<agreementAccessKey>34349</agreementAccessKey>\n"
   "<productLine>L</productLine>\n"
   "</policyInput>\n"
   "</ser:retrievePolicyIdByPolicyNum>\n"
   "</soapenv:Body>\n"
   "</soapenv:Envelope>\n"
 "LAST");

   lr_end_transaction("retrievePolicyIdByPolicyNum", LR_AUTO);
   lr_output_message("***Response is : \n%s", lr_eval_string("{Response}"));
   lr_output_message("***");
   return 0;
}