@@ -, +, @@ - Works as described. ISBN appears on ISSUESLIP & ISSUEQSLIP. - Not all fields for biblioitems are available, but neither are they all available for other tables. Noted in POD. --- C4/Members.pm | 57 ++++++++++++++++++++++++++++++++++++++++++++++++--------- 1 files changed, 48 insertions(+), 9 deletions(-) --- a/C4/Members.pm +++ a/C4/Members.pm @@ -2434,6 +2434,42 @@ sub DeleteMessage { $quickslip is boolean, to indicate whether we want a quick slip + IssueSlip populates ISSUESLIP and ISSUEQSLIP, and will make the following expansions: + + Both slips: + + <> + <> + + ISSUESLIP: + + + <> + <> + <> + <> + + + + <> + <> + <> + <> + + + + <> + + + ISSUEQSLIP: + + + <> + <> + <> + <> + + =cut sub IssueSlip { @@ -2461,9 +2497,10 @@ sub IssueSlip { $letter_code = 'ISSUEQSLIP'; %repeat = ( 'checkedout' => [ map { - 'biblio' => $_, - 'items' => $_, - 'issues' => $_, + 'biblio' => $_, + 'items' => $_, + 'biblioitems' => $_, + 'issues' => $_, }, grep { $_->{'now'} } @issues ], ); } @@ -2471,15 +2508,17 @@ sub IssueSlip { $letter_code = 'ISSUESLIP'; %repeat = ( 'checkedout' => [ map { - 'biblio' => $_, - 'items' => $_, - 'issues' => $_, + 'biblio' => $_, + 'items' => $_, + 'biblioitems' => $_, + 'issues' => $_, }, grep { !$_->{'overdue'} } @issues ], 'overdue' => [ map { - 'biblio' => $_, - 'items' => $_, - 'issues' => $_, + 'biblio' => $_, + 'items' => $_, + 'biblioitems' => $_, + 'issues' => $_, }, grep { $_->{'overdue'} } @issues ], 'news' => [ map { --