@@ -, +, @@ acqui/pdfformat/layout*.pm - acqui/pdfformat/layout2pages.pm - acqui/pdfformat/layout2pagesde.pm - acqui/pdfformat/layout3pages.pm - acqui/pdfformat/layout3pagesfr.pm - Apply patch - Go to Home > Acquisitions > [Vendor] > Basket groups - Print a basket (order) - Verify that the current date is formatted respects syspref 'dateformat' - Do the same with syspref 'OrderPdfFormat' set to the four different choices --- acqui/pdfformat/layout2pages.pm | 3 ++- acqui/pdfformat/layout2pagesde.pm | 3 ++- acqui/pdfformat/layout3pages.pm | 3 ++- acqui/pdfformat/layout3pagesfr.pm | 3 ++- 4 files changed, 8 insertions(+), 4 deletions(-) --- a/acqui/pdfformat/layout2pages.pm +++ a/acqui/pdfformat/layout2pages.pm @@ -31,6 +31,7 @@ use utf8; use C4::Branch qw(GetBranchDetail); use Koha::Number::Price; +use Koha::DateUtils; BEGIN { use Exporter (); @@ -170,7 +171,7 @@ sub printhead { $text->text($basketgroup->{'id'}); # print the date - my $today = C4::Dates->today(); + my $today = output_pref({ dt => dt_from_string, dateonly => 1 }); $text->translate(130/mm, ($height-5-48)/mm); $text->text($today); --- a/acqui/pdfformat/layout2pagesde.pm +++ a/acqui/pdfformat/layout2pagesde.pm @@ -31,6 +31,7 @@ use utf8; use C4::Branch qw(GetBranchDetail); use Koha::Number::Price; +use Koha::DateUtils; BEGIN { use Exporter (); @@ -170,7 +171,7 @@ sub printhead { $text->text($basketgroup->{'id'}); # print the date - my $today = C4::Dates->today(); + my $today = output_pref({ dt => dt_from_string, dateonly => 1 }); $text->translate(130/mm, ($height-5-48)/mm); $text->text($today); --- a/acqui/pdfformat/layout3pages.pm +++ a/acqui/pdfformat/layout3pages.pm @@ -32,6 +32,7 @@ use utf8; use C4::Branch qw(GetBranchDetail GetBranchName); use Koha::Number::Price; +use Koha::DateUtils; BEGIN { use Exporter (); @@ -334,7 +335,7 @@ sub printhead { $text->text($basketgroup->{'id'}); # print the date - my $today = C4::Dates->today(); + my $today = output_pref({ dt => dt_from_string, dateonly => 1 }); $text->translate(130/mm, ($height-5-48)/mm); $text->text($today); --- a/acqui/pdfformat/layout3pagesfr.pm +++ a/acqui/pdfformat/layout3pagesfr.pm @@ -31,6 +31,7 @@ use utf8; use C4::Branch qw(GetBranchDetail GetBranchName); use Koha::Number::Price; +use Koha::DateUtils; BEGIN { use Exporter (); @@ -334,7 +335,7 @@ sub printhead { $text->text($basketgroup->{'id'}); # print the date - my $today = C4::Dates->today(); + my $today = output_pref({ dt => dt_from_string, dateonly => 1 }); $text->translate(130/mm, ($height-5-48)/mm); $text->text($today); --