MV_PAYMENT_TRANSACTION —
Interchange 5.9.0:
Source: lib/Vend/Payment/Protx2.pm
Line 537 (context shows lines 527-541 in protx():525)
my ($vendor, $amount, $actual, $opt); # Amount sent to Protx, in 2 decimal places with any cruft removed. # Defaults to 'amount' from the Accounts IPM or an invoicing system, falling back to IC input $amount = $::Values->{amount} || Vend::Interpolate::total_cost(); $amount =~ s/^\D+//g; $amount =~ s/,//g; $amount = sprintf '%.2f', $amount; # Transaction type sent to Protx. my $txtype = $::Values->{transtype} || charge_param('txtype') || $::Variable->{MV_PAYMENT_TRANSACTION} \ || 'PAYMENT'; my $accountType = $::Values->{account_type} || charge_param('account_type') || 'E'; my $payID = $::Values->{inv_no} || $::Session->{mv_transaction_id} || $::Session->{id}.$amount; my $logdir;
Source: lib/Vend/Payment/SagePay.pm
Line 592 (context shows lines 582-596 in sagepay():576)
my ($vendor, $amount, $actual, $opt, $sagepayrequest, $page, $vendorTxCode, $pan, $cardType); # Amount sent to SagePay, in 2 decimal places with cruft removed. # Defaults to 'amount' from log_transaction or an invoicing system, falling back to IC input $amount = $::Values->{amount} || charge_param('amount') || Vend::Interpolate::total_cost(); $amount =~ s/^\D*//g; $amount =~ s/\,//g; $amount = sprintf '%.2f', $amount; # Transaction type sent to SagePay. my $txtype = $::Values->{transtype} || charge_param('txtype') | \ | $::Variable->{MV_PAYMENT_TRANSACTION} ||'PAYMENT'; my $vpsprotocol = '2.23'; my $accountType = $::Values->{account_type} || charge_param('account_type') || 'E'; my $payID = $::Values->{inv_no} || $::Session->{mv_transaction_id} \ || $::Session->{id}.$amount; my $logorder = charge_param('logorder') || 'no'; # Set to 'yes' or \ '1' to log basket plus data useful when arguing with SagePay over empty responses