package IIb02f8d3064e235967de5c537b3e7ce9b::mod_wplicense; use strict; use II1b7f5cd35f00c93f234e8e1273dbac2a; use IIef11385558db207cf8b1321ea6156940; use IIfc633ccfcc5b6c903780eb6a1bf8455d; sub cfgEditCtime { 0 } sub createAllForSale { my $class = shift; my ($dlv_class, $sale) = @_; my $prod = $sale->getProduct; return unless $prod->{dlv_wplicenses}; for my $bid (split(',', $prod->{dlv_wplicenses})) { my $wplicense = II8dae0e141ee45f5daba6a74e4a7c3b6f::IIlIlIlIIIlIIlll($II720d6e18aa34327713eb014408fc9144::IIlllIIllllIlIll{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IllIIlIlIlIlIIIl},128,$II720d6e18aa34327713eb014408fc9144::IIlllIIllllIlIll{$II982446f8950cc3dc59e487adba22df54::IllIIllIIIIlIIll})->get($bid); next unless $wplicense->stored; $dlv_class->create($sale->getUser, 'wplicense', $wplicense->id, $sale->getValidUntilDate, $sale->{id}); } return; } sub save { my $class = shift; my $dlv_object = shift; return; } sub delete { my $class = shift; my $dlv_object = shift; return; } sub activateDlv { my $class = shift; my $dlv_object = shift; return; } sub deactivateDlv { my $class = shift; my $dlv_object = shift; return; } sub deleteDlv { my $class = shift; my $dlv_object = shift; return; } sub getStoreObject { my $class = shift; my $dlv_object = shift; Jin::wplicense->getOrDummy($dlv_object->{obj_id}); } sub getTitle { my $class = shift; my $dlv_object = shift; Jin::wplicense->getOrDummy($dlv_object->{obj_id})->{title}; } sub getResourceUrl { my $class = shift; my ($dlv_object, $sale, $resource_number) = @_; IIb39071a48a82a07eeb9256f406abebc5::IIIIIIIllIlIIlll($II8dae0e141ee45f5daba6a74e4a7c3b6f::IllIlIIllllIIIlI{$II8dae0e141ee45f5daba6a74e4a7c3b6f::lIIIIIIIllIIIIIl},130,$II8dae0e141ee45f5daba6a74e4a7c3b6f::IllIlIIllllIIIlI{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IlIlIlIIIIllIIIl})->true(IIb39071a48a82a07eeb9256f406abebc5::lllllIlIIIIlIIlI($II720d6e18aa34327713eb014408fc9144::lIIIlIlIlllIIIll{$II720d6e18aa34327713eb014408fc9144::IlllllIlIIIIlIll},1032,$II720d6e18aa34327713eb014408fc9144::lIIIlIlIlllIIIll{$II982446f8950cc3dc59e487adba22df54::IIIIIIlIIlIlIIlI})->hasFeature('wplicense'), $sale->message('order.dlv.link.incorrect')); my $wplicense = $dlv_object->getStoreObject; $wplicense->prepareHtml($sale); $wplicense->getUrl; } 1; 