added scheduled vendor payouts workflow activity
This commit is contained in:
parent
b8b7dc2875
commit
d87d766856
5 changed files with 357 additions and 7 deletions
|
|
@ -7,6 +7,11 @@ upgrading from one version to the next, or even between multiple
|
|||
versions. Be sure to heed the warnings contained herein as they will
|
||||
save you many hours of grief.
|
||||
|
||||
7.8.2
|
||||
--------------------------------------------------------------------
|
||||
* WebGUI now requires Business::PayPal::API 0.62 or higher.
|
||||
|
||||
|
||||
7.8.1
|
||||
--------------------------------------------------------------------
|
||||
|
||||
|
|
@ -32,6 +37,7 @@ save you many hours of grief.
|
|||
prefix from the filename.
|
||||
|
||||
|
||||
|
||||
7.8.0
|
||||
--------------------------------------------------------------------
|
||||
|
||||
|
|
|
|||
|
|
@ -35,18 +35,36 @@ fixTableDefaultCharsets($session);
|
|||
correctWikiAttachmentPermissions( $session );
|
||||
transactionsNotifications( $session );
|
||||
fixBadVarCharColumns ( $session );
|
||||
addVendorPayouts($session);
|
||||
|
||||
finish($session); # this line required
|
||||
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Describe what our function does
|
||||
#sub exampleFunction {
|
||||
# my $session = shift;
|
||||
# print "\tWe're doing some stuff here that you should know about... " unless $quiet;
|
||||
# # and here's our code
|
||||
# print "DONE!\n" unless $quiet;
|
||||
#}
|
||||
sub addVendorPayouts {
|
||||
my $session = shift;
|
||||
print "\tAdding vendor payouts... " unless $quiet;
|
||||
my $db = $session->db;
|
||||
$db->write(" create table if not exists vendorPayoutLog (
|
||||
payoutId char(22) binary not null primary key,
|
||||
isSuccessful tinyint(1) not null,
|
||||
errorCode char(10),
|
||||
errorMessage char(255),
|
||||
paypalTimestamp char(20) not null,
|
||||
amount decimal(7,2) not null,
|
||||
currency char(3) not null,
|
||||
correlationId char(13) not null,
|
||||
paymentInformation char(255) not null
|
||||
)");
|
||||
$db->write(" create table if not exists vendorPayoutLog_items (
|
||||
payoutId char(22) binary not null,
|
||||
transactionItemId char(22) binary not null,
|
||||
amount decimal(7,2) not null,
|
||||
primary key( payoutId, transactionItemId )
|
||||
)");
|
||||
|
||||
print "DONE!\n" unless $quiet;
|
||||
}
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
sub fixTableDefaultCharsets {
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue