Skip Menu |

This queue is for tickets about the Business-FedEx-DirectConnect CPAN distribution.

Report information
The Basics
Id: 25241
Status: new
Priority: 0/
Queue: Business-FedEx-DirectConnect

People
Owner: Nobody in particular
Requestors: mark [...] workingtraffic.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: signature option cannot be passed
Date: Thu, 1 Mar 2007 15:47:31 -0500
To: <bug-Business-FedEx-DirectConnect [...] rt.cpan.org>
From: "Mark Underwood" <mark [...] workingtraffic.com>
Download fedex.cgi
application/octet-stream 1.6k

Message body not shown because it is not plain text.

Hi, I have had the direct connect module ( use Business::FedEx::DirectConnect; ) working for sometime now with no problems. I then added the tag 2399 (Signature Option) and it stopped returning any values from FedEx at all. FedEx can duplicate the transaction I am sending without any problem and my code runs fine unless I add that one line of code FedEx will not help me anymore so you are my last recourse in solving this problem. My code is as simple as I believe is possible to reproduce the problem. You can see it below or attached. I hope you can find the problem, or suggest a workaround? Many thanks for your time ...and a great module (except for this bug ?) FYI I cannot provide my clients account number or meter number. I assume you can test using your own...if not let me know and I will ask my client for permission Ciao. Mark Underwood. #!/usr/bin/perl ##################################################################### # START OF CODE ##################################################################### print "Content-type: text/html\n\n"; ########################################## use Business::FedEx::DirectConnect; ######################################### print "<p>START<p>"; ######################################### $t = Business::FedEx::DirectConnect->new ######################################### ( uri=>'https://gateway.fedex.com:443/GatewayDC' ,acc => 'XXXX7695' #FedEx Account Number ,meter => 'XXX4823' #FedEx Meter Number (This is given after you subscribe to FedEx) ,referer => 'Integrated Midi Systems Inc.' # Name or Company ,Debug => 1 ); ######################################### $t->set_data ######################################### ( 2017 ,8 => "NY" ,9 => "11733" ,10 => "210887695" ,16 => "NY" ,17 => "11542" ,23 => "1" ,50 => "US" ,68 => "USD" ,75 => "LBS" ,116 => "1" ,117 => "US" ,440 => "Y" ,498 => "7404823" ,1266 => "Y" ,1273 => "01" ,1274 => "03" ,1401 => "4.0" ,1415 => "349.00" ,2399 => '4' # IF THIS LINE IS INCLUDED THIS PROGRAM FAILES WITH ERRORS OR DIAGNOSTICS AVAILABE, IF I REMOVE THIS ONE LINE IT RUNS FINE ,3025 => "FDXE" ) or $MyError = $t->errstr(); ######################################### $t->transaction() or $MyError = $t->errstr(); ######################################### if ($MyError) { print "<p>error = " . $MyError; } print '<p>FREIGHT1= ' . $t->lookup('1419'); print '<p>FINISH'; ##################################################################### # END OF CODE ##################################################################### Here is the output from runnign the program (when the line containg tag 2399 is REMOVED...it will not return anything when th eline is included) START Sending 0,"022"8,"NY"9,"11733"10,"210887695"16,"NY"17,"11542"23,"1"50,"US"68,"USD"75 ,"LBS"116,"1"117,"US"440,"Y"498,"7404823"1266,"Y"1273,"01"1274,"03"1401,"4.0 "1415,"349.00"3025,"FDXE"99,"" POST https://gateway.fedex.com:443/GatewayDC Accept: image/gif,image/jpeg,image/pjpeg,text/plain,text/html,*/* Referer: Integrated Midi Systems Inc. User-Agent: Business-FedEx-DirectConnect-1.01 Content-Length: 182 Content-Type: image/gif 0,"022"8,"NY"9,"11733"10,"210887695"16,"NY"17,"11542"23,"1"50,"US"68,"USD"75 ,"LBS"116,"1"117,"US"440,"Y"498,"7404823"1266,"Y"1273,"01"1274,"03"1401,"4.0 "1415,"349.00"3025,"FDXE"99,"" Total bytes returned 194 Looking for 1419 FREIGHT1= 28.25 FINISH Mark Underwood P: +1(516)620-0865 F: +1(516)208-2235 <mailto:mark@workingtraffic.com> mark@workingtraffic.com