Revision d73f2c37
Von Cem Aydin vor etwa 1 Jahr hinzugefügt
t/helper/qrbill_functions.t | ||
---|---|---|
1 |
use Test::More tests => 22;
|
|
1 |
use Test::More tests => 38;
|
|
2 | 2 |
|
3 | 3 |
use strict; |
4 | 4 |
|
5 | 5 |
use lib 't'; |
6 | 6 |
use Support::TestSetup; |
7 | 7 |
|
8 |
use_ok('SL::Helper::QrBillFunctions', qw(assemble_ref_number get_ref_number_formatted |
|
9 |
get_iban_formatted get_amount_formatted)); |
|
8 |
use_ok('SL::Helper::QrBillFunctions', qw( |
|
9 |
get_street_name_from_address_line |
|
10 |
get_building_number_from_address_line |
|
11 |
get_postal_code_from_address_line |
|
12 |
get_town_name_from_address_line |
|
13 |
assemble_ref_number |
|
14 |
get_ref_number_formatted |
|
15 |
get_iban_formatted |
|
16 |
get_amount_formatted |
|
17 |
)); |
|
10 | 18 |
|
11 | 19 |
Support::TestSetup::login(); |
12 | 20 |
|
21 |
is(get_street_name_from_address_line('Musterstrasse 12'), 'Musterstrasse', 'get_street_name_from_address_line'); |
|
22 |
is(get_street_name_from_address_line('Musterstrasse St. Jakob 22'), 'Musterstrasse St. Jakob', 'get_street_name_from_address_line_with_multi_word_street_name'); |
|
23 |
is(get_street_name_from_address_line('Musterstrasse St. Jakob 22b'), 'Musterstrasse St. Jakob', 'get_street_name_from_address_line_with_multi_word_street_name_and_letter'); |
|
24 |
is(get_street_name_from_address_line('Musterstrasse 12a'), 'Musterstrasse', 'get_street_name_from_address_line_with_building_number'); |
|
25 |
is(get_street_name_from_address_line('Musterstrasse 12a 1234 Musterhausen'), 'Musterstrasse', 'get_street_name_from_address_line_with_building_number_and_zip'); |
|
26 |
is(get_street_name_from_address_line('Musterstrasse'), 'Musterstrasse', 'get_street_name_from_address_line_without_building_number'); |
|
27 |
|
|
28 |
is(get_building_number_from_address_line('Musterstrasse 12'), '12', 'get_building_number_from_address_line'); |
|
29 |
is(get_building_number_from_address_line('Musterstrasse 12a'), '12a', 'get_building_number_from_address_line_with_building_number'); |
|
30 |
is(get_building_number_from_address_line('Musterstrasse 12a 1234 Musterhausen'), '12a 1234 Musterhausen', 'get_building_number_from_address_line_with_building_number_and_zip'); |
|
31 |
is(get_building_number_from_address_line('Musterstrasse'), '', 'get_building_number_from_address_line_without_building_number'); |
|
32 |
|
|
33 |
is(get_postal_code_from_address_line('8000 Zürich'), '8000', 'get_postal_code_from_address_line'); |
|
34 |
is(get_postal_code_from_address_line('8000 Zürich 1'), '8000', 'get_postal_code_from_address_line_with_zip_extension'); |
|
35 |
is(get_postal_code_from_address_line('8000'), '8000', 'get_postal_code_from_address_line_without_town_name'); |
|
36 |
|
|
37 |
is(get_town_name_from_address_line('8000 Zürich'), 'Zürich', 'get_town_name_from_address_line'); |
|
38 |
is(get_town_name_from_address_line('8000 Zürich 1'), 'Zürich 1', 'get_town_name_from_address_line_with_zip_extension'); |
|
39 |
is(get_town_name_from_address_line('8000'), '', 'get_town_name_from_address_line_without_town_name'); |
|
40 |
|
|
13 | 41 |
# assemble_ref_number returns successfully |
14 | 42 |
is_deeply([ assemble_ref_number('123123', 'c1', 'R2022-02') ], |
15 | 43 |
[ '123123000001000000002022027', undef ], |
Auch abrufbar als: Unified diff
Schweizer QR-Rechnung: Aufsplitten von kombinierten Adressfelder in Helferfunktionen ausgelagert