DBA Data[Home] [Help]

APPS.AP_XML_INVOICE_INBOUND_PKG dependencies on AP_XML_INVOICE_INBOUND_PKG

Line 1: PACKAGE BODY AP_XML_INVOICE_INBOUND_PKG as

1: PACKAGE BODY AP_XML_INVOICE_INBOUND_PKG as
2: /* $Header: apxmlinb.pls 120.2.12010000.2 2009/10/13 22:23:14 gagrawal ship $ */
3:
4: function get_token_display_field(p_lookup_code in VARCHAR2) return VARCHAR2 as
5:

Line 30: 'AP_XML_INVOICE_INBOUND_PKG.correct_freight_line(+)');

26: procedure correct_freight_line(p_invoice_id in NUMBER) as
27:
28: begin
29: ap_debug_pkg.print('Y',
30: 'AP_XML_INVOICE_INBOUND_PKG.correct_freight_line(+)');
31:
32: update ap_invoice_lines_interface
33: set DIST_CODE_COMBINATION_ID =
34: (select FREIGHT_CODE_COMBINATION_ID

Line 41: 'AP_XML_INVOICE_INBOUND_PKG.correct_freight)lihe(-)');

37: where line_type_lookup_code = 'FREIGHT' and
38: invoice_id = p_invoice_id;
39:
40: ap_debug_pkg.print('Y',
41: 'AP_XML_INVOICE_INBOUND_PKG.correct_freight)lihe(-)');
42: end;
43:
44:
45: /*===========================================================================+

Line 77: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.change_case(+)');

73: p_out_string out NOCOPY VARCHAR2,
74: p_direction in VARCHAR2 default 'U') as
75:
76: begin
77: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.change_case(+)');
78:
79: if p_direction = 'U' then
80: p_out_string := upper(p_in_string);
81: elsif p_direction = 'L' then

Line 87: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.change_case(-)');

83: else
84: null;
85: end if;
86:
87: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.change_case(-)');
88: end;
89:
90: /*===========================================================================+
91: | PROCEDURE |

Line 101: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_org_id(+)');

97: procedure derive_org_id(p_po_number in VARCHAR2 default NULL,
98: p_org_id out NOCOPY NUMBER) as
99: l_org_id NUMBER;
100: begin
101: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_org_id(+)');
102: begin
103: select distinct org_id into l_org_id
104: from po_headers_all
105: where segment1 = p_po_number;

Line 109: 'AP_XML_INVOICE_INBOUND_PKG.derive_org_id(EXCEPTION)');

105: where segment1 = p_po_number;
106: exception
107: when others then
108: ap_debug_pkg.print('Y',
109: 'AP_XML_INVOICE_INBOUND_PKG.derive_org_id(EXCEPTION)');
110: l_org_id := NULL;
111: end;
112: p_org_id := l_org_id;
113: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_org_id(-)');

Line 113: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_org_id(-)');

109: 'AP_XML_INVOICE_INBOUND_PKG.derive_org_id(EXCEPTION)');
110: l_org_id := NULL;
111: end;
112: p_org_id := l_org_id;
113: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_org_id(-)');
114: end;
115:
116: /*===========================================================================+
117: | PROCEDURE |

Line 127: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(+)');

123: procedure derive_vendor_id(p_vendor_site_id in NUMBER,
124: p_org_id in NUMBER,
125: p_vendor_id out NOCOPY NUMBER) as
126: begin
127: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(+)');
128: select vendor_id into p_vendor_id
129: from po_vendor_sites_all
130: where org_id = p_org_id and vendor_site_id = p_vendor_site_id;
131: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(-)');

Line 131: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(-)');

127: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(+)');
128: select vendor_id into p_vendor_id
129: from po_vendor_sites_all
130: where org_id = p_org_id and vendor_site_id = p_vendor_site_id;
131: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(-)');
132: exception
133: when others then
134: ap_debug_pkg.print('Y',
135: 'AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(EXCEPTION)');

Line 135: 'AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(EXCEPTION)');

131: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(-)');
132: exception
133: when others then
134: ap_debug_pkg.print('Y',
135: 'AP_XML_INVOICE_INBOUND_PKG.derive_vendor_id(EXCEPTION)');
136: p_vendor_id := NULL;
137: end;
138: /*===========================================================================+
139: | PROCEDURE |

Line 155: 'AP_XML_INVOICE_INBOUND_PKG.derive_email_address(+)');

151:
152:
153: begin
154: ap_debug_pkg.print('Y',
155: 'AP_XML_INVOICE_INBOUND_PKG.derive_email_address(+)');
156:
157: /* Bug 2079388
158: Replace the sql below with dynamic sql to prevent dependency on XML
159: datamodel in some cases. Details mentioned in the bug

Line 168: 'AP_XML_INVOICE_INBOUND_PKG.derive_email_address(-)');

164: where party_type = 'S' and
165: party_site_id = p_vendor_site_id and
166: party_id = p_vendor_id;
167: ap_debug_pkg.print('Y',
168: 'AP_XML_INVOICE_INBOUND_PKG.derive_email_address(-)');
169:
170: */
171: l_statement :=
172: 'SELECT company_admin_email INTO :tab FROM ecx_tp_headers

Line 186: 'AP_XML_INVOICE_INBOUND_PKG.derive_email_address(EXCEPTION)');

182:
183: exception
184: when others then
185: ap_debug_pkg.print('Y',
186: 'AP_XML_INVOICE_INBOUND_PKG.derive_email_address(EXCEPTION)');
187: p_email_address := NULL;
188: end;
189:
190: /*===========================================================================+

Line 214: 'AP_XML_INVOICE_INBOUND_PKG.start_open_interface(+)');

210: h.vendor_name is NOT NULL;
211:
212: begin
213: ap_debug_pkg.print('Y',
214: 'AP_XML_INVOICE_INBOUND_PKG.start_open_interface(+)');
215:
216: open inv_csr;
217: fetch inv_csr bulk collect into l_inv_ids, l_vendor_ids;
218: close inv_csr;

Line 253: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.start_open_interface(-)');

249: sub_request=>FALSE,
250: argument1=>'XML GATEWAY');
251: arp_util_tax.debug('Request_id:'||l_request_id);
252: */
253: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.start_open_interface(-)');
254: end;
255:
256:
257: procedure send_email(p_mail_subject in VARCHAR2,

Line 266: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.send_email(+)');

262: l_display_role_name VARCHAR2(100);
263: l_item_key VARCHAR2(100);
264:
265: begin
266: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.send_email(+)');
267: arp_util_tax.debug('Creating adhoc role(+)');
268: l_role := null;
269: l_display_role_name := null;
270: WF_DIRECTORY.createAdhocRole(role_name => l_role,

Line 312: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.send_email(-)');

308: --
309: ap_debug_pkg.print('Y','Starting the process(+)');
310: WF_ENGINE.startProcess('P2P', l_item_key);
311: ap_debug_pkg.print('Y','Starting the process(-)');
312: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.send_email(-)');
313:
314: commit;
315: end;
316:

Line 509: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.notify_supplier(+)');

505: l_call_3c4_invoice_id ap_invoices_interface.invoice_id%TYPE;
506: -- Bug 4065112 ends
507:
508: begin
509: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.notify_supplier(+)');
510: ap_debug_pkg.print('Y','request_id: '||to_char(p_request_id));
511: --
512: open l_invoice_number_csr;
513: fetch l_invoice_number_csr into l_invoice_number;

Line 742: 'AP_XML_INVOICE_INBOUND_PKG.notify_supplier');

738: to_char(nvl(l_invoice_line_id_table.last,0)));
739: l_result := ap_utilities_pkg.delete_invoice_from_interface(
740: l_invoice_id_table,
741: l_invoice_line_id_table,
742: 'AP_XML_INVOICE_INBOUND_PKG.notify_supplier');
743: ap_debug_pkg.print('Y','Deleting from the interfaces(-)');
744: --
745: --
746: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.notify_supplier(-)');

Line 746: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.notify_supplier(-)');

742: 'AP_XML_INVOICE_INBOUND_PKG.notify_supplier');
743: ap_debug_pkg.print('Y','Deleting from the interfaces(-)');
744: --
745: --
746: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.notify_supplier(-)');
747: end;
748:
749: /*===========================================================================+
750: | PROCEDURE |

Line 778: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.notify_recipient(+)');

774: l_requests varchar2(3000);
775: l_email_address varchar2(200);
776:
777: begin
778: ap_debug_pkg.print('Y','AP_XML_INVOICE_INBOUND_PKG.notify_recipient(+)');
779: fnd_profile.get('AP_NOTIFICATION_EMAIL', l_email_address);
780: ap_debug_pkg.print('Y','email address: '||l_email_address);
781:
782: open parent_req;

Line 811: ap_debug_pkg.print('Y','ap_xml_invoice_inbound_pkg.notify_recipient(-)');

807: ap_debug_pkg.print('Y','sending email -');
808: end if;
809:
810: p_return_code := '0';
811: ap_debug_pkg.print('Y','ap_xml_invoice_inbound_pkg.notify_recipient(-)');
812: exception
813: when others then
814: ap_debug_pkg.print('Y',
815: 'ap_xml_invoice_inbound_pkg.notify_recipient EXCEPTION(-)');

Line 815: 'ap_xml_invoice_inbound_pkg.notify_recipient EXCEPTION(-)');

811: ap_debug_pkg.print('Y','ap_xml_invoice_inbound_pkg.notify_recipient(-)');
812: exception
813: when others then
814: ap_debug_pkg.print('Y',
815: 'ap_xml_invoice_inbound_pkg.notify_recipient EXCEPTION(-)');
816: p_return_code := '2';
817:
818: end notify_recipient;
819:

Line 909: 'AP_XML_INVOICE_INBOUND_PKG.correct_charge_ccid(+)');

905: AND SOURCE = 'XML GATEWAY';
906:
907: begin
908: ap_debug_pkg.print('Y',
909: 'AP_XML_INVOICE_INBOUND_PKG.correct_charge_ccid(+)');
910:
911: open org_csr;
912: loop
913: fetch org_csr into l_org_id;

Line 960: 'AP_XML_INVOICE_INBOUND_PKG.correct_charge_ccid(-)');

956: end loop; -- finish looping through org_id
957: close org_csr;
958:
959: ap_debug_pkg.print('Y',
960: 'AP_XML_INVOICE_INBOUND_PKG.correct_charge_ccid(-)');
961: end correct_charge_ccid;
962:
963: /*===========================================================================+
964: | PROCEDURE |

Line 978: END AP_XML_INVOICE_INBOUND_PKG;

974: set_taxable_flag(p_group_id);
975: end after_map;
976:
977:
978: END AP_XML_INVOICE_INBOUND_PKG;