22:
23: /*--------------------
24: -- Declare cursor
25: --------------------*/
26: cursor c_gl_plcy_mst(p_co_code varchar2) is
27: select decode(upper(f.multi_org_flag), 'Y', p.org_id, NULL)
28: from gl_plcy_mst p,
29: fnd_product_groups f
30: where p.co_code=p_co_code;
24: -- Declare cursor
25: --------------------*/
26: cursor c_gl_plcy_mst(p_co_code varchar2) is
27: select decode(upper(f.multi_org_flag), 'Y', p.org_id, NULL)
28: from gl_plcy_mst p,
29: fnd_product_groups f
30: where p.co_code=p_co_code;
31:
32: --Begin Bug 1677297 Mohit Kapoor
60: PRINT_LINE ( '-----------------------------------------------------------------');
61: PRINT_LINE ('Vendor :-');
62: --End Bug 1677297
63:
64: if (c_gl_plcy_mst%ISOPEN) then
65: close c_gl_plcy_mst;
66: end if;
67:
68: open c_gl_plcy_mst(p_co_code);
61: PRINT_LINE ('Vendor :-');
62: --End Bug 1677297
63:
64: if (c_gl_plcy_mst%ISOPEN) then
65: close c_gl_plcy_mst;
66: end if;
67:
68: open c_gl_plcy_mst(p_co_code);
69: fetch c_gl_plcy_mst into v_org_id;
64: if (c_gl_plcy_mst%ISOPEN) then
65: close c_gl_plcy_mst;
66: end if;
67:
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
65: close c_gl_plcy_mst;
66: end if;
67:
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;
66: end if;
67:
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;