[Home] [Help]
138:
139: d_progress := 11.4;
140: d_log_msg := 'invalid document type';
141: l_ret_sts := 'U';
142: RAISE PO_CORE_S.g_early_return_exc;
143:
144: END IF; -- p_aciton_ctl_rec.document_type = ...
145:
146: d_progress := 12;
184: /*Bug8512125 We pass the calling mode from here which will execute a different set of cursors if the mode is RCV*/
185:
186: PO_LOCKS.lock_headers(
187: p_doc_type => p_action_ctl_rec.document_type
188: , p_doc_level => PO_CORE_S.g_doc_level_HEADER
189: , p_doc_level_id_tbl => l_doc_id_tbl
190: , p_calling_mode => p_action_ctl_rec.calling_mode
191: );
192:
205: THEN
206:
207: d_log_msg := 'failed to lock document after 1000 tries';
208: l_ret_sts := 'U';
209: RAISE PO_CORE_S.g_early_return_exc;
210:
211: END IF;
212:
213:
234: IF (l_update_allowed = FND_API.G_FALSE) THEN
235: d_log_msg := 'unable to perform control action to doc: ' ||
236: l_error_message_text;
237: l_ret_sts := 'E';
238: RAISE PO_CORE_S.g_early_return_exc;
239: END IF;
240:
241: END IF;
242:
332:
333: d_progress := 100;
334: d_log_msg := 'unsupported action type';
335: l_ret_sts := 'U';
336: RAISE PO_CORE_S.g_early_return_exc;
337:
338: END IF; -- IF (p_action_ctl_rec.action = ...)
339:
340: IF (p_action_ctl_rec.return_status = 'U')
342:
343: d_progress := 110;
344: d_log_msg := 'unexpected error in action call';
345: l_ret_sts := 'U';
346: RAISE PO_CORE_S.g_early_return_exc;
347:
348: END IF;
349:
350: IF (p_action_ctl_rec.return_status = 'E')
352:
353: d_progress := 115;
354: d_log_msg := 'functional error in action call';
355: l_ret_sts := 'E';
356: RAISE PO_CORE_S.g_early_return_exc;
357:
358: END IF;
359:
360: d_progress := 120;
395: d_log_msg := 'create_update_delrec not successful';
396: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
397: error_msg_append(d_module, d_progress, l_msg_data);
398: l_ret_sts := 'U';
399: RAISE PO_CORE_S.g_early_return_exc;
400:
401: END IF;
402:
403: END IF; -- p_action_ctl_rec.document_type = 'PO' AND ...
406: p_action_ctl_rec.error_msg := NULL;
407: l_ret_sts := 'S';
408:
409: EXCEPTION
410: WHEN PO_CORE_S.g_early_return_exc THEN
411: IF (l_ret_sts = 'U') THEN
412: IF (l_msg_data IS NOT NULL) THEN
413: error_msg_append(d_module, d_progress, l_msg_data);
414: END IF;
1531: THEN
1532: d_progress := 70;
1533: d_msg := 'verify_authority threw unexpected error';
1534: l_ret_sts := 'U';
1535: RAISE PO_CORE_S.g_early_return_exc;
1536: END IF;
1537:
1538: IF (l_ret_code IS NULL)
1539: THEN
1574: THEN
1575: d_progress := 120;
1576: d_msg := 'verify_authority threw unexpected error';
1577: l_ret_sts := 'U';
1578: RAISE PO_CORE_S.g_early_return_exc;
1579: END IF;
1580:
1581: IF (l_ret_code IS NULL)
1582: THEN
1617: THEN
1618: d_progress := 170;
1619: d_msg := 'verify_authority threw unexpected error';
1620: l_ret_sts := 'U';
1621: RAISE PO_CORE_S.g_early_return_exc;
1622: END IF;
1623:
1624: IF (l_ret_code IS NULL)
1625: THEN
1679: ELSE
1680:
1681: l_ret_sts := 'U';
1682: d_msg := 'Invalid forwarding mode from po_document_types';
1683: RAISE PO_CORE_S.g_early_return_exc;
1684:
1685: END IF; -- l_forwarding_mode = ...
1686:
1687: EXCEPTION
1684:
1685: END IF; -- l_forwarding_mode = ...
1686:
1687: EXCEPTION
1688: WHEN PO_CORE_S.g_early_return_exc THEN
1689: IF (PO_LOG.d_exc) THEN
1690: PO_LOG.exc(d_module, d_progress, d_msg);
1691: PO_LOG.stmt(d_module, d_progress, 'l_exc_msg', l_exc_msg);
1692: END IF;