fixed some typos, thinkos in EDI cross-walk

git-svn-id: svn://svn.open-ils.org/ILS/trunk@16427 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/examples/fm_IDL.xml b/Open-ILS/examples/fm_IDL.xml
index 14ebccb..3c19221 100644 (file)
--- a/Open-ILS/examples/fm_IDL.xml
+++ b/Open-ILS/examples/fm_IDL.xml
@@ -5816,6 +5816,7 @@ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA
                </fields>
                <links>
                        <link field="provider" reltype="has_a" key="id" map="" class="acqpro"/>
+                       <link field="owner" reltype="has_a" key="id" map="" class="aou"/>
                </links>
         <permacrud xmlns="http://open-ils.org/spec/opensrf/IDL/permacrud/v1">
             <actions>

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
index c40f4f4..7e66540 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
@@ -2215,7 +2215,7 @@ sub activate_purchase_order_impl {
     }
 
     # tell the world we activated a PO
-    $U->create_events_for_hook('acqpo.activate', $po, $po->ordering_agency);
+    $U->create_events_for_hook('acqpo.activated', $po, $po->ordering_agency);
 
     return undef;
 }

diff --git a/Open-ILS/src/support-scripts/edi_pusher.pl b/Open-ILS/src/support-scripts/edi_pusher.pl
index 6eeed72..9913d88 100644 (file)
--- a/Open-ILS/src/support-scripts/edi_pusher.pl
+++ b/Open-ILS/src/support-scripts/edi_pusher.pl
@@ -25,6 +25,7 @@ use OpenILS::Utils::Cronscript;
 use OpenILS::Utils::Fieldmapper;
 use OpenILS::Application::AppUtils;
 use OpenILS::Application::Acq::EDI;
+use OpenSRF::Utils::Logger q/$logger/;
 
 INIT {
     $debug = 1;
@@ -86,7 +87,7 @@ foreach my $def (@$defs) {
                 }
             }
         },
-        order_by => {atev => 'add_time'}
+        order_by => {atev => ['add_time']}
     };
 
     $query->{limit} = $remaining if $remaining > 0;
@@ -96,7 +97,12 @@ foreach my $def (@$defs) {
 
     print "Event definition ", $def->id, " has ", scalar(@$events), " event(s)\n";
     foreach (@$events) {
-        my $event = $e->retrieve_action_trigger_event($_);
+
+        my $event = $e->retrieve_action_trigger_event([
+            $_->{id}, 
+            {flesh => 1, flesh_fields => {atev => ['template_output']}}
+        ]);
+
         my $message = Fieldmapper::acq::edi_message->new;
         $message->create_time('NOW');   # will need this later when we try to update from the object
         print "Event ", $event->id, " targets PO ", $event->target, ":\n";  # target is an opaque identifier, so we cannot flesh it