my $retail_rate = $self->{'TOUR'}->{'RATE'}{$rateid}{'retail_rate'};
my $coupon = $self->{COUPONAMOUNT};
my $discounted_rate = $retail_rate - $coupon;
print "$retail_rate $coupon $discounted_rate\n";
####
my $retail_rate = $self->{'TOUR'}->{'RATE'}{$rateid}{'retail_rate'};
my $coupon = $self->{COUPONAMOUNT};
$retail_rate += 0;
$coupon += 0;
my $discounted_rate = $retail_rate - $coupon;
print "$retail_rate $coupon $discounted_rate\n";
####
my $retail_rate = $self->{'TOUR'}->{'RATE'}{$rateid}{'retail_rate'};
my $coupon = $self->{COUPONAMOUNT};
$retail_rate += 0;
$coupon += 0;
my $discounted_rate = $retail_rate + 1;
print "$retail_rate $coupon $discounted_rate\n";
####
my $retail_rate = $self->{'TOUR'}->{'RATE'}{$rateid}{'retail_rate'};
my $coupon = $self->{COUPONAMOUNT};
$retail_rate += 0;
$coupon += 0;
my $discounted_rate = $retail_rate;
$discounted_rate++;
print "$retail_rate $coupon $discounted_rate\n";