DBA Data[Home] [Help]

APPS.CLN_UPDTDLVY_PKG dependencies on CLN_DEBUG_PUB

Line 60: cln_debug_pub.Add('ENTERING CLN_UPDTDLVY_PKG.Get_UpdateDelivery_Params', 1);

56: -- set debug level
57: l_debug_level := to_number(nvl(fnd_profile.value('CLN_DEBUG_LEVEL'), '5'));
58:
59: if (l_debug_level <= 1) then
60: cln_debug_pub.Add('ENTERING CLN_UPDTDLVY_PKG.Get_UpdateDelivery_Params', 1);
61: cln_debug_pub.Add('With the following parameters:', 1);
62: cln_debug_pub.Add('itemtype:' || itemtype, 1);
63: cln_debug_pub.Add('itemkey:' || itemkey, 1);
64: cln_debug_pub.Add('actid:' || actid, 1);

Line 61: cln_debug_pub.Add('With the following parameters:', 1);

57: l_debug_level := to_number(nvl(fnd_profile.value('CLN_DEBUG_LEVEL'), '5'));
58:
59: if (l_debug_level <= 1) then
60: cln_debug_pub.Add('ENTERING CLN_UPDTDLVY_PKG.Get_UpdateDelivery_Params', 1);
61: cln_debug_pub.Add('With the following parameters:', 1);
62: cln_debug_pub.Add('itemtype:' || itemtype, 1);
63: cln_debug_pub.Add('itemkey:' || itemkey, 1);
64: cln_debug_pub.Add('actid:' || actid, 1);
65: cln_debug_pub.Add('funcmode:' || funcmode, 1);

Line 62: cln_debug_pub.Add('itemtype:' || itemtype, 1);

58:
59: if (l_debug_level <= 1) then
60: cln_debug_pub.Add('ENTERING CLN_UPDTDLVY_PKG.Get_UpdateDelivery_Params', 1);
61: cln_debug_pub.Add('With the following parameters:', 1);
62: cln_debug_pub.Add('itemtype:' || itemtype, 1);
63: cln_debug_pub.Add('itemkey:' || itemkey, 1);
64: cln_debug_pub.Add('actid:' || actid, 1);
65: cln_debug_pub.Add('funcmode:' || funcmode, 1);
66: cln_debug_pub.Add('resultout:' || resultout, 1);

Line 63: cln_debug_pub.Add('itemkey:' || itemkey, 1);

59: if (l_debug_level <= 1) then
60: cln_debug_pub.Add('ENTERING CLN_UPDTDLVY_PKG.Get_UpdateDelivery_Params', 1);
61: cln_debug_pub.Add('With the following parameters:', 1);
62: cln_debug_pub.Add('itemtype:' || itemtype, 1);
63: cln_debug_pub.Add('itemkey:' || itemkey, 1);
64: cln_debug_pub.Add('actid:' || actid, 1);
65: cln_debug_pub.Add('funcmode:' || funcmode, 1);
66: cln_debug_pub.Add('resultout:' || resultout, 1);
67: end if;

Line 64: cln_debug_pub.Add('actid:' || actid, 1);

60: cln_debug_pub.Add('ENTERING CLN_UPDTDLVY_PKG.Get_UpdateDelivery_Params', 1);
61: cln_debug_pub.Add('With the following parameters:', 1);
62: cln_debug_pub.Add('itemtype:' || itemtype, 1);
63: cln_debug_pub.Add('itemkey:' || itemkey, 1);
64: cln_debug_pub.Add('actid:' || actid, 1);
65: cln_debug_pub.Add('funcmode:' || funcmode, 1);
66: cln_debug_pub.Add('resultout:' || resultout, 1);
67: end if;
68:

Line 65: cln_debug_pub.Add('funcmode:' || funcmode, 1);

61: cln_debug_pub.Add('With the following parameters:', 1);
62: cln_debug_pub.Add('itemtype:' || itemtype, 1);
63: cln_debug_pub.Add('itemkey:' || itemkey, 1);
64: cln_debug_pub.Add('actid:' || actid, 1);
65: cln_debug_pub.Add('funcmode:' || funcmode, 1);
66: cln_debug_pub.Add('resultout:' || resultout, 1);
67: end if;
68:
69: -- initialize parameters

Line 66: cln_debug_pub.Add('resultout:' || resultout, 1);

62: cln_debug_pub.Add('itemtype:' || itemtype, 1);
63: cln_debug_pub.Add('itemkey:' || itemkey, 1);
64: cln_debug_pub.Add('actid:' || actid, 1);
65: cln_debug_pub.Add('funcmode:' || funcmode, 1);
66: cln_debug_pub.Add('resultout:' || resultout, 1);
67: end if;
68:
69: -- initialize parameters
70: x_progress := '000';

Line 80: cln_debug_pub.Add('Failure point ' || x_progress, 1);

76: result := FALSE;
77:
78: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event: Parameters Initialized';
79: if (l_debug_level <= 1) then
80: cln_debug_pub.Add('Failure point ' || x_progress, 1);
81: end if;
82:
83: -- Do nothing in cancel or timeout mode
84: if (funcmode <> wf_engine.eng_run) then

Line 108: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event: Parameter Lookups Completed', 1);

104: into l_organization_id
105: from dual;
106:
107: if (l_debug_level <= 1) then
108: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event: Parameter Lookups Completed', 1);
109: cln_debug_pub.Add('With the following parameters:', 1);
110: cln_debug_pub.Add('p_shipment_header_id:' || p_shipment_header_id, 1);
111: cln_debug_pub.Add('party_id:' || party_id, 1);
112: cln_debug_pub.Add('party_site_id:' || party_site_id, 1);

Line 109: cln_debug_pub.Add('With the following parameters:', 1);

105: from dual;
106:
107: if (l_debug_level <= 1) then
108: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event: Parameter Lookups Completed', 1);
109: cln_debug_pub.Add('With the following parameters:', 1);
110: cln_debug_pub.Add('p_shipment_header_id:' || p_shipment_header_id, 1);
111: cln_debug_pub.Add('party_id:' || party_id, 1);
112: cln_debug_pub.Add('party_site_id:' || party_site_id, 1);
113: cln_debug_pub.Add('l_organization_id:' || l_organization_id, 1);

Line 110: cln_debug_pub.Add('p_shipment_header_id:' || p_shipment_header_id, 1);

106:
107: if (l_debug_level <= 1) then
108: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event: Parameter Lookups Completed', 1);
109: cln_debug_pub.Add('With the following parameters:', 1);
110: cln_debug_pub.Add('p_shipment_header_id:' || p_shipment_header_id, 1);
111: cln_debug_pub.Add('party_id:' || party_id, 1);
112: cln_debug_pub.Add('party_site_id:' || party_site_id, 1);
113: cln_debug_pub.Add('l_organization_id:' || l_organization_id, 1);
114: end if;

Line 111: cln_debug_pub.Add('party_id:' || party_id, 1);

107: if (l_debug_level <= 1) then
108: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event: Parameter Lookups Completed', 1);
109: cln_debug_pub.Add('With the following parameters:', 1);
110: cln_debug_pub.Add('p_shipment_header_id:' || p_shipment_header_id, 1);
111: cln_debug_pub.Add('party_id:' || party_id, 1);
112: cln_debug_pub.Add('party_site_id:' || party_site_id, 1);
113: cln_debug_pub.Add('l_organization_id:' || l_organization_id, 1);
114: end if;
115:

Line 112: cln_debug_pub.Add('party_site_id:' || party_site_id, 1);

108: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event: Parameter Lookups Completed', 1);
109: cln_debug_pub.Add('With the following parameters:', 1);
110: cln_debug_pub.Add('p_shipment_header_id:' || p_shipment_header_id, 1);
111: cln_debug_pub.Add('party_id:' || party_id, 1);
112: cln_debug_pub.Add('party_site_id:' || party_site_id, 1);
113: cln_debug_pub.Add('l_organization_id:' || l_organization_id, 1);
114: end if;
115:
116: -- XML Setup Check

Line 113: cln_debug_pub.Add('l_organization_id:' || l_organization_id, 1);

109: cln_debug_pub.Add('With the following parameters:', 1);
110: cln_debug_pub.Add('p_shipment_header_id:' || p_shipment_header_id, 1);
111: cln_debug_pub.Add('party_id:' || party_id, 1);
112: cln_debug_pub.Add('party_site_id:' || party_site_id, 1);
113: cln_debug_pub.Add('l_organization_id:' || l_organization_id, 1);
114: end if;
115:
116: -- XML Setup Check
117: ecx_document.isDeliveryRequired(

Line 128: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : XML Trading Partner Setup Check Done', 1);

124: retcode => return_code,
125: errmsg => errmsg);
126:
127: if (l_debug_level <= 1) then
128: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : XML Trading Partner Setup Check Done', 1);
129: cln_debug_pub.Add('With the following OUT parameters:', 1);
130: cln_debug_pub.Add('retcode:' || return_code, 1);
131: cln_debug_pub.Add('errmsg:' || errmsg, 1);
132: end if;

Line 129: cln_debug_pub.Add('With the following OUT parameters:', 1);

125: errmsg => errmsg);
126:
127: if (l_debug_level <= 1) then
128: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : XML Trading Partner Setup Check Done', 1);
129: cln_debug_pub.Add('With the following OUT parameters:', 1);
130: cln_debug_pub.Add('retcode:' || return_code, 1);
131: cln_debug_pub.Add('errmsg:' || errmsg, 1);
132: end if;
133:

Line 130: cln_debug_pub.Add('retcode:' || return_code, 1);

126:
127: if (l_debug_level <= 1) then
128: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : XML Trading Partner Setup Check Done', 1);
129: cln_debug_pub.Add('With the following OUT parameters:', 1);
130: cln_debug_pub.Add('retcode:' || return_code, 1);
131: cln_debug_pub.Add('errmsg:' || errmsg, 1);
132: end if;
133:
134: -- Decision on action depending on XML Setup Check

Line 131: cln_debug_pub.Add('errmsg:' || errmsg, 1);

127: if (l_debug_level <= 1) then
128: cln_debug_pub.Add('CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : XML Trading Partner Setup Check Done', 1);
129: cln_debug_pub.Add('With the following OUT parameters:', 1);
130: cln_debug_pub.Add('retcode:' || return_code, 1);
131: cln_debug_pub.Add('errmsg:' || errmsg, 1);
132: end if;
133:
134: -- Decision on action depending on XML Setup Check
135: if NOT(result) then

Line 139: cln_debug_pub.Add('Failure point ' || x_progress, 1);

135: if NOT(result) then
136:
137: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : XML Trading Partner Setup Check Failed';
138: if (l_debug_level <= 1) then
139: cln_debug_pub.Add('Failure point ' || x_progress, 1);
140: end if;
141:
142: resultout := 'FAIL';
143: else

Line 147: cln_debug_pub.Add('Failure point ' || x_progress, 1);

143: else
144:
145: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : XML Trading Partner Setup Check Succeeded';
146: if (l_debug_level <= 1) then
147: cln_debug_pub.Add('Failure point ' || x_progress, 1);
148: end if;
149:
150: SELECT h.receipt_num INTO l_receipt_id FROM rcv_shipment_headers h
151: WHERE h.shipment_header_id = p_shipment_header_id;

Line 164: cln_debug_pub.Add('Failure point ' || x_progress, 1);

160: l_canonical_date := FND_DATE.DATE_TO_CANONICAL(l_date);
161:
162: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : Created reference ID, unique key, and canonical date';
163: if (l_debug_level <= 1) then
164: cln_debug_pub.Add('Failure point ' || x_progress, 1);
165: end if;
166:
167: -- pass parameters back to main itemtype attributes
168: wf_engine.SetItemAttrText(itemtype, itemkey, 'XMLG_INTERNAL_TXN_TYPE', transaction_type);

Line 189: cln_debug_pub.Add('EXITING CLN_UPDTDLVY_PKG.Raise_UpdateDelivery_Event Successfully', 1);

185: wf_engine.SetItemAttrText(itemtype, itemkey, 'DOCUMENT_CREATION_DATE', l_canonical_date);
186:
187: -- Reached Here. Successful execution.
188: if (l_debug_level <= 1) then
189: cln_debug_pub.Add('EXITING CLN_UPDTDLVY_PKG.Raise_UpdateDelivery_Event Successfully', 1);
190: end if;
191:
192: resultout := 'SUCCESS';
193: end if;

Line 199: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);

195: WHEN OTHERS THEN
196: l_error_code := SQLCODE;
197: l_error_msg := SQLERRM;
198: if (l_debug_level <= 1) then
199: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);
200: end if;
201:
202: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : Error';
203: if (l_debug_level <= 1) then

Line 204: cln_debug_pub.Add('Failure point ' || x_progress, 1);

200: end if;
201:
202: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : Error';
203: if (l_debug_level <= 1) then
204: cln_debug_pub.Add('Failure point ' || x_progress, 1);
205: end if;
206:
207: resultout := 'ERROR:' || l_error_msg;
208: END Get_Updatedelivery_Params;

Line 236: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);

232: WHEN OTHERS THEN
233: l_error_code := SQLCODE;
234: l_error_msg := SQLERRM;
235: if (l_debug_level <= 1) then
236: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);
237: end if;
238: END getReceiptNum;
239:
240:

Line 281: cln_debug_pub.Add('Entering CLN_UPDTDLVY_PKG.Process_Update_Delivery', 1);

277: l_second_cln_parameter_list := wf_parameter_list_t();
278: message_text := 'CLN_UPDL_MESSAGE_RCVD';
279:
280: if (l_debug_level <= 2) then
281: cln_debug_pub.Add('Entering CLN_UPDTDLVY_PKG.Process_Update_Delivery', 1);
282: end if;
283: if (l_debug_level <= 1) then
284: cln_debug_pub.Add('With the parameters', 1);
285: cln_debug_pub.Add('p_receipt_id : ' || p_receipt_id, 1);

Line 284: cln_debug_pub.Add('With the parameters', 1);

280: if (l_debug_level <= 2) then
281: cln_debug_pub.Add('Entering CLN_UPDTDLVY_PKG.Process_Update_Delivery', 1);
282: end if;
283: if (l_debug_level <= 1) then
284: cln_debug_pub.Add('With the parameters', 1);
285: cln_debug_pub.Add('p_receipt_id : ' || p_receipt_id, 1);
286: cln_debug_pub.Add('p_int_cnt_num : ' || p_int_cnt_num, 1);
287: cln_debug_pub.Add('p_delivery_num : ' || p_delivery_num, 1);
288: end if;

Line 285: cln_debug_pub.Add('p_receipt_id : ' || p_receipt_id, 1);

281: cln_debug_pub.Add('Entering CLN_UPDTDLVY_PKG.Process_Update_Delivery', 1);
282: end if;
283: if (l_debug_level <= 1) then
284: cln_debug_pub.Add('With the parameters', 1);
285: cln_debug_pub.Add('p_receipt_id : ' || p_receipt_id, 1);
286: cln_debug_pub.Add('p_int_cnt_num : ' || p_int_cnt_num, 1);
287: cln_debug_pub.Add('p_delivery_num : ' || p_delivery_num, 1);
288: end if;
289:

Line 286: cln_debug_pub.Add('p_int_cnt_num : ' || p_int_cnt_num, 1);

282: end if;
283: if (l_debug_level <= 1) then
284: cln_debug_pub.Add('With the parameters', 1);
285: cln_debug_pub.Add('p_receipt_id : ' || p_receipt_id, 1);
286: cln_debug_pub.Add('p_int_cnt_num : ' || p_int_cnt_num, 1);
287: cln_debug_pub.Add('p_delivery_num : ' || p_delivery_num, 1);
288: end if;
289:
290:

Line 287: cln_debug_pub.Add('p_delivery_num : ' || p_delivery_num, 1);

283: if (l_debug_level <= 1) then
284: cln_debug_pub.Add('With the parameters', 1);
285: cln_debug_pub.Add('p_receipt_id : ' || p_receipt_id, 1);
286: cln_debug_pub.Add('p_int_cnt_num : ' || p_int_cnt_num, 1);
287: cln_debug_pub.Add('p_delivery_num : ' || p_delivery_num, 1);
288: end if;
289:
290:
291: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event: 01';

Line 293: cln_debug_pub.Add('Failure point ' || x_progress, 1);

289:
290:
291: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event: 01';
292: if (l_debug_level <= 1) then
293: cln_debug_pub.Add('Failure point ' || x_progress, 1);
294: end if;
295:
296: -- create unique key
297: SELECT CLN_UPDTDLVY_S.nextval into l_updtdlvy_seq from dual;

Line 305: cln_debug_pub.Add('Failure point ' || x_progress, 1);

301: l_canonical_date := FND_DATE.DATE_TO_CANONICAL(l_date);
302:
303: x_progress := 'CLN_SYNCCTLG_PKG.Showship_Raise_Event : 02';
304: if (l_debug_level <= 1) then
305: cln_debug_pub.Add('Failure point ' || x_progress, 1);
306: end if;
307:
308: -- add parameters to list for update collaboration event
309: wf_event.AddParameterToList(p_name => 'XMLG_INTERNAL_CONTROL_NUMBER',

Line 327: cln_debug_pub.Add('Failure point ' || x_progress, 1);

323: p_parameterlist => l_update_cln_parameter_list);
324:
325: x_progress := 'CLN_SYNCCTLG_PKG.Process_Update_Delivery : 03';
326: if (l_debug_level <= 1) then
327: cln_debug_pub.Add('Failure point ' || x_progress, 1);
328: end if;
329:
330: -- raise update collaboration event
331: wf_event.raise(p_event_name => l_update_cln_event,

Line 342: cln_debug_pub.Add('About to validate the delivery number with shipping tables : '||p_delivery_num, 1);

338: /* Bug : 3529009
339: Desc : Delivery number should be validated*/
340:
341: IF (l_debug_level <= 1) THEN
342: cln_debug_pub.Add('About to validate the delivery number with shipping tables : '||p_delivery_num, 1);
343: END IF;
344:
345: b_is_valid_delivery_num := true;
346: BEGIN

Line 355: cln_debug_pub.Add('Delivery number not found in wsh_new_deliveries', 1);

351: EXCEPTION
352: WHEN NO_DATA_FOUND THEN
353: -- Invalid delivery number
354: IF (l_debug_level <= 1) THEN
355: cln_debug_pub.Add('Delivery number not found in wsh_new_deliveries', 1);
356: END IF;
357: b_is_valid_delivery_num := false;
358: END;
359:

Line 361: cln_debug_pub.Add('About to set parameters to raise the matching delivery event', 1);

357: b_is_valid_delivery_num := false;
358: END;
359:
360: IF (l_debug_level <= 1) THEN
361: cln_debug_pub.Add('About to set parameters to raise the matching delivery event', 1);
362: END IF;
363: -- Raise the event to update collaboraiton history, with matching delivery info
364: wf_event.AddParameterToList(p_name => 'XMLG_INTERNAL_CONTROL_NUMBER',
365: p_value => p_int_cnt_num,

Line 392: cln_debug_pub.Add('About to raise the matching delivery event', 1);

388: p_parameterlist => l_second_cln_parameter_list);
389: END IF;
390:
391: if (l_debug_level <= 1) then
392: cln_debug_pub.Add('About to raise the matching delivery event', 1);
393: end if;
394:
395: -- raise update collaboration event
396: wf_event.raise(p_event_name => l_update_cln_event,

Line 403: cln_debug_pub.Add('Failure point ' || x_progress, 1);

399:
400: /* END Bug : 3529009 */
401:
402: if (l_debug_level <= 1) then
403: cln_debug_pub.Add('Failure point ' || x_progress, 1);
404: end if;
405: EXCEPTION
406: WHEN OTHERS THEN
407: l_error_code := SQLCODE;

Line 410: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);

406: WHEN OTHERS THEN
407: l_error_code := SQLCODE;
408: l_error_msg := SQLERRM;
409: if (l_debug_level <= 1) then
410: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);
411: end if;
412:
413: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : 05';
414: if (l_debug_level <= 1) then

Line 415: cln_debug_pub.Add('Failure point ' || x_progress, 1);

411: end if;
412:
413: x_progress := 'CLN_UPDTDLVY_PKG.Raise_Updatedelivery_Event : 05';
414: if (l_debug_level <= 1) then
415: cln_debug_pub.Add('Failure point ' || x_progress, 1);
416: end if;
417:
418: END Process_Update_Delivery;
419:

Line 446: cln_debug_pub.Add('ENTERING GET_FROM_ROLE_ORG_ID', 1);

442: l_debug_level := to_number(nvl(fnd_profile.value('CLN_DEBUG_LEVEL'), '5'));
443: l_org_id := 0;
444:
445: if (l_debug_level <= 1) then
446: cln_debug_pub.Add('ENTERING GET_FROM_ROLE_ORG_ID', 1);
447: cln_debug_pub.Add('With the following parameters:', 1);
448: cln_debug_pub.Add('P_SHIPMENT_HEADER_ID:' || P_SHIPMENT_HEADER_ID, 1);
449: end if;
450:

Line 447: cln_debug_pub.Add('With the following parameters:', 1);

443: l_org_id := 0;
444:
445: if (l_debug_level <= 1) then
446: cln_debug_pub.Add('ENTERING GET_FROM_ROLE_ORG_ID', 1);
447: cln_debug_pub.Add('With the following parameters:', 1);
448: cln_debug_pub.Add('P_SHIPMENT_HEADER_ID:' || P_SHIPMENT_HEADER_ID, 1);
449: end if;
450:
451: SELECT o.organization_id

Line 448: cln_debug_pub.Add('P_SHIPMENT_HEADER_ID:' || P_SHIPMENT_HEADER_ID, 1);

444:
445: if (l_debug_level <= 1) then
446: cln_debug_pub.Add('ENTERING GET_FROM_ROLE_ORG_ID', 1);
447: cln_debug_pub.Add('With the following parameters:', 1);
448: cln_debug_pub.Add('P_SHIPMENT_HEADER_ID:' || P_SHIPMENT_HEADER_ID, 1);
449: end if;
450:
451: SELECT o.organization_id
452: INTO l_org_id

Line 462: cln_debug_pub.Add('l_org_id:' || l_org_id, 1);

458: AND o.organization_id (+) =NVL( h.organization_id,h.ship_to_org_id)
459: AND h.shipment_header_id = P_SHIPMENT_HEADER_ID;
460:
461: if (l_debug_level <= 1) then
462: cln_debug_pub.Add('l_org_id:' || l_org_id, 1);
463: cln_debug_pub.Add('EXITING GET_FROM_ROLE_ORG_ID', 1);
464: end if;
465:
466: RETURN l_org_id;

Line 463: cln_debug_pub.Add('EXITING GET_FROM_ROLE_ORG_ID', 1);

459: AND h.shipment_header_id = P_SHIPMENT_HEADER_ID;
460:
461: if (l_debug_level <= 1) then
462: cln_debug_pub.Add('l_org_id:' || l_org_id, 1);
463: cln_debug_pub.Add('EXITING GET_FROM_ROLE_ORG_ID', 1);
464: end if;
465:
466: RETURN l_org_id;
467: EXCEPTION

Line 472: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);

468: WHEN OTHERS THEN
469: l_error_code := SQLCODE;
470: l_error_msg := SQLERRM;
471: if (l_debug_level <= 1) then
472: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);
473: end if;
474:
475: RETURN l_org_id;
476: END GET_FROM_ROLE_ORG_ID;