package II8f60e33fe4cad6660c2faa6bb7735318; use strict 'vars'; use base qw/II597c62f72d29a8a8fabd5a31fa80863a/; use II66dd7d1f765b7b7ddb47538a45821709; BEGIN{*II8f60e33fe4cad6660c2faa6bb7735318::llIIlIIIllllIlll=\%{pack('H6','01016c')^'DO:'};*II8f60e33fe4cad6660c2faa6bb7735318::lIlllIlIlIIlIIII=\&{pack('H24','5a565f286c0f4b690a52327c')^'776FV58Q=0JH'};$II8f60e33fe4cad6660c2faa6bb7735318::lIllIllIIIlIIIlI=pack('H18','18001801187d706f1d')^'PTLQG5?<I';$II8f60e33fe4cad6660c2faa6bb7735318::lIIllIlIllllllII=pack('H12','130018011f12')^'YIVMVQ'};sub fields    { (II597c62f72d29a8a8fabd5a31fa80863a::lllllIIlIlIIlllI($II597c62f72d29a8a8fabd5a31fa80863a::IIllllIlIlIllIlI{$II8f60e33fe4cad6660c2faa6bb7735318::lIIlIIIlllllIllI},582,$II597c62f72d29a8a8fabd5a31fa80863a::IIllllIlIlIllIlI{$II8f60e33fe4cad6660c2faa6bb7735318::lIIllIlIllllllII})->fields, qw/live_pgate test_pgate LinkedShortURL/) } BEGIN{*II8f60e33fe4cad6660c2faa6bb7735318::IlllIlllIIllllII=\%{pack('H6','7a0c67')^'?B1'};*II8f60e33fe4cad6660c2faa6bb7735318::IIlIIIIIIlIIlIlI=\&{pack('H24','52265d516e0b3a62082f4b06')^'?G4?T1IZ?M32'};$II8f60e33fe4cad6660c2faa6bb7735318::lIIIllIIIIIlIllI=pack('H18','791b0417160a086900')^'1OPGIBG:T';$II8f60e33fe4cad6660c2faa6bb7735318::IIllIIIlIIlllIIl=pack('H12','09077d1a737a')^'CN3V:9'};sub required  { qw/title live_pgate/ } __PACKAGE__->setStandardHandlers; __PACKAGE__->standardHandler($_, $_ => 'linkerpro(single,linkers::pgate::main)') for qw/live_pgate/; __PACKAGE__->standardHandler($_, $_ => 'linkerpro(single,linkers::pgate::main)') for qw/test_pgate/; __PACKAGE__->standardHandler($_, $_ => 'text(20)') for qw/LinkedShortURL/; BEGIN{*II8f60e33fe4cad6660c2faa6bb7735318::llIlIIIIlllIllIl=\%{pack('H6','091915')^'LWC'};*II8f60e33fe4cad6660c2faa6bb7735318::IIIIlIlIlIlIllll=\&{pack('H24','2c33513b7e79450c63204a01')^'AR8UDC64TB25'};$II8f60e33fe4cad6660c2faa6bb7735318::lIIlIIIlllllIllI=pack('H18','010e0d6e0f761a191d')^'IZY>P>UJI';$II8f60e33fe4cad6660c2faa6bb7735318::IIIIlIIIIllllllI=pack('H12','190f1d07790b')^'SFSK0H'};sub process { my $this = shift; my $object = $this->getDecorated; $this->SUPER::process; return if $this->{errors}; for my $pgate_id ($object->{live_pgate}, $object->{test_pgate}) { next unless $pgate_id; $this->addError(__PACKAGE__->message('pgate.requires_background_payment_processor')) unless II597c62f72d29a8a8fabd5a31fa80863a::llIIllIllIlIllIl($II8f60e33fe4cad6660c2faa6bb7735318::llIIlIIIllllIlll{$II66dd7d1f765b7b7ddb47538a45821709::IIlIllllllIIIlIl},101,$II8f60e33fe4cad6660c2faa6bb7735318::llIIlIIIllllIlll{$II597c62f72d29a8a8fabd5a31fa80863a::llIlIIIllllIIIlI})->get($pgate_id)->isBackgroundPaymentProcessor; } if ($object->{LinkedShortURL}) { my $error = II597c62f72d29a8a8fabd5a31fa80863a::IlllIIllIlllIlIl($II597c62f72d29a8a8fabd5a31fa80863a::IIllllIlIlIllIlI{$II8f60e33fe4cad6660c2faa6bb7735318::lIIIllIIIIIlIllI},183,$II597c62f72d29a8a8fabd5a31fa80863a::IIllllIlIlIllIlI{$II8f60e33fe4cad6660c2faa6bb7735318::IIIIlIIIIllllllI})->checkForRefObject($object, $object->{LinkedShortURL}); $this->addError($error) if $error; } return; } 1; 