784: BEGIN
785: Errcd := 0;
786: SELECT COUNT (*)
787: INTO total_rec
788: FROM fnd_currencies_vl c
789: WHERE c.global_attribute1 = cnab
790: AND c.currency_code <> curr_code;
791: EXCEPTION
792: WHEN OTHERS THEN
800: BEGIN
801: Errcd := 0;
802: SELECT SUBSTR (c.global_attribute1, 1, 15)
803: INTO cnab
804: FROM fnd_currencies_vl c
805: WHERE c.currency_code = curr_code
806: AND rownum = row_number;
807: EXCEPTION
808: WHEN OTHERS THEN