DBA Data[Home] [Help]

APPS.POR_CONTRACTOR_NOTIFY dependencies on PO_WF_DEBUG_PKG

Line 40: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,

36: FROM PO_REQUISITION_HEADERS_ALL
37: WHERE REQUISITION_HEADER_ID = L_REQ_HEADER_ID;
38:
39: IF g_po_wf_debug = 'Y' THEN
40: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
41: g_module_prefix || 'SUPPLIER_NEED_NOTIFY' ||
42: 'L_CONTRACTOR_STATUS, L_SUPPLIER_NOTIFIED_FLAG: ' ||
43: L_CONTRACTOR_STATUS|| ',' || L_SUPPLIER_NOTIFIED_FLAG);
44: end if;

Line 57: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'SUPPLIER_NEED_NOTIFY' || sqlerrm);

53:
54: EXCEPTION
55: WHEN OTHERS THEN
56: IF g_po_wf_debug = 'Y' THEN
57: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'SUPPLIER_NEED_NOTIFY' || sqlerrm);
58: END IF;
59:
60: END SUPPLIER_NEED_NOTIFY;
61:

Line 133: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,

129: AND PLS.REQUISITION_SUPPLIER_ID = L_REQUISITION_SUPPLIER_ID
130: AND PORL.REQUISITION_HEADER_ID = PORH.REQUISITION_HEADER_ID;
131:
132: IF g_po_wf_debug = 'Y' THEN
133: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
134: g_module_prefix || 'SELECT_SUPPLIER_NOTIFY' ||
135: 'L_START_DATE, L_JOB_DESCRIPTION, L_REQUISITION_SUPPLIER_ID: ' ||
136: L_START_DATE || ',' || L_JOB_DESCRIPTION || ',' ||
137: L_REQUISITION_SUPPLIER_ID);

Line 183: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,

179:
180: PO_REQAPPROVAL_INIT1.LOCATE_NOTIFIER(L_REQUISITION_SUPPLIER_ID, 'RS', L_NOTIFIER);
181:
182: IF g_po_wf_debug = 'Y' THEN
183: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
184: g_module_prefix || 'SELECT_SUPPLIER_NOTIFY' || 'L_NOTIFIER: ' || L_NOTIFIER || ' L_REQUISITION_SUPPLIER_ID :' || L_REQUISITION_SUPPLIER_ID);
185: end if;
186:
187: IF (L_NOTIFIER IS NULL) THEN

Line 201: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,

197:
198: L_SUPPLIER_EXISTS := 'SUPPLIER_EMAIL_EXISTS';
199:
200: IF g_po_wf_debug = 'Y' THEN
201: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
202: g_module_prefix || 'SELECT_SUPPLIER_NOTIFY' || 'L_SUPPLIER_EXISTS: ' || L_SUPPLIER_EXISTS);
203: END IF;
204:
205: else

Line 210: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,

206:
207: L_SUPPLIER_EXISTS := 'SUPPLIER_EMAIL_NOT_AVAILABLE';
208:
209: IF g_po_wf_debug = 'Y' THEN
210: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
211: g_module_prefix || 'SELECT_SUPPLIER_NOTIFY' || 'L_SUPPLIER_EXISTS: ' || L_SUPPLIER_EXISTS);
212: END IF;
213:
214: SELECT PORL.LINE_NUM, POV.VENDOR_NAME

Line 224: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,

220: AND PLS.REQUISITION_SUPPLIER_ID = L_REQUISITION_SUPPLIER_ID
221: AND PLS.VENDOR_ID = POV.VENDOR_ID;
222:
223: IF g_po_wf_debug = 'Y' THEN
224: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
225: g_module_prefix || 'SELECT_SUPPLIER_NOTIFY L_LINE_NUM:L_VENDOR_NAME'
226: || L_LINE_NUM || ':' || L_VENDOR_NAME);
227: END IF;
228:

Line 255: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'SELECT_SUPPLIER_NOTIFY' || sqlerrm);

251:
252: EXCEPTION
253: WHEN OTHERS THEN
254: IF g_po_wf_debug = 'Y' THEN
255: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'SELECT_SUPPLIER_NOTIFY' || sqlerrm);
256: END IF;
257:
258: END SELECT_SUPPLIER_NOTIFY;
259:

Line 276: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,

272: (ITEMTYPE => ITEMTYPE,
273: ITEMKEY => ITEMKEY,
274: ANAME => 'REQUISITION_SUPPLIER_ID');
275: IF g_po_wf_debug = 'Y' THEN
276: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey,
277: g_module_prefix || 'UPDATE_NOTIFY_SUPPLIER' || 'L_REQUISITION_SUPPLIER_ID : ' || L_REQUISITION_SUPPLIER_ID);
278: end if;
279:
280: UPDATE PO_REQUISITION_SUPPLIERS

Line 289: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'UPDATE_NOTIFY_SUPPLIER' || sqlerrm);

285:
286: EXCEPTION
287: WHEN OTHERS THEN
288: IF g_po_wf_debug = 'Y' THEN
289: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'UPDATE_NOTIFY_SUPPLIER' || sqlerrm);
290: END IF;
291:
292: END UPDATE_NOTIFY_SUPPLIER;
293:

Line 319: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: L_REQ_SUPPLIER_ID:' || L_REQ_SUPPLIER_ID);

315:
316: BEGIN
317:
318: IF (G_PO_WF_DEBUG = 'Y') THEN
319: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: L_REQ_SUPPLIER_ID:' || L_REQ_SUPPLIER_ID);
320: END IF;
321:
322: BEGIN
323: IF (L_REQ_SUPPLIER_ID IS NOT NULL) THEN

Line 344: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: SUPPLIER SITE DOES NOT EXIST');

340:
341: EXCEPTION
342: WHEN NO_DATA_FOUND THEN
343: IF (G_PO_WF_DEBUG = 'Y') THEN
344: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: SUPPLIER SITE DOES NOT EXIST');
345: END IF;
346: RETURN NULL;
347: END;
348:

Line 350: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,' L_VENDOR_SITE_ID, L_VENDOR_CONTACT_ID, L_VENDOR_SITE_CODE, L_VENDOR_SITE_LANG:'

346: RETURN NULL;
347: END;
348:
349: IF (G_PO_WF_DEBUG = 'Y') THEN
350: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,' L_VENDOR_SITE_ID, L_VENDOR_CONTACT_ID, L_VENDOR_SITE_CODE, L_VENDOR_SITE_LANG:'
351: || L_VENDOR_SITE_ID || '*' || L_VENDOR_CONTACT_ID || '*' || L_VENDOR_SITE_CODE || '*' || L_VENDOR_SITE_LANG);
352: END IF;
353:
354: --GET EMAIL ADDRESS FROM SUPPLIER SITE

Line 366: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: L_EMAIL_ADDRESS FROM SUPPLIER SITE:' || L_EMAIL_ADDRESS || '*');

362: L_EMAIL_ADDRESS := NULL;
363: END;
364:
365: IF (G_PO_WF_DEBUG = 'Y') THEN
366: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: L_EMAIL_ADDRESS FROM SUPPLIER SITE:' || L_EMAIL_ADDRESS || '*');
367: END IF;
368:
369: --GET EMAIL ADDRESS FROM VENDOR CONTACTS
370: IF L_EMAIL_ADDRESS IS NULL AND L_VENDOR_CONTACT_ID IS NOT NULL THEN

Line 378: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: L_EMAIL_ADDRESS FROM VENDOR CONTACT:' || L_EMAIL_ADDRESS);

374: FROM PO_VENDOR_CONTACTS
375: WHERE VENDOR_CONTACT_ID = L_VENDOR_CONTACT_ID;
376:
377: IF (G_PO_WF_DEBUG = 'Y') THEN
378: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: L_EMAIL_ADDRESS FROM VENDOR CONTACT:' || L_EMAIL_ADDRESS);
379: END IF;
380:
381: EXCEPTION
382: WHEN NO_DATA_FOUND THEN

Line 389: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: L_EMAIL_ADDRESS IS NULL');

385: END IF;
386:
387: IF L_EMAIL_ADDRESS IS NULL THEN
388: IF (G_PO_WF_DEBUG = 'Y') THEN
389: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: L_EMAIL_ADDRESS IS NULL');
390: END IF;
391: RETURN NULL;
392: END IF;
393:

Line 437: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,X_PROGRESS);

433: END IF;
434:
435: X_PROGRESS := 'POR_CONTRACTOR_NOTIFY.GET_ADHOC_EMAIL_ROLE: 02';
436: IF (G_PO_WF_DEBUG = 'Y') THEN
437: PO_WF_DEBUG_PKG.INSERT_DEBUG(ITEMTYPE,ITEMKEY,X_PROGRESS);
438: END IF;
439:
440: RETURN L_EMAIL_PERFORMER;
441:

Line 445: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'GET_ADHOC_EMAIL_ROLE' || sqlerrm);

441:
442: EXCEPTION
443: WHEN OTHERS THEN
444: IF g_po_wf_debug = 'Y' THEN
445: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'GET_ADHOC_EMAIL_ROLE' || sqlerrm);
446: END IF;
447:
448: END GET_ADHOC_EMAIL_ROLE;
449:

Line 480: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'SET_REQSINPOOL_FLAG' || sqlerrm);

476:
477: EXCEPTION
478: WHEN OTHERS THEN
479: IF g_po_wf_debug = 'Y' THEN
480: PO_WF_DEBUG_PKG.insert_debug(itemtype, itemkey, g_module_prefix || 'SET_REQSINPOOL_FLAG' || sqlerrm);
481: END IF;
482:
483: END SET_REQSINPOOL_FLAG;
484: