Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision d6e24333

Von Bernd Bleßmann vor fast 6 Jahren hinzugefügt

  • ID d6e243337926ac423cf4a87cd6c39f0fc827e533
  • Vorgänger feeb3fc8
  • Nachfolger c9076c9e

t/db_helper/payment.t: keine Klammern bei subroutine-Definition

sonst gibt es eine Warnung bzgl. Prototypen

Unterschiede anzeigen:

t/db_helper/payment.t
347 347

  
348 348

  
349 349
# test 1
350
sub test_default_invoice_one_item_19_without_skonto() {
350
sub test_default_invoice_one_item_19_without_skonto {
351 351
  my $title = 'default invoice, one item, 19% tax, without_skonto';
352 352
  my $item    = create_invoice_item(part => $parts[0], qty => 2.5);
353 353
  my $invoice = create_sales_invoice(
......
380 380

  
381 381
}
382 382

  
383
sub test_default_invoice_one_item_19_without_skonto_overpaid() {
383
sub test_default_invoice_one_item_19_without_skonto_overpaid {
384 384
  my $title = 'default invoice, one item, 19% tax, without_skonto';
385 385

  
386 386
  my $item    = create_invoice_item(part => $parts[0], qty => 2.5);
......
419 419

  
420 420

  
421 421
# test 2
422
sub test_default_invoice_two_items_19_7_tax_with_skonto() {
422
sub test_default_invoice_two_items_19_7_tax_with_skonto {
423 423
  my $title = 'default invoice, two items, 19/7% tax with_skonto_pt';
424 424

  
425 425
  my $item1   = create_invoice_item(part => $parts[0], qty => 2.5);
......
451 451
  is($total,                          0,   "${title}: even balance");
452 452
}
453 453

  
454
sub test_default_invoice_two_items_19_7_tax_with_skonto_tax_included() {
454
sub test_default_invoice_two_items_19_7_tax_with_skonto_tax_included {
455 455
  my $title = 'default invoice, two items, 19/7% tax with_skonto_pt';
456 456

  
457 457
  my $item1   = create_invoice_item(part => $parts[0], qty => 2.5);
......
488 488
}
489 489

  
490 490
# test 3 : two items, without skonto
491
sub test_default_invoice_two_items_19_7_without_skonto() {
491
sub test_default_invoice_two_items_19_7_without_skonto {
492 492
  my $title = 'default invoice, two items, 19/7% tax without skonto';
493 493

  
494 494
  my $item1   = create_invoice_item(part => $parts[0], qty => 2.5);
......
521 521
}
522 522

  
523 523
# test 4
524
sub test_default_invoice_two_items_19_7_without_skonto_incomplete_payment() {
524
sub test_default_invoice_two_items_19_7_without_skonto_incomplete_payment {
525 525
  my $title = 'default invoice, two items, 19/7% tax without skonto incomplete payment';
526 526

  
527 527
  my $item1   = create_invoice_item(part => $parts[0], qty => 2.5);
......
550 550
}
551 551

  
552 552
# test 5
553
sub test_default_invoice_two_items_19_7_tax_without_skonto_multiple_payments() {
553
sub test_default_invoice_two_items_19_7_tax_without_skonto_multiple_payments {
554 554
  my $title = 'default invoice, two items, 19/7% tax not included';
555 555

  
556 556
  my $item1   = create_invoice_item(part => $parts[0], qty => 2.5);
......
584 584
}
585 585

  
586 586
# test 6
587
sub test_default_invoice_two_items_19_7_tax_without_skonto_multiple_payments_final_difference_as_skonto() {
587
sub test_default_invoice_two_items_19_7_tax_without_skonto_multiple_payments_final_difference_as_skonto {
588 588
  my $title = 'default invoice, two items, 19/7% tax not included';
589 589

  
590 590
  my $item1   = create_invoice_item(part => $parts[0], qty => 2.5);
......
623 623

  
624 624
}
625 625

  
626
sub  test_default_invoice_two_items_19_7_tax_without_skonto_multiple_payments_final_difference_as_skonto_1cent() {
626
sub  test_default_invoice_two_items_19_7_tax_without_skonto_multiple_payments_final_difference_as_skonto_1cent {
627 627
  my $title = 'default invoice, two items, 19/7% tax not included';
628 628

  
629 629
  # if there is only one cent left there can only be one skonto booking, the
......
662 662

  
663 663
}
664 664

  
665
sub test_default_invoice_two_items_19_7_tax_without_skonto_multiple_payments_final_difference_as_skonto_2cent() {
665
sub test_default_invoice_two_items_19_7_tax_without_skonto_multiple_payments_final_difference_as_skonto_2cent {
666 666
  my $title = 'default invoice, two items, 19/7% tax not included';
667 667

  
668 668
  # if there are two cents left there will be two skonto bookings, 1 cent each
......
697 697

  
698 698
}
699 699

  
700
sub test_default_invoice_one_item_19_multiple_payment_final_difference_as_skonto() {
700
sub test_default_invoice_one_item_19_multiple_payment_final_difference_as_skonto {
701 701
  my $title = 'default invoice, one item, 19% tax, without_skonto';
702 702

  
703 703
  my $item    = create_invoice_item(part => $parts[0], qty => 2.5);
......
736 736

  
737 737
}
738 738

  
739
sub test_default_invoice_one_item_19_multiple_payment_final_difference_as_skonto_1cent() {
739
sub test_default_invoice_one_item_19_multiple_payment_final_difference_as_skonto_1cent {
740 740
  my $title = 'default invoice, one item, 19% tax, without_skonto';
741 741

  
742 742
  my $item    = create_invoice_item(part => $parts[0], qty => 2.5);
......
772 772
}
773 773

  
774 774
# test 3 : two items, without skonto
775
sub test_default_purchase_invoice_two_charts_19_7_without_skonto() {
775
sub test_default_purchase_invoice_two_charts_19_7_without_skonto {
776 776
  my $title = 'default invoice, two items, 19/7% tax without skonto';
777 777

  
778 778
  my $purchase_invoice = new_purchase_invoice();
......
795 795

  
796 796
}
797 797

  
798
sub test_default_purchase_invoice_two_charts_19_7_with_skonto() {
798
sub test_default_purchase_invoice_two_charts_19_7_with_skonto {
799 799
  my $title = 'default invoice, two items, 19/7% tax without skonto';
800 800

  
801 801
  my $purchase_invoice = new_purchase_invoice();
......
818 818

  
819 819
}
820 820

  
821
sub test_default_purchase_invoice_two_charts_19_7_tax_partial_unrounded_payment_without_skonto() {
821
sub test_default_purchase_invoice_two_charts_19_7_tax_partial_unrounded_payment_without_skonto {
822 822
  my $title = 'default purchase_invoice, two charts, 19/7% tax multiple payments with final difference as skonto';
823 823

  
824 824
  # check whether unrounded amounts passed via $params{amount} are rounded for without_skonto case
......
838 838
};
839 839

  
840 840

  
841
sub test_default_purchase_invoice_two_charts_19_7_tax_without_skonto_multiple_payments_final_difference_as_skonto() {
841
sub test_default_purchase_invoice_two_charts_19_7_tax_without_skonto_multiple_payments_final_difference_as_skonto {
842 842
  my $title = 'default purchase_invoice, two charts, 19/7% tax multiple payments with final difference as skonto';
843 843

  
844 844
  my $purchase_invoice = new_purchase_invoice();
......
872 872
}
873 873

  
874 874
# test
875
sub test_default_invoice_two_items_19_7_tax_with_skonto_50_50() {
875
sub test_default_invoice_two_items_19_7_tax_with_skonto_50_50 {
876 876
  my $title = 'default invoice, two items, 19/7% tax with_skonto_pt 50/50';
877 877

  
878 878
  my $item1   = create_invoice_item(part => $parts[2], qty => 1);
......
905 905
}
906 906

  
907 907
# test
908
sub test_default_invoice_four_items_19_7_tax_with_skonto_4x_25() {
908
sub test_default_invoice_four_items_19_7_tax_with_skonto_4x_25 {
909 909
  my $title = 'default invoice, four items, 19/7% tax with_skonto_pt 4x25';
910 910

  
911 911
  my $item1   = create_invoice_item(part => $parts[2], qty => 0.5);
......
939 939
  is($total              , 0    , "${title}: even balance");
940 940
}
941 941

  
942
sub test_default_invoice_four_items_19_7_tax_with_skonto_4x_25_tax_included() {
942
sub test_default_invoice_four_items_19_7_tax_with_skonto_4x_25_tax_included {
943 943
  my $title = 'default invoice, four items, 19/7% tax with_skonto_pt 4x25';
944 944

  
945 945
  my $item1   = create_invoice_item(part => $parts[2], qty => 0.5);
......
976 976
  }
977 977
}
978 978

  
979
sub test_default_invoice_four_items_19_7_tax_with_skonto_4x_25_multiple() {
979
sub test_default_invoice_four_items_19_7_tax_with_skonto_4x_25_multiple {
980 980
  my $title = 'default invoice, four items, 19/7% tax with_skonto_pt 4x25';
981 981

  
982 982
  my $item1   = create_invoice_item(part => $parts[2], qty => 0.5);

Auch abrufbar als: Unified diff