Committer: ailyin
LJSUP-9836 (Need to develop interface for financial reporting of LiveJournal shop transactions)U trunk/cgi-bin/LJ/Pay/SelfPromo.pm
Modified: trunk/cgi-bin/LJ/Pay/SelfPromo.pm
===================================================================
--- trunk/cgi-bin/LJ/Pay/SelfPromo.pm 2012-03-14 08:57:57 UTC (rev 11588)
+++ trunk/cgi-bin/LJ/Pay/SelfPromo.pm 2012-03-14 10:03:47 UTC (rev 11589)
@@ -933,16 +933,20 @@
($it) = $cart->get_items;
+ my $effective_profit =
+ $opts->{'price'} - $opts->{'refund'} - $opts->{'remainder'};
+
# set payitem props as appropriate
- $it->set_prop( 'selfpromo' => $class->class );
- $it->set_prop( 'selfpromo_type' => $opts->{'type'} );
- $it->set_prop( 'selfpromo_profit' => $opts->{'profit'} );
- $it->set_prop( 'selfpromo_refund' => $opts->{'refund'} );
- $it->set_prop( 'selfpromo_refund_userid' => $opts->{'refund_userid'} );
- $it->set_prop( 'selfpromo_refund_promoid' => $opts->{'refund_promoid'} );
- $it->set_prop( 'selfpromo_remainder' => $opts->{'remainder'} );
- $it->set_prop(
- 'selfpromo_remainder_userid' => $opts->{'remainder_userid'} );
+ $it->set_prop( 'selfpromo' => $class->class );
+ $it->set_prop( 'selfpromo_type' => $opts->{'type'} );
+ $it->set_prop( 'selfpromo_profit' => $opts->{'profit'} );
+ $it->set_prop( 'selfpromo_refund' => $opts->{'refund'} );
+ $it->set_prop( 'selfpromo_refund_userid' => $opts->{'refund_userid'} );
+ $it->set_prop( 'selfpromo_refund_promoid' => $opts->{'refund_promoid'} );
+ $it->set_prop( 'selfpromo_remainder' => $opts->{'remainder'} );
+ $it->set_prop(
+ 'selfpromo_remainder_userid' => $opts->{'remainder_userid'} );
+ $it->set_prop( 'selfpromo_effective_profit' => $effective_profit );
# Add object specific properties, if object exists (in case of non refunding cart)
if ( my $object = $opts->{'object'} ) {
