567: BEGIN
568: l_aid := NULL;
569: SELECT aid
570: INTO l_aid
571: FROM fv_agency_id_map
572: --WHERE star_dept_reg = NVL(f1_eb_rec.eliminations_dept, '-ZZ')
573: WHERE star_dept_reg = NVL(SUBSTR(f1_eb_rec.eliminations_dept,1,2), '-ZZ')
574: AND rownum = 1;
575:
697: BEGIN
698: l_aid := NULL;
699: SELECT aid
700: INTO l_aid
701: FROM fv_agency_id_map
702: WHERE star_dept_reg = f2_eb_rec.transfer_dept_id
703: AND rownum = 1;
704:
705: EXCEPTION
807: BEGIN
808: l_aid := NULL;
809: SELECT aid
810: INTO l_aid
811: FROM fv_agency_id_map
812: --WHERE star_dept_reg = NVL(f2_eb_rec.transfer_dept_id, '-ZZ')
813: WHERE star_dept_reg = NVL(SUBSTR(f2_eb_rec.transfer_dept_id,1,2), '-ZZ')
814: AND rownum = 1;
815: