Index: openacs-4/packages/ecommerce/www/admin/orders/fulfill-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/orders/fulfill-3.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/ecommerce/www/admin/orders/fulfill-3.tcl 8 Mar 2004 19:46:14 -0000 1.9 +++ openacs-4/packages/ecommerce/www/admin/orders/fulfill-3.tcl 13 Jan 2005 13:58:02 -0000 1.10 @@ -231,12 +231,19 @@ where transaction_id = :pgw_transaction_id" } - # The shipment is a partial shipment but the shipment - # cost equals the order cost. This could be due to - # voiding of items. A new transaction is required if - # there are no more items awaiting shipment and this - # shipment thus completes the order. + # Flag that no new transactions need to be + # created for this shipment. + set create_new_transaction false + } + } else { + + # The shipment is a partial shipment but the shipment cost + # equals the order cost. This could be due to voiding of + # items. A new transaction is required if there are no + # more items awaiting shipment and this shipment thus + # completes the order. + if {[string equal 0 [db_string count_remaining_items " select count(*) from ec_items @@ -249,13 +256,6 @@ } } } else { - - # The shipment is a partial shipment but the - # shipment cost equals the order cost. - - set create_new_transaction false - } - } else { set create_new_transaction true }