19 lines
430 B
Plaintext
19 lines
430 B
Plaintext
CATCH no_voucher flag_no_active_voucher 1
|
|
LOAD get_paydebt_voucher_list 0
|
|
MAP get_paydebt_voucher_list
|
|
MOUT back 0
|
|
MOUT quit 99
|
|
MNEXT next 88
|
|
MPREV prev 98
|
|
HALT
|
|
INCMP > 88
|
|
INCMP < 98
|
|
INCMP _ 0
|
|
INCMP quit 99
|
|
LOAD calculate_max_pay_debt 128
|
|
RELOAD calculate_max_pay_debt
|
|
CATCH . flag_incorrect_voucher 1
|
|
CATCH low_pay_debt_amount flag_low_swap_amount 1
|
|
CATCH low_pay_debt_amount flag_api_call_error 1
|
|
INCMP calculate_max_pay_debt *
|