projekt kivitendo

use strict;

  is (ref $rl->[0], '', "$testname record link removed");

  # double safety and check ar.paid

  # load all three invoices and check for paid-link via acc_trans and paid in general

  $ar_transaction->load;

  $ar_transaction_2->load;

  $ar_transaction_skonto->load;

  is($ar_transaction_2->paid , '0.00000' , "$testname: 'salesinv 2 fully unpaid");

  is($ar_transaction_skonto->paid , '0.00000' , "$testname: 'salesinv skonto fully unpaid");

  # whew. w(h)a(n)t a whole lotta test

}