867: +---------------------------------------------*/
868: PROCEDURE init IS
869: BEGIN
870:
871: pg_base_curr_code := arp_global.functional_currency;
872: pg_base_precision := arp_global.base_precision;
873: pg_base_min_acc_unit := arp_global.base_min_acc_unit;
874:
875: END init;
868: PROCEDURE init IS
869: BEGIN
870:
871: pg_base_curr_code := arp_global.functional_currency;
872: pg_base_precision := arp_global.base_precision;
873: pg_base_min_acc_unit := arp_global.base_min_acc_unit;
874:
875: END init;
876:
869: BEGIN
870:
871: pg_base_curr_code := arp_global.functional_currency;
872: pg_base_precision := arp_global.base_precision;
873: pg_base_min_acc_unit := arp_global.base_min_acc_unit;
874:
875: END init;
876:
877: BEGIN