Revision 690a3bac
Von Moritz Bunkus vor etwa 17 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
|
sub print {
|
||
|
$lxdebug->enter_sub();
|
||
|
|
||
|
$auth->assert('part_service_assembly_edit | vendor_invoice_edit | sales_order_edit | invoice_edit |' .
|
||
|
'request_quotation_edit | sales_quotation_edit | purchase_order_edit | ' .
|
||
|
'order_request_edit_all | order_request_edit');
|
||
|
$auth->assert('part_service_assembly_edit | vendor_invoice_edit | sales_order_edit | invoice_edit |' .
|
||
|
'request_quotation_edit | sales_quotation_edit | purchase_order_edit | ' .
|
||
|
'purchase_delivery_order_edit | sales_delivery_order_edit');
|
||
|
|
||
|
if ($form->{print_nextsub}) {
|
||
|
call_sub($form->{print_nextsub});
|
||
| ... | ... | |
|
($form->{employee}) = split /--/, $form->{employee};
|
||
|
|
||
|
# create the form variables
|
||
|
if ($form->{formname} eq 'order_request') {
|
||
|
order_request_details();
|
||
|
} elsif ($form->{formname} eq 'return_material_slip') {
|
||
|
rms_details();
|
||
|
} elsif ($form->{formname} eq 'release_material_slip') {
|
||
|
rlms_details();
|
||
|
} elsif ($form->{type} =~ /_delivery_order$/) {
|
||
|
if ($form->{type} =~ /_delivery_order$/) {
|
||
|
DO->order_details();
|
||
|
} elsif ($order) {
|
||
|
OE->order_details(\%myconfig, \%$form);
|
||
Auch abrufbar als: Unified diff
Fälschlicherweise gemergeten Code entfernt.