|
Lines 38-43
my $sessionID = $input->cookie("CGISESSID");
Link Here
|
| 38 |
my $session = get_session($sessionID); |
38 |
my $session = get_session($sessionID); |
| 39 |
|
39 |
|
| 40 |
my $itemnumber = $input->param('transferitem'); |
40 |
my $itemnumber = $input->param('transferitem'); |
|
|
41 |
my $barcode = $input->param('barcode'); |
| 41 |
my $branchcode = $input->param('branchcode'); |
42 |
my $branchcode = $input->param('branchcode'); |
| 42 |
|
43 |
|
| 43 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user( |
44 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user( |
|
Lines 54-60
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
Link Here
|
| 54 |
|
55 |
|
| 55 |
my $userenv = C4::Context->userenv; |
56 |
my $userenv = C4::Context->userenv; |
| 56 |
my ($slip, $is_html); |
57 |
my ($slip, $is_html); |
| 57 |
if ( my $letter = TransferSlip ($session->param('branch') || $userenv->{branch}, $itemnumber, $branchcode) ) { |
58 |
if ( my $letter = TransferSlip ($session->param('branch') || $userenv->{branch}, $itemnumber, $barcode, $branchcode) ) { |
| 58 |
$slip = $letter->{content}; |
59 |
$slip = $letter->{content}; |
| 59 |
$is_html = $letter->{is_html}; |
60 |
$is_html = $letter->{is_html}; |
| 60 |
} |
61 |
} |
| 61 |
- |
|
|