By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
440,581 Members | 2,007 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 440,581 IT Pros & Developers. It's quick & easy.

405 Error when consuming Java web service using Perl Script

P: 1
Hi,
I get an undefined sub routine error at the line in bold. But I can consume the same service using SOAP UI


Expand|Select|Wrap|Line Numbers
  1. #!/usr/bin/perl 
  2.  
  3. #!/usr/bin/perl -w
  4. #use SOAP::Lite +trace =>'debug';
  5. use SOAP::Lite;
  6. #my $client = SOAP::Lite->service("http://taspmociias304.cernerasp.com:9084/EventPush/EventPushSoapHttpPort");
  7. my $client = SOAP::Lite->proxy("http://taspmociias304.cernerasp.com:9084/EventPush/EventPushSoapHttpPort");
  8.  
  9. $source = SOAP::Data->type( string => '' );
  10. $hostname = SOAP::Data->type( string => 'taspmociias104.cernerasp.com' );
  11. $parameter = SOAP::Data->type( string => '1TEST' );
  12. $par_value = SOAP::Data->type( string => '1TEST' );
  13. $par_instance = SOAP::Data->type( string => 'JDFJassa2' );
  14. $par_status = SOAP::Data->type( string => 'Alarm' );
  15. $last_10 = SOAP::Data->type( string => '' );
  16. $last_10_tp = SOAP::Data->type( string => '');
  17. $os = SOAP::Data->type( string => '');
  18. $thresh_min = SOAP::Data->type( string => '');
  19. $thresh_max = SOAP::Data->type( string => ''); 
  20. $cid1 = SOAP::Data->type( string => 'tasp_mo');  
  21. $cid2 = SOAP::Data->type( string => ''); 
  22. $bmc_event_id = SOAP::Data->type( string => ''); 
  23. $host_ip  = SOAP::Data->type( string => ''); 
  24. $bmc_icon_name = SOAP::Data->type( string => ''); 
  25. $bmc_app_class = SOAP::Data->type( string => ''); 
  26. $bmc_parent_instance = SOAP::Data->type( string => ''); 
  27. $fs_dt_tm = SOAP::Data->type( string => ''); 
  28. $last_10_window = SOAP::Data->type( string => ''); 
  29.  
  30. $client.pushEvent($source, $hostname, $parameter, $par_value, $par_instance, $par_status, $last_10,$last_10_tp, $os, $thresh_min, $thresh_max, $cid1, $cid2, $bmc_event_id, $host_ip, $bmc_icon_name, $bmc_app_class,$bmc_parent_instance, $fs_dt_tm, $last_10_window  );
  31.  
  32.  
  33. Soap UI 
  34.  
  35. <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:even="http://com.cerner.cwx.eventpush/EventPush">
  36.    <soapenv:Header/>
  37.    <soapenv:Body>
  38.       <even:pushEventElement>
  39.          <even:source>"""</even:source>
  40.          <even:hostname>taspmociias104'.cernerasp.com</even:hostname>
  41.          <even:parameter>1TES'''T</even:parameter>
  42.          <even:par_value></even:par_value>
  43.          <even:par_instance>JDFJassa1</even:par_instance>
  44.          <even:par_status>OK</even:par_status>
  45.          <even:last_10></even:last_10>
  46.          <even:last_10_tp></even:last_10_tp>
  47.          <even:os></even:os>
  48.          <even:thresh_min></even:thresh_min>
  49.          <even:thresh_max></even:thresh_max>
  50.          <even:CID1>TASP_MO</even:CID1>
  51.          <even:CID2></even:CID2>
  52.          <even:bmc_event_id>?</even:bmc_event_id>
  53.          <even:host_ip></even:host_ip>
  54.          <even:bmc_icon_name></even:bmc_icon_name>
  55.          <even:bmc_app_class></even:bmc_app_class>
  56.          <even:bmc_parent_instance></even:bmc_parent_instance>
  57.          <even:fs_dt_tm></even:fs_dt_tm>
  58.          <even:last_10_window></even:last_10_window>
  59.          <even:annotation></even:annotation>
  60.       </even:pushEventElement>
  61.    </soapenv:Body>
  62. </soapenv:Envelope>
Thank you.
Nov 13 '13 #1
Share this question for a faster answer!
Share on Google+

Post your reply

Sign in to post your reply or Sign up for a free account.