/ 
Business-FedEx-DirectConnect-0.09
River stage zero No dependents
/ Business::FedEx::DirectConnect

NAME

Business::FedEx::DirectConnect - FedEx Ship Manager Direct Connect

SYNOPSIS

use Business::FedEx::DirectConnect;

my $t = Business::FedEx::DirectConnect->new(uri=>'https://gatewaybeta.fedex.com/GatewayDC'
				,acc => '' #FedEx Account Number
				,meter => '' #FedEx Meter Number (This is given after you subscribe to FedEx)
				,referer => 'Vermonster' # Name or Company
				,host=> 'gatewaybeta.fedex.com' #Host
				);

# 2016 is the UTI for FedEx.  If you don't know what this is
# you need to read the FedEx Documentation.
# http://www.fedex.com/globaldeveloper/shipapi/
# The hash values are case insensitive.
$t->set_data(2016,
'customer_transaction_identifier' => 'unique1234'
'Sender_Company' => 'Vermonster LLC',
'Sender_Address_Line_1' => '312 Stuart St',
'Sender_City' => 'Boston',
'Sender_State' => 'MA',
'Sender_Postal_Code' => '02134',
'Recipient_Contact_Name' => 'Jay Powers',
'Recipient_Address_Line_1' => '44 Main Street',
'Recipient_City' => 'Boston',
'Recipient_State' => 'MA',
'Recipient_Postal_Code' => '02116',
'Recipient_Phone_Number' => '6173335555',
'Weight_Units' => 'LBS',
'Sender_Country_Code' => 'US',
'Recipient_Country' => 'US',
'Sender_Phone_Number' => '6175556985',
'Future_Day_Shipment' => 'Y',
'Packaging_Type' => '01',
'Service_Type' => '03',
'Total_Package_Weight' => '1.0',
'Label_Type' => '1',
'Label_Printer_Type' => '1',
'Label_Media_Type' => '5',
'Ship_Date' => '20020828',
'Customs_Declared_Value_Currency_Type' => 'USD',
'Package_Total' => 1
) or die $t->errstr;

$t->transaction() or die $t->errstr;

print $t->lookup('tracking_number');

$t->label("myLabel.png");

DESCRIPTION

This module is an alternative to using the FedEx Ship Manager API. Business::FedEx::DirectConnect will provide the necessary communication using LWP and Crypt::SSLeay. The main advantage is you will no longer need to install the JRE dependant API provided by FedEx. Instead, data is POST(ed) directly to the FedEx transaction servers. Additionally, Business::FedEx::DirectConnect allows full "non-Win32" functionality.

REQUIREMENTS

In order to submit a transaction to FedEx's Gateway server you must have a valid FedEx Account Number, an other unique identifier and a FedEx Meter Number. To gain access and receive a Meter Number you must send a Subscribe request to FedEx containing your FedEx account number and contact information. FedEx has two API servers a live one (https://gateway.fedex.com/GatewayDC) and a beta for testing (https://gatewaybeta.fedex.com/GatewayDC). You will need to subscribe to each server you intend to use. FedEx will also require you to send a batch of data to their live server in order to become certified for live labels. This module uses LWP to POST request information so it is a requirement to have LWP installed. Also, you will need SSL encryption to access https URIs. I recommend installing Crypt::SSLeay Please refer to the FedEx documentation at http://www.fedex.com/globaldeveloper/shipapi/ Here you will find more information about using the FedEx API. You will need to know what UTI to use to send a request.

Here is a sample Subscription Transaction

$t->set_data(3003,
1 => 'unique12345',
4003 => 'John Doe',
4008 => '123 Main St',
4011 => 'Boston',
4012 => 'MA',
4013 => '02116',
4014 => 'US',
4015 => '6175551111',
) or die $t->errstr;

This call will return a FedEx Meter number so you can use the FedEx API.

FedEx UTI

Sited from FedEx Documentation. See http://www.fedex.com/globaldeveloper/shipapi/ for more information.

"The Universal Transaction Identifier (UTI) is a unique integral code that has been assigned to a given transaction type. For example, the UTI of the tagged Transaction Type "021" (FedEx Express global Ship a Package Request) is 2016. UTIs are unique not just within the tagged transaction set, but across all transaction sets that have been or will be approved for transmission via the API. The UTI accompanying a transaction indicates where it should be routed within the FedEx systems. The FedEx server recognizes the UTI passed and will direct the request to the correct business server."

Valid UTIs are listed below:

uti = request / reply Carrier Description

1002 = 007 / 107 FDXG End-of-day close
1005 = 023 / 123 FDXE FedEx Express Delete-A-Package
2016 = 021 / 121 FDXE FedEx Express Ship-A-Package
2017 = 022 / 122 FDXE Global Rate-A-Package
2018 = 019 / 119 FDXE Service Availability
3000 = 021 / 121 FDXE FedEx Ground Ship-A-Package
3001 = 023 / 123 FDXG FedEx Ground Delete-A-Package
3003 = 211 / 311 ALL Subscription
3004 = 022 / 122 FDXG Global Rate-A-Package
5000 = 402 / 502 ALL Track By Number, Destination, Ship Date, and Reference
5001 = 405 / 505 ALL Signature Proof of Delivery

COMMON METHODS

The methods described in this section are available for all FedEx::DirectConnect objects.

$t->set_data(UTI, $hash)

This method will accept a valid FedEx UTI number and a hash of values. The first arg must be a valid UTI. Using these values set_data will construct and return a valid FedEx request string. Assuming you pass in a valid FedEx UTI this method will find the correct Transaction Number for you. You need not pass this in. Also no need to pass in your FedEx Account Number or Meter Number. You should pass these when creating a new Business::FedEx::DirectConnect object. This method will allow you to use either the number field provided in the FedEx documentation or the hash (case insensitive) $FE_RE found in FedEx::Constants.

Here is a tracking example where 29 is "tracking number" field FedEx has provided.

$t->set_data(5000, 'tracking_number'=>'836603877972') or die $t->errstr;

is the same as

$t->set_data(5000, 29 =>'836603877972') or die $t->errstr;
$t->required(UTI)

Method to return the required fields for a given FedEx UTI.

$t->transaction()

Send transaction to FedEx. Returns the full reply from FedEx.

$t->label('someLabel.png')

This method will decode the binary image data from FedEx. If nothing is passed in the binary data string will be returned.

$t->lookup('tracking_number')

This method will return the value for an item returned from FedEx. Refer to the FedEx::Constants $FE_RE hash to see all possible values.

$t->rbuf()

Returns the decoded string portion of the FedEx reply.

$t->hash_ret()

Returns a hash of the FedEx reply values

my $stuff= $t->hash_ret;

foreach (keys %{$stuff}) {
	print $_. ' => ' . $stuff->{$_} . "\n";
}

AUTHOR

Jay Powers, <jay@vermonster.com>

http://www.vermonster.com/perl

Copyright (c) 2003 Jay Powers

All rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself

If you have any questions, comments or suggestions please feel free to contact me.

SEE ALSO

Business::FedEx::Constants