12: v_gl_log_trigger_cache number;
13:
14: --Begin Bug 1677297 Mohit Kapoor
15: --Added following variables
16: v_vendor_id PO_VENDOR_SITES_ALL.VENDOR_ID%Type;
17: v_vendor_site_code PO_VENDOR_SITES_ALL.VENDOR_SITE_CODE%Type;
18: v_segment1 PO_VENDORS.SEGMENT1%Type;
19: v_total_vendors_failed number:=0;
20: v_total_vendors number:=0;
13:
14: --Begin Bug 1677297 Mohit Kapoor
15: --Added following variables
16: v_vendor_id PO_VENDOR_SITES_ALL.VENDOR_ID%Type;
17: v_vendor_site_code PO_VENDOR_SITES_ALL.VENDOR_SITE_CODE%Type;
18: v_segment1 PO_VENDORS.SEGMENT1%Type;
19: v_total_vendors_failed number:=0;
20: v_total_vendors number:=0;
21: --End Bug 1677297
30: where p.co_code=p_co_code;
31:
32: --Begin Bug 1677297 Mohit Kapoor
33: -- Changed cursor definition added vendor_id, vendor_site_code
34: cursor c_po_vendor_sites_all(p_co_code varchar2) is
35: select i.last_update_date, i.vendor_id, i.vendor_site_code
36: from po_vendor_sites_all i
37: where nvl(i.org_id,-999) = nvl(v_org_id,-999)
38: for update of last_update_date;
32: --Begin Bug 1677297 Mohit Kapoor
33: -- Changed cursor definition added vendor_id, vendor_site_code
34: cursor c_po_vendor_sites_all(p_co_code varchar2) is
35: select i.last_update_date, i.vendor_id, i.vendor_site_code
36: from po_vendor_sites_all i
37: where nvl(i.org_id,-999) = nvl(v_org_id,-999)
38: for update of last_update_date;
39: --End Bug 1677297 Mohit Kapoor
40:
68: open c_gl_plcy_mst(p_co_code);
69: fetch c_gl_plcy_mst into v_org_id;
70: close c_gl_plcy_mst;
71:
72: if (c_po_vendor_sites_all%ISOPEN) then
73: close c_po_vendor_sites_all;
74: end if;
75:
76: open c_po_vendor_sites_all(v_org_id);
69: fetch c_gl_plcy_mst into v_org_id;
70: close c_gl_plcy_mst;
71:
72: if (c_po_vendor_sites_all%ISOPEN) then
73: close c_po_vendor_sites_all;
74: end if;
75:
76: open c_po_vendor_sites_all(v_org_id);
77: loop
72: if (c_po_vendor_sites_all%ISOPEN) then
73: close c_po_vendor_sites_all;
74: end if;
75:
76: open c_po_vendor_sites_all(v_org_id);
77: loop
78: --Begin Bug1677297 Mohit Kapoor
79: Gmf_Session_Vars.FOUND_ERRORS := 'N';
80:
78: --Begin Bug1677297 Mohit Kapoor
79: Gmf_Session_Vars.FOUND_ERRORS := 'N';
80:
81: -- Modified Fetch statement 1677297
82: fetch c_po_vendor_sites_all into v_last_update_date,v_vendor_id ,v_vendor_site_code ;
83: exit when c_po_vendor_sites_all%NOTFOUND;
84:
85: GMF_Session_Vars.GL$VEND_DELIMITER := nvl(FND_PROFILE.VALUE('GL$VEND_DELIMITER'),'-');
86:
79: Gmf_Session_Vars.FOUND_ERRORS := 'N';
80:
81: -- Modified Fetch statement 1677297
82: fetch c_po_vendor_sites_all into v_last_update_date,v_vendor_id ,v_vendor_site_code ;
83: exit when c_po_vendor_sites_all%NOTFOUND;
84:
85: GMF_Session_Vars.GL$VEND_DELIMITER := nvl(FND_PROFILE.VALUE('GL$VEND_DELIMITER'),'-');
86:
87: open c_po_vendors(v_vendor_id);
94:
95: /*---------------------------------------------------
96: -- This update will trigger vendor trigger to synch
97: ---------------------------------------------------*/
98: update po_vendor_sites_all
99: set last_update_date=last_update_date
100: where current of c_po_vendor_sites_all;
101:
102: --Begin Bug1677297 Mohit Kapoor
96: -- This update will trigger vendor trigger to synch
97: ---------------------------------------------------*/
98: update po_vendor_sites_all
99: set last_update_date=last_update_date
100: where current of c_po_vendor_sites_all;
101:
102: --Begin Bug1677297 Mohit Kapoor
103: -- Added code
104: if Gmf_Session_Vars.FOUND_ERRORS = 'N' then
110: end if;
111: --End Bug 1677297
112:
113: end loop;
114: close c_po_vendor_sites_all;
115: --Begin Bug1677297 Mohit Kapoor
116: PRINT_LINE ( '-----------------------------------------------------------------');
117: PRINT_LINE ('Records Failed = ' ||to_char(v_total_vendors_failed));
118: PRINT_LINE ('Total Records Synched = ' || to_char(v_total_vendors_synched));