Lines 80-87
elsif ( $op && $op eq 'reopen' ) {
Link Here
|
80 |
elsif ( $op && $op eq 'mod' ) { |
80 |
elsif ( $op && $op eq 'mod' ) { |
81 |
my $shipmentcost = $input->param('shipmentcost'); |
81 |
my $shipmentcost = $input->param('shipmentcost'); |
82 |
my $shipment_budget_id = $input->param('shipment_budget_id'); |
82 |
my $shipment_budget_id = $input->param('shipment_budget_id'); |
|
|
83 |
my $invoicenumber = $input->param('invoicenumber'); |
83 |
ModInvoice( |
84 |
ModInvoice( |
84 |
invoiceid => $invoiceid, |
85 |
invoiceid => $invoiceid, |
|
|
86 |
invoicenumber => $invoicenumber, |
85 |
shipmentdate => output_pref( { str => scalar $input->param('shipmentdate'), dateformat => 'iso', dateonly => 1 } ), |
87 |
shipmentdate => output_pref( { str => scalar $input->param('shipmentdate'), dateformat => 'iso', dateonly => 1 } ), |
86 |
billingdate => output_pref( { str => scalar $input->param('billingdate'), dateformat => 'iso', dateonly => 1 } ), |
88 |
billingdate => output_pref( { str => scalar $input->param('billingdate'), dateformat => 'iso', dateonly => 1 } ), |
87 |
shipmentcost => $shipmentcost, |
89 |
shipmentcost => $shipmentcost, |