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

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

Return to bug 13819