DBA Data[Home] [Help]

APPS.FND_OAM_DSCRAM_TASKS_PKG dependencies on FND_API

Line 79: x_return_status := FND_API.G_RET_STS_ERROR;

75: l_task_id NUMBER(15);
76: l_status VARCHAR2(30);
77: BEGIN
78: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
79: x_return_status := FND_API.G_RET_STS_ERROR;
80: x_return_msg := '';
81:
82: --handle closing/opening the cursor as necessary depending on p_requery
83: IF p_requery OR

Line 114: x_return_status := FND_API.G_RET_STS_SUCCESS;

110: b_last_fetched_task_id := l_task_id;
111:
112: --success
113: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
114: x_return_status := FND_API.G_RET_STS_SUCCESS;
115: EXCEPTION
116: WHEN OTHERS THEN
117: IF B_TASKS%ISOPEN THEN
118: CLOSE B_TASKS;

Line 120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

116: WHEN OTHERS THEN
117: IF B_TASKS%ISOPEN THEN
118: CLOSE B_TASKS;
119: END IF;
120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
121: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
122: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
123: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
124: END;

Line 151: x_return_status := FND_API.G_RET_STS_ERROR;

147: FROM fnd_oam_dscram_tasks
148: WHERE task_id = p_task_id;
149: BEGIN
150: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
151: x_return_status := FND_API.G_RET_STS_ERROR;
152: x_return_msg := '';
153:
154: -- automatically valid if task_id same as last fetched, if status has changed
155: -- then assign will catch it.

Line 158: x_return_status := FND_API.G_RET_STS_SUCCESS;

154: -- automatically valid if task_id same as last fetched, if status has changed
155: -- then assign will catch it.
156: IF p_task_id = b_last_fetched_task_id THEN
157: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
158: x_return_status := FND_API.G_RET_STS_SUCCESS;
159: RETURN TRUE;
160: END IF;
161:
162: --fetch necessary task attributes

Line 187: x_return_status := FND_API.G_RET_STS_SUCCESS;

183: END IF;
184:
185: --success
186: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
187: x_return_status := FND_API.G_RET_STS_SUCCESS;
188: RETURN TRUE;
189: EXCEPTION
190: WHEN OTHERS THEN
191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

187: x_return_status := FND_API.G_RET_STS_SUCCESS;
188: RETURN TRUE;
189: EXCEPTION
190: WHEN OTHERS THEN
191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
192: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
193: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
194: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
195: RETURN FALSE;

Line 220: x_return_status := FND_API.G_RET_STS_ERROR;

216: SELECT task_status
217: FROM fnd_oam_dscram_tasks
218: WHERE task_id = b_task_info.task_id;
219: BEGIN
220: x_return_status := FND_API.G_RET_STS_ERROR;
221: x_return_msg := '';
222:
223: -- make sure the state's initialized
224: IF NOT b_task_info.initialized THEN

Line 259: x_return_status := FND_API.G_RET_STS_SUCCESS;

255: fnd_oam_debug.log(1, l_ctxt, x_return_msg);
256: END IF;
257: RETURN FALSE;
258: END IF;
259: x_return_status := FND_API.G_RET_STS_SUCCESS;
260: ELSE
261: x_return_status := b_task_info.last_validation_ret_sts;
262: END IF;
263:

Line 281: RETURN (x_return_status = FND_API.G_RET_STS_SUCCESS);

277:
278: --success
279: b_task_info.last_validation_ret_sts := x_return_status;
280: b_task_info.last_validated := SYSDATE;
281: RETURN (x_return_status = FND_API.G_RET_STS_SUCCESS);
282: EXCEPTION
283: WHEN OTHERS THEN
284: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
285: fnd_oam_debug.log(6, l_ctxt, x_return_msg);

Line 286: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

282: EXCEPTION
283: WHEN OTHERS THEN
284: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
285: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
286: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
287: b_task_info.last_validation_ret_sts := x_return_status;
288: b_task_info.last_validated := SYSDATE;
289: RETURN FALSE;
290: END;

Line 315: x_return_status := FND_API.G_RET_STS_ERROR;

311: l_workers_assigned NUMBER(15);
312:
313: BEGIN
314: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
315: x_return_status := FND_API.G_RET_STS_ERROR;
316: x_return_msg := '';
317:
318: -- Do a locking select without a pre-select since we always have to update the
319: -- row to add to the # of workers assigned. Also updates the status to started if it

Line 352: STATS_FINISHED = FND_API.G_FALSE

348: p_prestart_status => l_status,
349: x_stat_id => l_stat_id);
350: UPDATE fnd_oam_dscram_tasks
351: SET task_status = FND_OAM_DSCRAM_UTILS_PKG.G_STATUS_PROCESSING,
352: STATS_FINISHED = FND_API.G_FALSE
353: WHERE task_id = p_task_id;
354: ELSE
355: --the bundle isn't processing but the worker count's nonzero, this shouldn't happen
356: x_return_msg := 'Task Status ('||l_status||') is not in-progress but the number of workers assigned('||l_workers_assigned||') is nonzero.';

Line 383: x_return_status := FND_API.G_RET_STS_SUCCESS;

379:
380: -- invalidate the last_fetched vars since we've changed things
381: b_last_fetched_task_id := NULL;
382:
383: x_return_status := FND_API.G_RET_STS_SUCCESS;
384: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
385: EXCEPTION
386: WHEN OTHERS THEN
387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

383: x_return_status := FND_API.G_RET_STS_SUCCESS;
384: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
385: EXCEPTION
386: WHEN OTHERS THEN
387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
388: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
389: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
390: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
391: ROLLBACK;

Line 474: x_final_ret_sts := FND_API.G_RET_STS_UNEXP_ERROR;

470: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
471: EXCEPTION
472: WHEN OTHERS THEN
473: x_final_status := FND_OAM_DSCRAM_UTILS_PKG.G_STATUS_ERROR_UNKNOWN;
474: x_final_ret_sts := FND_API.G_RET_STS_UNEXP_ERROR;
475: fnd_oam_debug.log(6, l_ctxt, 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))');
476: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
477: ROLLBACK;
478: END;

Line 495: x_return_status := FND_API.G_RET_STS_ERROR;

491: l_return_msg VARCHAR2(2048);
492: l_temp VARCHAR2(30);
493: BEGIN
494: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
495: x_return_status := FND_API.G_RET_STS_ERROR;
496: x_return_msg := '';
497:
498: -- do an initial validation of the task
499: IF NOT VALIDATE_START_EXECUTION(p_task_id,

Line 513: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

509: -- attempt to assign this invocation as a worker for the bundle
510: ASSIGN_WORKER_TO_TASK(p_task_id,
511: l_return_status,
512: l_return_msg);
513: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
514: x_return_status := l_return_status;
515: x_return_msg := '[Task Worker Assignment Failed]:('||l_return_msg||')';
516: fnd_oam_debug.log(1, l_ctxt, x_return_msg);
517: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 542: l_return_status := FND_API.G_RET_STS_SUCCESS;

538:
539: --at this point, we're assigned so we need to issue a complete before returning.
540: --this means no quick returns, so we hit the complete after the loop.
541: l_completed_status := FND_OAM_DSCRAM_UTILS_PKG.G_STATUS_PROCESSED;
542: l_return_status := FND_API.G_RET_STS_SUCCESS;
543:
544: -- we're in, start pulling units and executing them.
545: <>
546: LOOP

Line 554: l_return_status := FND_API.G_RET_STS_SUCCESS;

550: l_return_status,
551: l_return_msg);
552: IF l_return_status = FND_OAM_DSCRAM_UTILS_PKG.G_RET_STS_EMPTY THEN
553: -- empty means no units left, independent of phase
554: l_return_status := FND_API.G_RET_STS_SUCCESS;
555: EXIT outer;
556: ELSIF l_return_status = FND_OAM_DSCRAM_UTILS_PKG.G_RET_STS_FULL THEN
557: -- full means nothing available right now so return and find another task.
558: EXIT outer;

Line 559: ELSIF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

555: EXIT outer;
556: ELSIF l_return_status = FND_OAM_DSCRAM_UTILS_PKG.G_RET_STS_FULL THEN
557: -- full means nothing available right now so return and find another task.
558: EXIT outer;
559: ELSIF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
560: l_completed_status := FND_OAM_DSCRAM_UTILS_PKG.G_STATUS_ERROR_UNKNOWN;
561: x_return_msg := '[Fetch Next Unit Failed]:('||l_return_msg||')';
562: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
563: EXIT outer;

Line 585: ELSIF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

581: -- seeing an empty or full here doesn't mean the task's done, just that it's busy.
582: -- return full to the bundle_pkg to pick another task.
583: l_return_status := FND_OAM_DSCRAM_UTILS_PKG.G_RET_STS_FULL;
584: EXIT outer;
585: ELSIF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
586: l_completed_status := FND_OAM_DSCRAM_UTILS_PKG.G_STATUS_ERROR_UNKNOWN;
587: x_return_msg := '[Inner Fetch Next Unit Failed]:('||l_return_msg||')';
588: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
589: EXIT outer;

Line 599: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

595: l_return_msg);
596: IF l_return_status = FND_OAM_DSCRAM_UTILS_PKG.G_RET_STS_FULL THEN
597: --continue to the next inner loop iteration for the next fetch
598: null;
599: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
600: --on success break out of the loop so we can requery the units table from scratch
601: EXIT inner;
602: ELSIF l_return_status <> FND_OAM_DSCRAM_UTILS_PKG.G_RET_STS_PROCESSED AND
603: l_return_status <> FND_OAM_DSCRAM_UTILS_PKG.G_RET_STS_SKIPPED THEN

Line 614: ELSIF l_return_status <> FND_API.G_RET_STS_SUCCESS AND

610: l_completed_status := FND_OAM_DSCRAM_UTILS_PKG.G_STATUS_STOPPED;
611: EXIT outer;
612: END IF;
613: END LOOP inner;
614: ELSIF l_return_status <> FND_API.G_RET_STS_SUCCESS AND
615: l_return_status <> FND_OAM_DSCRAM_UTILS_PKG.G_RET_STS_PROCESSED AND
616: l_return_status <> FND_OAM_DSCRAM_UTILS_PKG.G_RET_STS_SKIPPED THEN
617: -- take the same actions as when the inner execute fails
618: x_return_msg := '[Outer Execute Unit Failed]:(Status('||l_return_status||'), Msg('||l_return_msg||')). Stopping task.';

Line 628: IF NOT VALIDATE_CONTINUED_EXECUTION((l_return_status <> FND_API.G_RET_STS_SUCCESS),

624:
625: --after every unit evaluation, check on the task and its parents.
626: --tell it to requery if the child's execution came back non-successful since this should
627: --be pretty uncommon and will help detect when a child has seen a stop in a parent.
628: IF NOT VALIDATE_CONTINUED_EXECUTION((l_return_status <> FND_API.G_RET_STS_SUCCESS),
629: TRUE,
630: l_return_status,
631: l_return_msg) THEN
632: --complete the task based on what validate found

Line 654: FND_API.G_RET_STS_UNEXP_ERROR,

650: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
651: EXCEPTION
652: WHEN OTHERS THEN
653: COMPLETE_TASK(FND_OAM_DSCRAM_UTILS_PKG.G_STATUS_ERROR_UNKNOWN,
654: FND_API.G_RET_STS_UNEXP_ERROR,
655: l_completed_status,
656: x_return_status);
657: x_return_msg := 'Unhandled Exception: [Code('||SQLCODE||'), Message("'||SQLERRM||'")]';
658: fnd_oam_debug.log(6, l_ctxt, x_return_msg);