Business::Edifact::Interchange - Parse Edifact Messages For Book Ordering
This is a support module for EDI ordering modules being developed for the Koha and Evergreen OS Library Management Systems
use Business::Edifact::Interchange; my $foo = Business::Edifact::Interchange->new(); $foo->parse($edifact_message); or $foo->parse_file($filename); ...
The standards for using Edifact in Library Book Supply are available from
Create an Business::Edifact::Interchange object
parse the edifact interchange passed in the message
Reads an edifact message from a file and parses it Will strip the lineendings added to files by some suppliers
internal method for handling message data segments pass to the current Business::Edifact::Message object for fuller passing
create a new Business::Edifact::Message object
End message add completed message to my messages array
internal method to parse and validate the interchange trailer
internal method to parse the service string advice and set the separator values for the interchange accordingly
internal method to split data field into components
Internal method to parse the interchange header
internal method to parse the message group header (Currently a nop )
internal method to parse the message group trailer (Currently a nop )
Returns and array_ref of Edifact::Message objects representing the contents of the interchange
At present this is tested for quotes. Beware suppliers' interpretation of the Edifact Standard can vary considerably. (And the standard is large enough to allow considerable leeway on this). Its intended to expand this module based on practical experience.
Please report any bugs or feature requests to
bug-edifact-interchange at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Business-Edifact-Interchange. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
You can find documentation for this module with the perldoc command.
Copyright 2011,2012 Colin Campbell. <firstname.lastname@example.org>
This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.