1 package OpenILS::Application::Trigger::Validator::Acq::PurchaseOrderEDIRequired;
2 use strict; use warnings;
3 # use OpenSRF::Utils::Logger qw/:logger/;
4 use OpenILS::Utils::CStoreEditor qw/ new_editor /;
5 use OpenILS::Application::AppUtils;
6 my $U = 'OpenILS::Application::AppUtils';
11 my $po = $env->{target};
16 new_editor->retrieve_acq_provider($po->provider);
19 ($po->state eq 'on-order' or
20 $po->state eq 'retry' ) and
22 $provider->edi_default and
23 $U->is_true($provider->active);