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

(-)a/misc/sip_cli_emulator.pl (-9 / +6 lines)
Lines 44-50 my $summary; Link Here
44
44
45
my $item_identifier;
45
my $item_identifier;
46
46
47
my $fee_acknowledged = 0;
47
my $fee_acknowledged;
48
48
49
my $fee_type;
49
my $fee_type;
50
my $payment_type;
50
my $payment_type;
Lines 72-78 GetOptions( Link Here
72
72
73
    "i|item=s" => \$item_identifier,
73
    "i|item=s" => \$item_identifier,
74
74
75
    "fa|fee-acknowledged" => \$fee_acknowledged,
75
    "fa|fee-acknowledged=s" => \$fee_acknowledged,
76
76
77
    "s|summary=s" => \$summary,
77
    "s|summary=s" => \$summary,
78
78
Lines 449-460 sub build_checkout_command_message { Link Here
449
    my $terminal_password = $params->{terminal_password};
449
    my $terminal_password = $params->{terminal_password};
450
    my $item_properties   = $params->{item_properties};
450
    my $item_properties   = $params->{item_properties};
451
    my $patron_password   = $params->{patron_password};
451
    my $patron_password   = $params->{patron_password};
452
    my $fee_acknowledged  = $params->{fee_acknowledged} || 'N';
452
    my $fee_acknowledged  = $params->{fee_acknowledged};
453
    my $cancel            = $params->{cancel} || 'N';
453
    my $cancel            = $params->{cancel} || 'N';
454
454
455
    $SC_renewal_policy = $SC_renewal_policy eq 'Y' ? 'Y' : 'N';
455
    $SC_renewal_policy = $SC_renewal_policy eq 'Y' ? 'Y' : 'N';
456
    $no_block          = $no_block          eq 'Y' ? 'Y' : 'N';
456
    $no_block          = $no_block          eq 'Y' ? 'Y' : 'N';
457
    $fee_acknowledged  = $fee_acknowledged  eq 'Y' ? 'Y' : 'N';
458
    $cancel            = $cancel            eq 'Y' ? 'Y' : 'N';
457
    $cancel            = $cancel            eq 'Y' ? 'Y' : 'N';
459
458
460
    $nb_due_date ||= $transaction_date;
459
    $nb_due_date ||= $transaction_date;
Lines 520-526 sub build_hold_command_message { Link Here
520
    my $item_identifier   = $params->{item_identifier};
519
    my $item_identifier   = $params->{item_identifier};
521
    my $title_identifier  = $params->{title_identifier};
520
    my $title_identifier  = $params->{title_identifier};
522
    my $terminal_password = $params->{terminal_password};
521
    my $terminal_password = $params->{terminal_password};
523
    my $fee_acknowledged  = $params->{fee_acknowledged} || 'N';
522
    my $fee_acknowledged  = $params->{fee_acknowledged};
524
523
525
    return
524
    return
526
        HOLD
525
        HOLD
Lines 552-562 sub build_renew_command_message { Link Here
552
    my $title_identifier    = $params->{title_identifier};
551
    my $title_identifier    = $params->{title_identifier};
553
    my $terminal_password   = $params->{terminal_password};
552
    my $terminal_password   = $params->{terminal_password};
554
    my $item_properties     = $params->{item_properties};
553
    my $item_properties     = $params->{item_properties};
555
    my $fee_acknowledged    = $params->{fee_acknowledged}    || 'N';
554
    my $fee_acknowledged    = $params->{fee_acknowledged};
556
555
557
    $third_party_allowed = $third_party_allowed eq 'Y' ? 'Y' : 'N';
556
    $third_party_allowed = $third_party_allowed eq 'Y' ? 'Y' : 'N';
558
    $no_block            = $no_block            eq 'Y' ? 'Y' : 'N';
557
    $no_block            = $no_block            eq 'Y' ? 'Y' : 'N';
559
    $fee_acknowledged    = $fee_acknowledged    eq 'Y' ? 'Y' : 'N';
560
558
561
    $nb_due_date ||= $transaction_date;
559
    $nb_due_date ||= $transaction_date;
562
560
Lines 647-653 Options: Link Here
647
  -t --terminator  SIP2 message terminator, either CR, or CRLF
645
  -t --terminator  SIP2 message terminator, either CR, or CRLF
648
                   (defaults to CRLF)
646
                   (defaults to CRLF)
649
647
650
  -fa --fee-acknowledged Sends a confirmation of checkout fee
648
  -fa --fee-acknowledged Accepts "Y" to acknowledge a fee, "N" to not acknowledge it
651
649
652
  --fee-type        Fee type for Fee Paid message, defaults to '01'
650
  --fee-type        Fee type for Fee Paid message, defaults to '01'
653
  --payment-type    Payment type for Fee Paid message, default to '00'
651
  --payment-type    Payment type for Fee Paid message, default to '00'
654
- 

Return to bug 34764