View | Details | Raw Unified | Return to bug 13819
Collapse All | Expand All

(-)a/C4/Members.pm (-10 / +48 lines)
Lines 2434-2439 sub DeleteMessage { Link Here
2434
2434
2435
  $quickslip is boolean, to indicate whether we want a quick slip
2435
  $quickslip is boolean, to indicate whether we want a quick slip
2436
2436
2437
  IssueSlip populates ISSUESLIP and ISSUEQSLIP, and will make the following expansions:
2438
2439
  Both slips:
2440
2441
      <<branches.*>>
2442
      <<borrowers.*>>
2443
2444
  ISSUESLIP:
2445
2446
      <checkedout>
2447
         <<biblio.*>>
2448
         <<items.*>>
2449
         <<biblioitems.*>>
2450
         <<issues.*>>
2451
      </checkedout>
2452
2453
      <overdue>
2454
         <<biblio.*>>
2455
         <<items.*>>
2456
         <<biblioitems.*>>
2457
         <<issues.*>>
2458
      </overdue>
2459
2460
      <news>
2461
         <<opac_news.*>>
2462
      </news>
2463
2464
  ISSUEQSLIP:
2465
2466
      <checkedout>
2467
         <<biblio.*>>
2468
         <<items.*>>
2469
         <<biblioitems.*>>
2470
         <<issues.*>>
2471
      </checkedout>
2472
2437
=cut
2473
=cut
2438
2474
2439
sub IssueSlip {
2475
sub IssueSlip {
Lines 2461-2469 sub IssueSlip { Link Here
2461
        $letter_code = 'ISSUEQSLIP';
2497
        $letter_code = 'ISSUEQSLIP';
2462
        %repeat =  (
2498
        %repeat =  (
2463
            'checkedout' => [ map {
2499
            'checkedout' => [ map {
2464
                'biblio' => $_,
2500
                'biblio'       => $_,
2465
                'items'  => $_,
2501
                'items'        => $_,
2466
                'issues' => $_,
2502
                'biblioitems'  => $_,
2503
                'issues'       => $_,
2467
            }, grep { $_->{'now'} } @issues ],
2504
            }, grep { $_->{'now'} } @issues ],
2468
        );
2505
        );
2469
    }
2506
    }
Lines 2471-2485 sub IssueSlip { Link Here
2471
        $letter_code = 'ISSUESLIP';
2508
        $letter_code = 'ISSUESLIP';
2472
        %repeat =  (
2509
        %repeat =  (
2473
            'checkedout' => [ map {
2510
            'checkedout' => [ map {
2474
                'biblio' => $_,
2511
                'biblio'       => $_,
2475
                'items'  => $_,
2512
                'items'        => $_,
2476
                'issues' => $_,
2513
                'biblioitems'  => $_,
2514
                'issues'       => $_,
2477
            }, grep { !$_->{'overdue'} } @issues ],
2515
            }, grep { !$_->{'overdue'} } @issues ],
2478
2516
2479
            'overdue' => [ map {
2517
            'overdue' => [ map {
2480
                'biblio' => $_,
2518
                'biblio'       => $_,
2481
                'items'  => $_,
2519
                'items'        => $_,
2482
                'issues' => $_,
2520
                'biblioitems'  => $_,
2521
                'issues'       => $_,
2483
            }, grep { $_->{'overdue'} } @issues ],
2522
            }, grep { $_->{'overdue'} } @issues ],
2484
2523
2485
            'news' => [ map {
2524
            'news' => [ map {
2486
- 

Return to bug 13819