Lines 53-58
my $fee_amount;
Link Here
|
53 |
my $fee_identifier; |
53 |
my $fee_identifier; |
54 |
my $transaction_id; |
54 |
my $transaction_id; |
55 |
my $pickup_location; |
55 |
my $pickup_location; |
|
|
56 |
my $hold_mode; |
56 |
|
57 |
|
57 |
my $terminator = q{}; |
58 |
my $terminator = q{}; |
58 |
|
59 |
|
Lines 81-86
GetOptions(
Link Here
|
81 |
"fee-identifier=s" => \$fee_identifier, |
82 |
"fee-identifier=s" => \$fee_identifier, |
82 |
"transaction-id=s" => \$transaction_id, |
83 |
"transaction-id=s" => \$transaction_id, |
83 |
"pickup-location=s" => \$pickup_location, |
84 |
"pickup-location=s" => \$pickup_location, |
|
|
85 |
"hold-mode=s" => \$hold_mode, |
84 |
|
86 |
|
85 |
"t|terminator=s" => \$terminator, |
87 |
"t|terminator=s" => \$terminator, |
86 |
|
88 |
|
Lines 264-270
my $handlers = {
Link Here
|
264 |
name => 'Hold', |
266 |
name => 'Hold', |
265 |
subroutine => \&build_hold_command_message, |
267 |
subroutine => \&build_hold_command_message, |
266 |
parameters => { |
268 |
parameters => { |
267 |
hold_mode => '+', |
269 |
hold_mode => $hold_mode eq '-' ? '-' : '+', |
268 |
transaction_date => $transaction_date, |
270 |
transaction_date => $transaction_date, |
269 |
expiration_date => undef, |
271 |
expiration_date => undef, |
270 |
pickup_location => $pickup_location, |
272 |
pickup_location => $pickup_location, |
Lines 639-644
Options:
Link Here
|
639 |
--fee-identifier Fee identifier for Fee Paid message, optional |
641 |
--fee-identifier Fee identifier for Fee Paid message, optional |
640 |
--transaction-id Transaction id for Fee Paid message, optional |
642 |
--transaction-id Transaction id for Fee Paid message, optional |
641 |
--pickup-location Pickup location (branchcode) for Hold message, optional |
643 |
--pickup-location Pickup location (branchcode) for Hold message, optional |
|
|
644 |
--hold-mode Accepts +: Add hold or -:cancel hold, defaults to + |
642 |
|
645 |
|
643 |
-m --message SIP2 message to execute |
646 |
-m --message SIP2 message to execute |
644 |
|
647 |
|
645 |
- |
|
|