337: p_customer_trx_id,
338: null, -- customer_trx_line_id
339: l_dist_count,
340: l_error_message,
341: arp_global.base_precision,
342: arp_global.base_min_acc_unit,
343: 'ALL',
344: 'N',
345: null, -- debug_mode
338: null, -- customer_trx_line_id
339: l_dist_count,
340: l_error_message,
341: arp_global.base_precision,
342: arp_global.base_min_acc_unit,
343: 'ALL',
344: 'N',
345: null, -- debug_mode
346: arp_global.sysparam.trx_header_level_rounding,
342: arp_global.base_min_acc_unit,
343: 'ALL',
344: 'N',
345: null, -- debug_mode
346: arp_global.sysparam.trx_header_level_rounding,
347: l_activity_flag
348: ) = 0 -- FALSE
349: )
350: THEN
963: +---------------------------------------------*/
964: PROCEDURE init IS
965: BEGIN
966:
967: pg_base_precision := arp_global.base_precision;
968: pg_base_min_acc_unit := arp_global.base_min_acc_unit;
969: pg_trx_header_level_rounding := arp_global.sysparam.trx_header_level_rounding;
970: END init;
971:
964: PROCEDURE init IS
965: BEGIN
966:
967: pg_base_precision := arp_global.base_precision;
968: pg_base_min_acc_unit := arp_global.base_min_acc_unit;
969: pg_trx_header_level_rounding := arp_global.sysparam.trx_header_level_rounding;
970: END init;
971:
972: BEGIN
965: BEGIN
966:
967: pg_base_precision := arp_global.base_precision;
968: pg_base_min_acc_unit := arp_global.base_min_acc_unit;
969: pg_trx_header_level_rounding := arp_global.sysparam.trx_header_level_rounding;
970: END init;
971:
972: BEGIN
973: init;