71:
72: BEGIN
73:
74: d_progress := 0;
75: IF (PO_LOG.d_proc) THEN
76: PO_LOG.proc_begin(d_module);
77: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
78: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
79: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
72: BEGIN
73:
74: d_progress := 0;
75: IF (PO_LOG.d_proc) THEN
76: PO_LOG.proc_begin(d_module);
77: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
78: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
79: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
80: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
73:
74: d_progress := 0;
75: IF (PO_LOG.d_proc) THEN
76: PO_LOG.proc_begin(d_module);
77: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
78: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
79: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
80: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
81: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.new_document_status', p_action_ctl_rec.new_document_status);
74: d_progress := 0;
75: IF (PO_LOG.d_proc) THEN
76: PO_LOG.proc_begin(d_module);
77: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
78: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
79: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
80: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
81: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.new_document_status', p_action_ctl_rec.new_document_status);
82: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.employee_id', p_action_ctl_rec.employee_id);
75: IF (PO_LOG.d_proc) THEN
76: PO_LOG.proc_begin(d_module);
77: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
78: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
79: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
80: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
81: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.new_document_status', p_action_ctl_rec.new_document_status);
82: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.employee_id', p_action_ctl_rec.employee_id);
83: END IF;
76: PO_LOG.proc_begin(d_module);
77: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
78: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
79: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
80: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
81: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.new_document_status', p_action_ctl_rec.new_document_status);
82: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.employee_id', p_action_ctl_rec.employee_id);
83: END IF;
84:
77: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
78: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
79: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
80: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
81: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.new_document_status', p_action_ctl_rec.new_document_status);
82: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.employee_id', p_action_ctl_rec.employee_id);
83: END IF;
84:
85: d_progress := 10;
78: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
79: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
80: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
81: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.new_document_status', p_action_ctl_rec.new_document_status);
82: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.employee_id', p_action_ctl_rec.employee_id);
83: END IF;
84:
85: d_progress := 10;
86:
85: d_progress := 10;
86:
87: BEGIN
88:
89: IF (PO_LOG.d_stmt) THEN
90: PO_LOG.stmt(d_module, d_progress, 'Calling change_doc_auth_state');
91: END IF;
92:
93: PO_DOCUMENT_ACTION_UTIL.change_doc_auth_state(
86:
87: BEGIN
88:
89: IF (PO_LOG.d_stmt) THEN
90: PO_LOG.stmt(d_module, d_progress, 'Calling change_doc_auth_state');
91: END IF;
92:
93: PO_DOCUMENT_ACTION_UTIL.change_doc_auth_state(
94: p_document_id => p_action_ctl_rec.document_id
142: RAISE PO_CORE_S.g_early_return_exc;
143: END IF;
144:
145: d_progress := 50;
146: IF (PO_LOG.d_stmt) THEN
147: PO_LOG.stmt(d_module, d_progress, 'l_supply_action', l_supply_action);
148: END IF;
149:
150: l_bool_ret_sts :=
143: END IF;
144:
145: d_progress := 50;
146: IF (PO_LOG.d_stmt) THEN
147: PO_LOG.stmt(d_module, d_progress, 'l_supply_action', l_supply_action);
148: END IF;
149:
150: l_bool_ret_sts :=
151: PO_SUPPLY.po_req_supply(
228:
229: EXCEPTION
230: WHEN PO_CORE_S.g_early_return_exc THEN
231: p_action_ctl_rec.return_status := 'U';
232: IF (PO_LOG.d_exc) THEN
233: PO_LOG.exc(d_module, d_progress, l_err_msg);
234: END IF;
235: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, l_err_msg);
236:
229: EXCEPTION
230: WHEN PO_CORE_S.g_early_return_exc THEN
231: p_action_ctl_rec.return_status := 'U';
232: IF (PO_LOG.d_exc) THEN
233: PO_LOG.exc(d_module, d_progress, l_err_msg);
234: END IF;
235: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, l_err_msg);
236:
237: END;
235: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, l_err_msg);
236:
237: END;
238:
239: IF (PO_LOG.d_proc) THEN
240: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
241: PO_LOG.proc_end(d_module);
242: END IF;
243:
236:
237: END;
238:
239: IF (PO_LOG.d_proc) THEN
240: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
241: PO_LOG.proc_end(d_module);
242: END IF;
243:
244: RETURN;
237: END;
238:
239: IF (PO_LOG.d_proc) THEN
240: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
241: PO_LOG.proc_end(d_module);
242: END IF;
243:
244: RETURN;
245:
247: WHEN OTHERS THEN
248: p_action_ctl_rec.return_status := 'U';
249:
250: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
251: IF (PO_LOG.d_exc) THEN
252: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
253: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
254: PO_LOG.proc_end(d_module);
255: END IF;
248: p_action_ctl_rec.return_status := 'U';
249:
250: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
251: IF (PO_LOG.d_exc) THEN
252: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
253: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
254: PO_LOG.proc_end(d_module);
255: END IF;
256:
249:
250: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
251: IF (PO_LOG.d_exc) THEN
252: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
253: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
254: PO_LOG.proc_end(d_module);
255: END IF;
256:
257: RETURN;
250: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
251: IF (PO_LOG.d_exc) THEN
252: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
253: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
254: PO_LOG.proc_end(d_module);
255: END IF;
256:
257: RETURN;
258:
313:
314: BEGIN
315:
316: d_progress := 0;
317: IF (PO_LOG.d_proc) THEN
318: PO_LOG.proc_begin(d_module);
319: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
320: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
321: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
314: BEGIN
315:
316: d_progress := 0;
317: IF (PO_LOG.d_proc) THEN
318: PO_LOG.proc_begin(d_module);
319: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
320: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
321: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
322: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.draft_id', p_action_ctl_rec.draft_id); --CLM Apprvl
315:
316: d_progress := 0;
317: IF (PO_LOG.d_proc) THEN
318: PO_LOG.proc_begin(d_module);
319: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
320: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
321: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
322: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.draft_id', p_action_ctl_rec.draft_id); --CLM Apprvl
323: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
316: d_progress := 0;
317: IF (PO_LOG.d_proc) THEN
318: PO_LOG.proc_begin(d_module);
319: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
320: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
321: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
322: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.draft_id', p_action_ctl_rec.draft_id); --CLM Apprvl
323: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
324: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
317: IF (PO_LOG.d_proc) THEN
318: PO_LOG.proc_begin(d_module);
319: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
320: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
321: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
322: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.draft_id', p_action_ctl_rec.draft_id); --CLM Apprvl
323: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
324: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
325: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
318: PO_LOG.proc_begin(d_module);
319: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
320: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
321: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
322: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.draft_id', p_action_ctl_rec.draft_id); --CLM Apprvl
323: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
324: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
325: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
326: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
319: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
320: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
321: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
322: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.draft_id', p_action_ctl_rec.draft_id); --CLM Apprvl
323: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
324: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
325: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
326: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
327: END IF;
320: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
321: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
322: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.draft_id', p_action_ctl_rec.draft_id); --CLM Apprvl
323: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
324: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
325: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
326: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
327: END IF;
328:
321: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
322: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.draft_id', p_action_ctl_rec.draft_id); --CLM Apprvl
323: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
324: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
325: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
326: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
327: END IF;
328:
329: d_progress := 10;
322: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.draft_id', p_action_ctl_rec.draft_id); --CLM Apprvl
323: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
324: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
325: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
326: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
327: END IF;
328:
329: d_progress := 10;
330:
380: END IF;
381:
382: d_progress := 70;
383:
384: IF (PO_LOG.d_stmt) THEN
385: PO_LOG.stmt(d_module, d_progress, 'l_preparer_id', l_preparer_id);
386: END IF;
387:
388:
381:
382: d_progress := 70;
383:
384: IF (PO_LOG.d_stmt) THEN
385: PO_LOG.stmt(d_module, d_progress, 'l_preparer_id', l_preparer_id);
386: END IF;
387:
388:
389: IF ( PO_CORE_S.is_encumbrance_on(
416: WHERE po_header_id = p_action_ctl_rec.document_id;
417:
418: END IF;
419:
420: IF (PO_LOG.d_stmt) THEN
421: PO_LOG.stmt(d_module, d_progress, 'l_enc_flag', l_enc_flag);
422: END IF;
423:
424:
417:
418: END IF;
419:
420: IF (PO_LOG.d_stmt) THEN
421: PO_LOG.stmt(d_module, d_progress, 'l_enc_flag', l_enc_flag);
422: END IF;
423:
424:
425: IF ((l_enc_flag = 'Y') AND (p_action_ctl_rec.document_subtype <> 'CONTRACT')) -- bug 8498264
453: END IF;
454:
455: d_progress := 120;
456:
457: IF (PO_LOG.d_stmt) THEN
458: PO_LOG.stmt(d_module, d_progress, 'l_enc_ret_code', l_enc_ret_code);
459: PO_LOG.stmt(d_module, d_progress, 'l_enc_report_id', l_enc_report_id);
460: END IF;
461:
454:
455: d_progress := 120;
456:
457: IF (PO_LOG.d_stmt) THEN
458: PO_LOG.stmt(d_module, d_progress, 'l_enc_ret_code', l_enc_ret_code);
459: PO_LOG.stmt(d_module, d_progress, 'l_enc_report_id', l_enc_report_id);
460: END IF;
461:
462: p_action_ctl_rec.online_report_id := l_enc_report_id;
455: d_progress := 120;
456:
457: IF (PO_LOG.d_stmt) THEN
458: PO_LOG.stmt(d_module, d_progress, 'l_enc_ret_code', l_enc_ret_code);
459: PO_LOG.stmt(d_module, d_progress, 'l_enc_report_id', l_enc_report_id);
460: END IF;
461:
462: p_action_ctl_rec.online_report_id := l_enc_report_id;
463:
507: END IF; -- if l_enc_flag = 'Y' ...
508:
509: d_progress := 170;
510:
511: IF (PO_LOG.d_stmt) THEN
512: PO_LOG.stmt(d_module, d_progress, 'Calling change_doc_auth_state');
513: END IF;
514:
515: PO_DOCUMENT_ACTION_UTIL.change_doc_auth_state(
508:
509: d_progress := 170;
510:
511: IF (PO_LOG.d_stmt) THEN
512: PO_LOG.stmt(d_module, d_progress, 'Calling change_doc_auth_state');
513: END IF;
514:
515: PO_DOCUMENT_ACTION_UTIL.change_doc_auth_state(
516: p_document_id => p_action_ctl_rec.document_id
559: -- RAISE PO_CORE_S.g_early_return_exc;
560: -- END IF;
561: --
562: -- d_progress := 200;
563: -- IF (PO_LOG.d_stmt) THEN
564: -- PO_LOG.stmt(d_module, d_progress, 'l_supply_action', l_supply_action);
565: -- END IF;
566: --
567: -- l_bool_ret_sts :=
560: -- END IF;
561: --
562: -- d_progress := 200;
563: -- IF (PO_LOG.d_stmt) THEN
564: -- PO_LOG.stmt(d_module, d_progress, 'l_supply_action', l_supply_action);
565: -- END IF;
566: --
567: -- l_bool_ret_sts :=
568: -- PO_SUPPLY.po_req_supply(
590: EXCEPTION
591: WHEN PO_CORE_S.g_early_return_exc THEN
592: IF (p_action_ctl_rec.return_status = 'U')
593: THEN
594: IF (PO_LOG.d_exc) THEN
595: PO_LOG.exc(d_module, d_progress, l_err_msg);
596: END IF;
597: END IF;
598:
591: WHEN PO_CORE_S.g_early_return_exc THEN
592: IF (p_action_ctl_rec.return_status = 'U')
593: THEN
594: IF (PO_LOG.d_exc) THEN
595: PO_LOG.exc(d_module, d_progress, l_err_msg);
596: END IF;
597: END IF;
598:
599: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, l_err_msg);
599: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, l_err_msg);
600:
601: END;
602:
603: IF (PO_LOG.d_proc) THEN
604: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
605: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
606: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
607: PO_LOG.proc_end(d_module);
600:
601: END;
602:
603: IF (PO_LOG.d_proc) THEN
604: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
605: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
606: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
607: PO_LOG.proc_end(d_module);
608: END IF;
601: END;
602:
603: IF (PO_LOG.d_proc) THEN
604: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
605: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
606: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
607: PO_LOG.proc_end(d_module);
608: END IF;
609:
602:
603: IF (PO_LOG.d_proc) THEN
604: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
605: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
606: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
607: PO_LOG.proc_end(d_module);
608: END IF;
609:
610: RETURN;
603: IF (PO_LOG.d_proc) THEN
604: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
605: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
606: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
607: PO_LOG.proc_end(d_module);
608: END IF;
609:
610: RETURN;
611:
613: WHEN OTHERS THEN
614: p_action_ctl_rec.return_status := 'U';
615:
616: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
617: IF (PO_LOG.d_exc) THEN
618: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
619: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
620: PO_LOG.proc_end(d_module);
621: END IF;
614: p_action_ctl_rec.return_status := 'U';
615:
616: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
617: IF (PO_LOG.d_exc) THEN
618: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
619: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
620: PO_LOG.proc_end(d_module);
621: END IF;
622:
615:
616: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
617: IF (PO_LOG.d_exc) THEN
618: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
619: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
620: PO_LOG.proc_end(d_module);
621: END IF;
622:
623: RETURN;
616: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
617: IF (PO_LOG.d_exc) THEN
618: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
619: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
620: PO_LOG.proc_end(d_module);
621: END IF;
622:
623: RETURN;
624:
666:
667: BEGIN
668:
669: d_progress := 0;
670: IF (PO_LOG.d_proc) THEN
671: PO_LOG.proc_begin(d_module);
672: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
673: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
674: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
667: BEGIN
668:
669: d_progress := 0;
670: IF (PO_LOG.d_proc) THEN
671: PO_LOG.proc_begin(d_module);
672: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
673: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
674: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
675: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
668:
669: d_progress := 0;
670: IF (PO_LOG.d_proc) THEN
671: PO_LOG.proc_begin(d_module);
672: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
673: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
674: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
675: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
676: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
669: d_progress := 0;
670: IF (PO_LOG.d_proc) THEN
671: PO_LOG.proc_begin(d_module);
672: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
673: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
674: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
675: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
676: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
677: END IF;
670: IF (PO_LOG.d_proc) THEN
671: PO_LOG.proc_begin(d_module);
672: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
673: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
674: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
675: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
676: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
677: END IF;
678:
671: PO_LOG.proc_begin(d_module);
672: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
673: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
674: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
675: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
676: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
677: END IF;
678:
679: d_progress := 10;
672: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
673: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
674: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
675: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
676: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.forward_to_id', p_action_ctl_rec.forward_to_id);
677: END IF;
678:
679: d_progress := 10;
680:
679: d_progress := 10;
680:
681: BEGIN
682:
683: IF (PO_LOG.d_stmt) THEN
684: PO_LOG.stmt(d_module, d_progress, 'Calling change_doc_auth_state');
685: END IF;
686:
687: PO_DOCUMENT_ACTION_UTIL.change_doc_auth_state(
680:
681: BEGIN
682:
683: IF (PO_LOG.d_stmt) THEN
684: PO_LOG.stmt(d_module, d_progress, 'Calling change_doc_auth_state');
685: END IF;
686:
687: PO_DOCUMENT_ACTION_UTIL.change_doc_auth_state(
688: p_document_id => p_action_ctl_rec.document_id
712: l_ret_sts := 'S';
713:
714: EXCEPTION
715: WHEN PO_CORE_S.g_early_return_exc THEN
716: IF (PO_LOG.d_exc) THEN
717: PO_LOG.exc(d_module, d_progress, l_err_msg);
718: END IF;
719: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, l_err_msg);
720:
713:
714: EXCEPTION
715: WHEN PO_CORE_S.g_early_return_exc THEN
716: IF (PO_LOG.d_exc) THEN
717: PO_LOG.exc(d_module, d_progress, l_err_msg);
718: END IF;
719: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, l_err_msg);
720:
721: END;
720:
721: END;
722:
723: p_action_ctl_rec.return_status := l_ret_sts;
724: IF (PO_LOG.d_proc) THEN
725: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
726: PO_LOG.proc_end(d_module);
727: END IF;
728:
721: END;
722:
723: p_action_ctl_rec.return_status := l_ret_sts;
724: IF (PO_LOG.d_proc) THEN
725: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
726: PO_LOG.proc_end(d_module);
727: END IF;
728:
729: RETURN;
722:
723: p_action_ctl_rec.return_status := l_ret_sts;
724: IF (PO_LOG.d_proc) THEN
725: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
726: PO_LOG.proc_end(d_module);
727: END IF;
728:
729: RETURN;
730:
732: WHEN OTHERS THEN
733: p_action_ctl_rec.return_status := 'U';
734:
735: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
736: IF (PO_LOG.d_exc) THEN
737: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
738: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
739: PO_LOG.proc_end(d_module);
740: END IF;
733: p_action_ctl_rec.return_status := 'U';
734:
735: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
736: IF (PO_LOG.d_exc) THEN
737: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
738: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
739: PO_LOG.proc_end(d_module);
740: END IF;
741:
734:
735: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
736: IF (PO_LOG.d_exc) THEN
737: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
738: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
739: PO_LOG.proc_end(d_module);
740: END IF;
741:
742: RETURN;
735: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
736: IF (PO_LOG.d_exc) THEN
737: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
738: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
739: PO_LOG.proc_end(d_module);
740: END IF;
741:
742: RETURN;
743:
798:
799: BEGIN
800:
801: d_progress := 0;
802: IF (PO_LOG.d_proc) THEN
803: PO_LOG.proc_begin(d_module);
804: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
805: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
806: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
799: BEGIN
800:
801: d_progress := 0;
802: IF (PO_LOG.d_proc) THEN
803: PO_LOG.proc_begin(d_module);
804: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
805: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
806: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
807: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
800:
801: d_progress := 0;
802: IF (PO_LOG.d_proc) THEN
803: PO_LOG.proc_begin(d_module);
804: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
805: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
806: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
807: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
808: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
801: d_progress := 0;
802: IF (PO_LOG.d_proc) THEN
803: PO_LOG.proc_begin(d_module);
804: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
805: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
806: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
807: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
808: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
809: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
802: IF (PO_LOG.d_proc) THEN
803: PO_LOG.proc_begin(d_module);
804: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
805: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
806: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
807: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
808: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
809: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
810: END IF;
803: PO_LOG.proc_begin(d_module);
804: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
805: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
806: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
807: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
808: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
809: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
810: END IF;
811:
804: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_id', p_action_ctl_rec.document_id);
805: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
806: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
807: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
808: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
809: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
810: END IF;
811:
812: d_progress := 10;
805: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_type', p_action_ctl_rec.document_type);
806: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.document_subtype', p_action_ctl_rec.document_subtype);
807: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.action', p_action_ctl_rec.action);
808: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.note', p_action_ctl_rec.note);
809: PO_LOG.proc_begin(d_module, 'p_action_ctl_rec.approval_path_id', p_action_ctl_rec.approval_path_id);
810: END IF;
811:
812: d_progress := 10;
813:
866: , p_org_id => NULL
867: );
868:
869: d_progress := 60;
870: IF (PO_LOG.d_stmt) THEN
871: PO_LOG.stmt(d_module, d_progress, 'l_req_enc_on', l_req_enc_on);
872: END IF;
873:
874: IF (l_req_enc_on)
867: );
868:
869: d_progress := 60;
870: IF (PO_LOG.d_stmt) THEN
871: PO_LOG.stmt(d_module, d_progress, 'l_req_enc_on', l_req_enc_on);
872: END IF;
873:
874: IF (l_req_enc_on)
875: ---Bug#14332568 : Added below condition so that The Requistion is not be un-reserved during Return action.
904: END IF;
905:
906: d_progress := 90;
907:
908: IF (PO_LOG.d_stmt) THEN
909: PO_LOG.stmt(d_module, d_progress, 'l_enc_ret_code', l_enc_ret_code);
910: PO_LOG.stmt(d_module, d_progress, 'l_enc_report_id', l_enc_report_id);
911: END IF;
912:
905:
906: d_progress := 90;
907:
908: IF (PO_LOG.d_stmt) THEN
909: PO_LOG.stmt(d_module, d_progress, 'l_enc_ret_code', l_enc_ret_code);
910: PO_LOG.stmt(d_module, d_progress, 'l_enc_report_id', l_enc_report_id);
911: END IF;
912:
913: p_action_ctl_rec.online_report_id := l_enc_report_id;
906: d_progress := 90;
907:
908: IF (PO_LOG.d_stmt) THEN
909: PO_LOG.stmt(d_module, d_progress, 'l_enc_ret_code', l_enc_ret_code);
910: PO_LOG.stmt(d_module, d_progress, 'l_enc_report_id', l_enc_report_id);
911: END IF;
912:
913: p_action_ctl_rec.online_report_id := l_enc_report_id;
914:
978: END IF;
979:
980: d_progress := 170;
981:
982: IF (PO_LOG.d_stmt) THEN
983: PO_LOG.stmt(d_module, d_progress, 'Calling change_doc_auth_state');
984: END IF;
985:
986: PO_DOCUMENT_ACTION_UTIL.change_doc_auth_state(
979:
980: d_progress := 170;
981:
982: IF (PO_LOG.d_stmt) THEN
983: PO_LOG.stmt(d_module, d_progress, 'Calling change_doc_auth_state');
984: END IF;
985:
986: PO_DOCUMENT_ACTION_UTIL.change_doc_auth_state(
987: p_document_id => p_action_ctl_rec.document_id
1027: RAISE PO_CORE_S.g_early_return_exc;
1028: END IF;
1029:
1030: d_progress := 200;
1031: IF (PO_LOG.d_stmt) THEN
1032: PO_LOG.stmt(d_module, d_progress, 'l_supply_action', l_supply_action);
1033: END IF;
1034:
1035: l_bool_ret_sts :=
1028: END IF;
1029:
1030: d_progress := 200;
1031: IF (PO_LOG.d_stmt) THEN
1032: PO_LOG.stmt(d_module, d_progress, 'l_supply_action', l_supply_action);
1033: END IF;
1034:
1035: l_bool_ret_sts :=
1036: PO_SUPPLY.po_req_supply(
1057:
1058: EXCEPTION
1059: WHEN PO_CORE_S.g_early_return_exc THEN
1060: IF (l_ret_sts = 'U') THEN
1061: IF (PO_LOG.d_exc) THEN
1062: PO_LOG.exc(d_module, d_progress, l_err_msg);
1063: END IF;
1064: END IF;
1065:
1058: EXCEPTION
1059: WHEN PO_CORE_S.g_early_return_exc THEN
1060: IF (l_ret_sts = 'U') THEN
1061: IF (PO_LOG.d_exc) THEN
1062: PO_LOG.exc(d_module, d_progress, l_err_msg);
1063: END IF;
1064: END IF;
1065:
1066: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, l_err_msg);
1066: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, l_err_msg);
1067: END;
1068:
1069: p_action_ctl_rec.return_status := l_ret_sts;
1070: IF (PO_LOG.d_proc) THEN
1071: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
1072: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
1073: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
1074: PO_LOG.proc_end(d_module);
1067: END;
1068:
1069: p_action_ctl_rec.return_status := l_ret_sts;
1070: IF (PO_LOG.d_proc) THEN
1071: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
1072: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
1073: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
1074: PO_LOG.proc_end(d_module);
1075: END IF;
1068:
1069: p_action_ctl_rec.return_status := l_ret_sts;
1070: IF (PO_LOG.d_proc) THEN
1071: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
1072: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
1073: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
1074: PO_LOG.proc_end(d_module);
1075: END IF;
1076:
1069: p_action_ctl_rec.return_status := l_ret_sts;
1070: IF (PO_LOG.d_proc) THEN
1071: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
1072: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
1073: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
1074: PO_LOG.proc_end(d_module);
1075: END IF;
1076:
1077: RETURN;
1070: IF (PO_LOG.d_proc) THEN
1071: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
1072: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_code', p_action_ctl_rec.return_code);
1073: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.online_report_id', p_action_ctl_rec.online_report_id);
1074: PO_LOG.proc_end(d_module);
1075: END IF;
1076:
1077: RETURN;
1078:
1080: WHEN OTHERS THEN
1081: p_action_ctl_rec.return_status := 'U';
1082:
1083: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
1084: IF (PO_LOG.d_exc) THEN
1085: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
1086: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
1087: PO_LOG.proc_end(d_module);
1088: END IF;
1081: p_action_ctl_rec.return_status := 'U';
1082:
1083: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
1084: IF (PO_LOG.d_exc) THEN
1085: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
1086: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
1087: PO_LOG.proc_end(d_module);
1088: END IF;
1089:
1082:
1083: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
1084: IF (PO_LOG.d_exc) THEN
1085: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
1086: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
1087: PO_LOG.proc_end(d_module);
1088: END IF;
1089:
1090: RETURN;
1083: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
1084: IF (PO_LOG.d_exc) THEN
1085: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
1086: PO_LOG.proc_end(d_module, 'p_action_ctl_rec.return_status', p_action_ctl_rec.return_status);
1087: PO_LOG.proc_end(d_module);
1088: END IF;
1089:
1090: RETURN;
1091:
1140:
1141: BEGIN
1142:
1143: d_progress := 0;
1144: IF (PO_LOG.d_proc) THEN
1145: PO_LOG.proc_begin(d_module);
1146: PO_LOG.proc_begin(d_module, 'p_document_type', p_document_subtype);
1147: PO_LOG.proc_begin(d_module, 'p_document_type', p_document_subtype);
1148: END IF;
1141: BEGIN
1142:
1143: d_progress := 0;
1144: IF (PO_LOG.d_proc) THEN
1145: PO_LOG.proc_begin(d_module);
1146: PO_LOG.proc_begin(d_module, 'p_document_type', p_document_subtype);
1147: PO_LOG.proc_begin(d_module, 'p_document_type', p_document_subtype);
1148: END IF;
1149:
1142:
1143: d_progress := 0;
1144: IF (PO_LOG.d_proc) THEN
1145: PO_LOG.proc_begin(d_module);
1146: PO_LOG.proc_begin(d_module, 'p_document_type', p_document_subtype);
1147: PO_LOG.proc_begin(d_module, 'p_document_type', p_document_subtype);
1148: END IF;
1149:
1150: IF (p_action IN (PO_DOCUMENT_ACTION_PVT.g_doc_action_APPROVE,
1143: d_progress := 0;
1144: IF (PO_LOG.d_proc) THEN
1145: PO_LOG.proc_begin(d_module);
1146: PO_LOG.proc_begin(d_module, 'p_document_type', p_document_subtype);
1147: PO_LOG.proc_begin(d_module, 'p_document_type', p_document_subtype);
1148: END IF;
1149:
1150: IF (p_action IN (PO_DOCUMENT_ACTION_PVT.g_doc_action_APPROVE,
1151: PO_DOCUMENT_ACTION_PVT.g_doc_action_REJECT))
1192:
1193: x_supply_action := l_supply_action;
1194: x_return_status := 'S';
1195:
1196: IF (PO_LOG.d_proc) THEN
1197: PO_LOG.proc_end(d_module, 'x_return_status', x_return_status);
1198: PO_LOG.proc_end(d_module, 'x_supply_action', x_supply_action);
1199: PO_LOG.proc_end(d_module);
1200: END IF;
1193: x_supply_action := l_supply_action;
1194: x_return_status := 'S';
1195:
1196: IF (PO_LOG.d_proc) THEN
1197: PO_LOG.proc_end(d_module, 'x_return_status', x_return_status);
1198: PO_LOG.proc_end(d_module, 'x_supply_action', x_supply_action);
1199: PO_LOG.proc_end(d_module);
1200: END IF;
1201:
1194: x_return_status := 'S';
1195:
1196: IF (PO_LOG.d_proc) THEN
1197: PO_LOG.proc_end(d_module, 'x_return_status', x_return_status);
1198: PO_LOG.proc_end(d_module, 'x_supply_action', x_supply_action);
1199: PO_LOG.proc_end(d_module);
1200: END IF;
1201:
1202: EXCEPTION
1195:
1196: IF (PO_LOG.d_proc) THEN
1197: PO_LOG.proc_end(d_module, 'x_return_status', x_return_status);
1198: PO_LOG.proc_end(d_module, 'x_supply_action', x_supply_action);
1199: PO_LOG.proc_end(d_module);
1200: END IF;
1201:
1202: EXCEPTION
1203: WHEN OTHERS THEN
1202: EXCEPTION
1203: WHEN OTHERS THEN
1204: x_return_status := 'U';
1205: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
1206: IF (PO_LOG.d_exc) THEN
1207: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
1208: PO_LOG.proc_end(d_module, 'x_return_status', x_return_status);
1209: PO_LOG.proc_end(d_module);
1210: END IF;
1203: WHEN OTHERS THEN
1204: x_return_status := 'U';
1205: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
1206: IF (PO_LOG.d_exc) THEN
1207: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
1208: PO_LOG.proc_end(d_module, 'x_return_status', x_return_status);
1209: PO_LOG.proc_end(d_module);
1210: END IF;
1211:
1204: x_return_status := 'U';
1205: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
1206: IF (PO_LOG.d_exc) THEN
1207: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
1208: PO_LOG.proc_end(d_module, 'x_return_status', x_return_status);
1209: PO_LOG.proc_end(d_module);
1210: END IF;
1211:
1212: RETURN;
1205: PO_DOCUMENT_ACTION_PVT.error_msg_append(d_module, d_progress, SQLCODE, SQLERRM);
1206: IF (PO_LOG.d_exc) THEN
1207: PO_LOG.exc(d_module, d_progress, SQLCODE || SQLERRM);
1208: PO_LOG.proc_end(d_module, 'x_return_status', x_return_status);
1209: PO_LOG.proc_end(d_module);
1210: END IF;
1211:
1212: RETURN;
1213: END get_supply_action_name;