APPS.M4R_3B2IN_PKG dependencies on M4R_3B2IN_PKG

Line 1: PACKAGE BODY M4R_3B2IN_PKG AS

1: PACKAGE BODY M4R_3B2IN_PKG AS
2: /* $Header: M4R3B2IB.pls 120.1 2005/11/03 05:36:28 amchaudh noship $ */
3:
4: l_debug_level NUMBER := to_number(nvl(fnd_profile.value('CLN_DEBUG_LEVEL'), '5'));
5:

Line 38: cln_debug_pub.Add('------ Entering M4R_3B2IN_PKG.RCV_TXN_INPROCESS ------');

34: l_count_num NUMBER;
35: x_ship_org_num NUMBER;
36: BEGIN
37: IF (l_Debug_Level <= 1) THEN
38: cln_debug_pub.Add('------ Entering M4R_3B2IN_PKG.RCV_TXN_INPROCESS ------');
39: cln_debug_pub.Add('Value of in Variables:');
40: cln_debug_pub.Add('p_document_line_num:' ||p_document_line_num, 1);
41: cln_debug_pub.Add('p_document_shipment_line_num:' ||p_document_shipment_line_num, 1);
42: cln_debug_pub.Add('p_release_num:' ||p_release_num, 1);

Line 170: cln_debug_pub.Add('------ Exiting M4R_3B2IN_PKG.RCV_TXN_INPROCESS ------');

166: cln_debug_pub.Add('p_ship_to_location_id:' ||p_ship_to_location_id, 1);
167: END IF;
168:
169: IF (l_Debug_Level <= 1) THEN
170: cln_debug_pub.Add('------ Exiting M4R_3B2IN_PKG.RCV_TXN_INPROCESS ------');
171: END IF;
172: EXCEPTION
173: WHEN OTHERS THEN
174: p_error_code := 1;

Line 177: p_error_message := 'Exception in M4R_3B2IN_PKG.RCV_TXN_INPROCESS ';

173: WHEN OTHERS THEN
174: p_error_code := 1;
175: p_vendor_id := 0;
176: p_vendor_site_id := 0;
177: p_error_message := 'Exception in M4R_3B2IN_PKG.RCV_TXN_INPROCESS ';
178: end RCV_TXN_INPROCESS;
179:
180:
181:

Line 217: cln_debug_pub.Add('----- Entering M4R_3B2IN_PKG.RCV_TXN_INPROCESS2-----');

213: l_count NUMBER;
214: x_ship_to_location_id NUMBER;
215: BEGIN
216: IF (l_Debug_Level <= 1) THEN
217: cln_debug_pub.Add('----- Entering M4R_3B2IN_PKG.RCV_TXN_INPROCESS2-----');
218: cln_debug_pub.Add('Value of in Variables:');
219: cln_debug_pub.Add('p_po_header_id:' ||p_po_header_id, 1);
220: cln_debug_pub.Add('p_line_num:' ||p_line_num, 1);
221: cln_debug_pub.Add('p_document_shipment_line_num:' ||p_document_shipment_line_num, 1);

Line 362: cln_debug_pub.Add('----- Exiting M4R_3B2IN_PKG.RCV_TXN_INPROCESS2-----');

358:
359: end if;
360:
361: IF (l_Debug_Level <= 1) THEN
362: cln_debug_pub.Add('----- Exiting M4R_3B2IN_PKG.RCV_TXN_INPROCESS2-----');
363: END IF;
364:
365: EXCEPTION
366: WHEN OTHERS THEN

Line 405: cln_debug_pub.Add('----- Entering M4R_3B2IN_PKG.GET_VALUES_HEADER -----');

401: x_ship_org_count NUMBER;
402: BEGIN
403:
404: IF (l_Debug_Level <= 1) THEN
405: cln_debug_pub.Add('----- Entering M4R_3B2IN_PKG.GET_VALUES_HEADER -----');
406: cln_debug_pub.Add('Value of in Variables:');
407: cln_debug_pub.Add('p_header_interface_id:' ||p_header_interface_id, 1);
408: END IF;
409:

Line 470: cln_debug_pub.Add('----- Exiting M4R_3B2IN_PKG.GET_VALUES_HEADER -----');

466: p_error_message := 'No matching Ship To Organization found';
467: end if;
468:
469: IF (l_Debug_Level <= 1) THEN
470: cln_debug_pub.Add('----- Exiting M4R_3B2IN_PKG.GET_VALUES_HEADER -----');
471: END IF;
472: EXCEPTION
473: WHEN OTHERS THEN
474: p_error_code := 3;

Line 479: END M4R_3B2IN_PKG;

475: p_error_message := 'Error in GET_VALUES_HEADER procedure for header_interface_id: ' || p_header_interface_id;
476: END GET_VALUES_HEADER;
477:
478:
479: END M4R_3B2IN_PKG;