APPS.FV_GTAS_AGENCY_ID_UPGRADE dependencies on AP_SUPPLIERS

Line 185: l_table := 'ap_suppliers';

181: ELSE
182: l_col_select := ' select c.vendor_id, c.vendor_name,';
183: l_where_clause := 'and vendor_type_lookup_code = ''FEDERAL'' ';
184: l_attrib := l_facts1_vend_attribute;
185: l_table := 'ap_suppliers';
186: l_party_type := '-----SUPPLIERS-----';
187: l_sub_hdr_printed := FALSE;
188: END IF;
189:

Line 249: FROM ap_suppliers c ';

245: l_party_type := '-----CUSTOMERS-----';
246: l_sub_hdr_printed := FALSE;
247: ELSE
248: l_col_select := ' SELECT SUBSTR(c.vendor_name,1,80)
249: FROM ap_suppliers c ';
250: l_where_clause := 'and c.vendor_type_lookup_code = ''FEDERAL'' ';
251: l_attrib := l_facts1_vend_attribute;
252:
253: l_party_type := '-----SUPPLIERS-----';

Line 363: 'update ap_suppliers c

359: EXECUTE IMMEDIATE l_update_statement;
360: ELSE
361: l_attrib := l_facts1_vend_attribute;
362: l_update_statement :=
363: 'update ap_suppliers c
364: set global_attribute5 =
365: (select f.aid
366: from fv_agency_id_map f
367: where f.star_dept_reg = SUBSTR(c.'||l_attrib||',1,2)

Line 383: fnd_file.put_line(fnd_file.log,'Updated ap_suppliers.global_attribute5');

379: and vendor_type_lookup_code = ''FEDERAL''
380: and SUBSTR(c.'||l_attrib||',1,2) NOT IN (''48'', ''95'') ';
381:
382: fnd_file.put_line(fnd_file.log,'------------------------------------------------------');
383: fnd_file.put_line(fnd_file.log,'Updated ap_suppliers.global_attribute5');
384: fnd_file.put_line(fnd_file.log,'------------------------------------------------------');
385:
386: EXECUTE IMMEDIATE l_update_statement;
387: END IF;

Line 649: --Update ap_suppliers.global_attribute4 (which is fed nonfed code GDF)

645: g_err_buff := 'When Others Error: '||SQLERRM;
646: g_err_code := sqlcode;
647: END upgrade_budget_codes;
648: -----------------------------------------------------------------------------------
649: --Update ap_suppliers.global_attribute4 (which is fed nonfed code GDF)
650: PROCEDURE UPGRADE_FEDNONFED_CODE IS
651: BEGIN
652: fnd_file.put_line(fnd_file.log, 'Updating Fed Non-Fed Code in ap_suppliers.');
653:

Line 652: fnd_file.put_line(fnd_file.log, 'Updating Fed Non-Fed Code in ap_suppliers.');

648: -----------------------------------------------------------------------------------
649: --Update ap_suppliers.global_attribute4 (which is fed nonfed code GDF)
650: PROCEDURE UPGRADE_FEDNONFED_CODE IS
651: BEGIN
652: fnd_file.put_line(fnd_file.log, 'Updating Fed Non-Fed Code in ap_suppliers.');
653:
654: UPDATE ap_suppliers
655: SET global_attribute4 = 'F',
656: global_attribute_category = 'FV.US.APXVDMVD.GTAS_DATA',

Line 654: UPDATE ap_suppliers

650: PROCEDURE UPGRADE_FEDNONFED_CODE IS
651: BEGIN
652: fnd_file.put_line(fnd_file.log, 'Updating Fed Non-Fed Code in ap_suppliers.');
653:
654: UPDATE ap_suppliers
655: SET global_attribute4 = 'F',
656: global_attribute_category = 'FV.US.APXVDMVD.GTAS_DATA',
657: global_attribute20 = 1
658: WHERE vendor_type_lookup_code = 'FEDERAL';

Line 660: UPDATE ap_suppliers

656: global_attribute_category = 'FV.US.APXVDMVD.GTAS_DATA',
657: global_attribute20 = 1
658: WHERE vendor_type_lookup_code = 'FEDERAL';
659:
660: UPDATE ap_suppliers
661: SET global_attribute4 = 'N',
662: global_attribute_category = 'FV.US.APXVDMVD.GTAS_DATA',
663: global_attribute20 = 1
664: WHERE vendor_type_lookup_code <> 'FEDERAL'

Line 667: fnd_file.put_line(fnd_file.log, 'Updated Fed Non-Fed Code in ap_suppliers.');

663: global_attribute20 = 1
664: WHERE vendor_type_lookup_code <> 'FEDERAL'
665: AND global_attribute_category IS NULL;
666:
667: fnd_file.put_line(fnd_file.log, 'Updated Fed Non-Fed Code in ap_suppliers.');
668:
669: EXCEPTION
670: WHEN OTHERS THEN
671: g_err_buff := 'When Others Error: '||SQLERRM;