DBA Data[Home] [Help]

APPS.QA_SKIPLOT_EVAL_ENGINE dependencies on QA_SKIPLOT_UTILITY

Line 8: p_plan_state in qa_skiplot_utility.plan_state_rec)return varchar2 is

4: --
5: -- local function
6: --
7: function insp_required(
8: p_plan_state in qa_skiplot_utility.plan_state_rec)return varchar2 is
9:
10: begin
11: --
12: -- p_plan_state is the state before we consider the new coming lot

Line 18: if qa_skiplot_utility.insp_rule_finished(p_plan_state) = fnd_api.g_true then

14:
15: --
16: -- rule is finished
17: --
18: if qa_skiplot_utility.insp_rule_finished(p_plan_state) = fnd_api.g_true then
19: --
20: -- if the next rule does not have freq_numerator as 0, then inspect
21: -- otherwise skip
22: --

Line 23: if qa_skiplot_utility.inspect_zero(p_plan_state) = fnd_api.g_false then

19: --
20: -- if the next rule does not have freq_numerator as 0, then inspect
21: -- otherwise skip
22: --
23: if qa_skiplot_utility.inspect_zero(p_plan_state) = fnd_api.g_false then
24: return fnd_api.g_true;
25: else
26: return fnd_api.g_false;
27: end if;

Line 31: elsif qa_skiplot_utility.insp_round_finished(p_plan_state) = fnd_api.g_true then

27: end if;
28: --
29: -- rule is not finished, but round is finished
30: --
31: elsif qa_skiplot_utility.insp_round_finished(p_plan_state) = fnd_api.g_true then
32: --
33: -- if more rounds and the current frequency numerator is not 0 then inspect
34: -- otherwise skip
35: --

Line 36: if qa_skiplot_utility.more_rounds(p_plan_state) = fnd_api.g_true and

32: --
33: -- if more rounds and the current frequency numerator is not 0 then inspect
34: -- otherwise skip
35: --
36: if qa_skiplot_utility.more_rounds(p_plan_state) = fnd_api.g_true and
37: p_plan_state.current_freq_num > 0 then
38: return fnd_api.g_true;
39: else
40: return fnd_api.g_false;

Line 48: if qa_skiplot_utility.enough_lot_accepted(p_plan_state) = fnd_api.g_false then

44: -- round not finished
45: --
46: else
47: -- if not enough lot accepted, then inspect, otherwise skip
48: if qa_skiplot_utility.enough_lot_accepted(p_plan_state) = fnd_api.g_false then
49: return fnd_api.g_true;
50: else
51: return fnd_api.g_false;
52: end if;

Line 62: p_planList IN qa_skiplot_utility.planList,

58: --
59: -- local function
60: --
61: procedure fetch_plan_states(
62: p_planList IN qa_skiplot_utility.planList,
63: p_criteria_id IN NUMBER,
64: p_process_id IN NUMBER,
65: p_txn IN NUMBER,
66: p_plan_states OUT nocopy qa_skiplot_utility.planStateTable) IS

Line 66: p_plan_states OUT nocopy qa_skiplot_utility.planStateTable) IS

62: p_planList IN qa_skiplot_utility.planList,
63: p_criteria_id IN NUMBER,
64: p_process_id IN NUMBER,
65: p_txn IN NUMBER,
66: p_plan_states OUT nocopy qa_skiplot_utility.planStateTable) IS
67:
68: plan_state qa_skiplot_utility.plan_state_rec;
69: plan_id number;
70: i number := null;

Line 68: plan_state qa_skiplot_utility.plan_state_rec;

64: p_process_id IN NUMBER,
65: p_txn IN NUMBER,
66: p_plan_states OUT nocopy qa_skiplot_utility.planStateTable) IS
67:
68: plan_state qa_skiplot_utility.plan_state_rec;
69: plan_id number;
70: i number := null;
71:
72: begin

Line 77: qa_skiplot_utility.fetch_plan_state (

73: i := p_planList.first;
74: while i is not null loop
75: plan_id := p_planList(i).plan_id;
76:
77: qa_skiplot_utility.fetch_plan_state (
78: p_plan_id => plan_id,
79: p_criteria_id => p_criteria_id,
80: p_process_id => p_process_id,
81: p_txn => p_txn,

Line 195: p_availablePlans OUT NOCOPY qa_skiplot_utility.planList,

191: p_manufacturer_id IN NUMBER,
192: p_lot_qty IN NUMBER,
193: p_primary_uom IN varchar2,
194: p_transaction_uom IN varchar2,
195: p_availablePlans OUT NOCOPY qa_skiplot_utility.planList,
196: p_criteria_id OUT NOCOPY NUMBER,
197: p_process_id OUT NOCOPY NUMBER)IS
198:
199: x_availablePlans qa_skiplot_utility.planList;

Line 199: x_availablePlans qa_skiplot_utility.planList;

195: p_availablePlans OUT NOCOPY qa_skiplot_utility.planList,
196: p_criteria_id OUT NOCOPY NUMBER,
197: p_process_id OUT NOCOPY NUMBER)IS
198:
199: x_availablePlans qa_skiplot_utility.planList;
200: x_criteria_id NUMBER := -1;
201: x_process_id NUMBER := -1;
202:
203: primary_lot_qty NUMBER;

Line 272: p_availablePlans IN qa_skiplot_utility.planList,

268:
269: END EVALUATE_RCV_CRITERIA;
270:
271: PROCEDURE EVALUATE_RULES (
272: p_availablePlans IN qa_skiplot_utility.planList,
273: p_criteria_id IN NUMBER,
274: p_process_id IN NUMBER,
275: p_txn IN NUMBER,
276: p_lot_id OUT NOCOPY NUMBER,

Line 277: p_applicablePlans OUT NOCOPY qa_skiplot_utility.planList)IS

273: p_criteria_id IN NUMBER,
274: p_process_id IN NUMBER,
275: p_txn IN NUMBER,
276: p_lot_id OUT NOCOPY NUMBER,
277: p_applicablePlans OUT NOCOPY qa_skiplot_utility.planList)IS
278:
279: pID number; -- plan id
280: alternate_plan_id number;
281: plan_states qa_skiplot_utility.planStateTable;

Line 281: plan_states qa_skiplot_utility.planStateTable;

277: p_applicablePlans OUT NOCOPY qa_skiplot_utility.planList)IS
278:
279: pID number; -- plan id
280: alternate_plan_id number;
281: plan_states qa_skiplot_utility.planStateTable;
282: i number := null;
283: p_plan_id number; -- process plan id
284: rule_start_lotid number;
285:

Line 358: x_lotID := qa_skiplot_utility.get_lot_id;

354: qspp.process_id = x_pid;
355:
356: BEGIN
357:
358: x_lotID := qa_skiplot_utility.get_lot_id;
359: p_lot_id := x_lotID;
360:
361: fetch_plan_states(
362: p_planList => p_availablePlans,

Line 411: qa_skiplot_utility.init_plan_state(

407: -- ntungare Wed Feb 15 06:50:41 PST 2006
408: --
409:
410: if not plan_states.exists(pID) THEN
411: qa_skiplot_utility.init_plan_state(
412: p_plan_id=> pID,
413: p_criteria_id => p_criteria_id,
414: p_process_id => p_process_id,
415: p_txn => p_txn,

Line 421: qa_skiplot_utility.date_reasonable (

417: p_process_plan_id => p_plan_id);
418:
419: plan_init_flag := TRUE;
420: elsif
421: qa_skiplot_utility.date_reasonable (
422: p_receipt_date => sysdate,
423: p_check_mode => qa_skiplot_utility.ADJACENT_DATE_CHECK,
424: p_plan_state =>plan_states(pID)) = fnd_api.g_false THEN
425: --

Line 423: p_check_mode => qa_skiplot_utility.ADJACENT_DATE_CHECK,

419: plan_init_flag := TRUE;
420: elsif
421: qa_skiplot_utility.date_reasonable (
422: p_receipt_date => sysdate,
423: p_check_mode => qa_skiplot_utility.ADJACENT_DATE_CHECK,
424: p_plan_state =>plan_states(pID)) = fnd_api.g_false THEN
425: --
426: -- bug 6344791
427: -- Included a parameter p_criteria_id so as

Line 437: QA_SKIPLOT_UTILITY.UPDATE_PLAN_STATE (

433: -- bhsankar Wed Aug 22 01:16:48 PDT 2007
434: --
435: For ps in plan_det (p_process_id, p_criteria_id)
436: LOOP
437: QA_SKIPLOT_UTILITY.UPDATE_PLAN_STATE (
438: p_process_plan_id => ps.process_plan_id,
439: p_criteria_id => p_criteria_id,
440: p_next_rule => 0,
441: p_next_round => 1,

Line 444: p_txn => QA_SKIPLOT_UTILITY.RCV);

440: p_next_rule => 0,
441: p_next_round => 1,
442: p_next_lot => 0,
443: p_lot_accepted => 0,
444: p_txn => QA_SKIPLOT_UTILITY.RCV);
445:
446: QA_SKIPLOT_UTILITY.RESET_LAST_RECEIPT_DATE(
447: p_criteria_id => p_criteria_id,
448: p_process_plan_id => ps.process_plan_id);

Line 446: QA_SKIPLOT_UTILITY.RESET_LAST_RECEIPT_DATE(

442: p_next_lot => 0,
443: p_lot_accepted => 0,
444: p_txn => QA_SKIPLOT_UTILITY.RCV);
445:
446: QA_SKIPLOT_UTILITY.RESET_LAST_RECEIPT_DATE(
447: p_criteria_id => p_criteria_id,
448: p_process_plan_id => ps.process_plan_id);
449: END LOOP;
450:

Line 499: process_plan_id := QA_SKIPLOT_UTILITY.GET_PROCESS_PLAN_ID(

495: -- be skipped that is it should directly go to next rule.
496: -- saugupta Tue, 23 Nov 2004 00:01:19 -0800 PDT
497: IF q_rounds =0 THEN
498:
499: process_plan_id := QA_SKIPLOT_UTILITY.GET_PROCESS_PLAN_ID(
500: p_plan_id => pID,
501: p_criteria_id => p_criteria_id,
502: p_process_id => p_process_id,
503: p_txn => p_txn);

Line 510: QA_SKIPLOT_UTILITY.CHECK_RULE_FREQUENCY(

506: OPEN nxt_rule(process_plan_id, 0);
507: FETCH nxt_rule INTO next_rule;
508: CLOSE nxt_rule;
509:
510: QA_SKIPLOT_UTILITY.CHECK_RULE_FREQUENCY(
511: process_plan_id,
512: next_rule,
513: freq_num,
514: freq_denom);

Line 519: QA_SKIPLOT_UTILITY.update_plan_state(

515: -- Bug 3959767. Checking the frequency of next rule. If this is also set
516: -- to zero then skip and update the plan state/process state.
517: -- saugupta Tue, 23 Nov 2004 00:01:58 -0800 PDT
518: IF freq_num = 0 THEN
519: QA_SKIPLOT_UTILITY.update_plan_state(
520: p_process_plan_id => process_plan_id,
521: p_criteria_id => p_criteria_id,
522: p_next_rule => next_rule,
523: p_txn => p_txn);

Line 544: if qa_skiplot_utility.insp_rule_finished(plan_states(pID)) = fnd_api.g_true and

540: --
541: -- if rule_start_lot_id is null, update it with new id
542: -- otherwise leave it as it is
543: --
544: if qa_skiplot_utility.insp_rule_finished(plan_states(pID)) = fnd_api.g_true and
545: (plan_states(pID).last_receipt_date is null or
546: plan_states(pID).rule_start_date is null or
547: plan_states(pID).day_span is null or
548: trunc(plan_states(pID).last_receipt_date) - trunc(plan_states(pID).rule_start_date) <=

Line 559: qa_skiplot_utility.update_plan_state (

555:
556: --
557: -- update plan state with the latest lot id
558: --
559: qa_skiplot_utility.update_plan_state (
560: p_process_plan_id => plan_states(pID).process_plan_id,
561: p_criteria_id => p_criteria_id,
562: p_last_receipt_lot_id => x_lotID,
563: p_rule_start_lotid => rule_start_lotid,

Line 573: qa_skiplot_utility.update_plan_state (

569: -- forward the current_lot and
570: -- update the last receipt lot id
571: -- get alternate plan if available
572: --
573: qa_skiplot_utility.update_plan_state (
574: p_process_plan_id => plan_states(pID).process_plan_id,
575: p_criteria_id => p_criteria_id,
576: p_next_lot => plan_states(pID).current_lot + 1,
577: p_last_receipt_lot_id => x_lotID,

Line 593: qa_skiplot_utility.insert_error_log (

589: end loop;
590:
591: EXCEPTION
592: WHEN OTHERS THEN
593: qa_skiplot_utility.insert_error_log (
594: p_module_name => 'QA_SKIPLOT_EVAL_ENGINE.EVALUATE_RULES',
595: p_error_message => 'QA_SKIPLOT_EVAL_RULE_FAILURE',
596: p_comments => SUBSTR (SQLERRM , 1 , 240));
597: fnd_message.set_name ('QA', 'QA_SKIPLOT_EVAL_RULE_FAILURE');

Line 622: x_lotID := qa_skiplot_utility.get_lot_id;

618:
619: x_lotID := p_lotID;
620:
621: if x_lotID is null then
622: x_lotID := qa_skiplot_utility.get_lot_id;
623: end if;
624:
625: insert into qa_skiplot_rcv_results(
626: INSP_LOT_ID,

Line 671: p_applicablePlans IN qa_skiplot_utility.planList,

667:
668: END INSERT_RCV_RESULTS;
669:
670: PROCEDURE STORE_LOT_PLANS(
671: p_applicablePlans IN qa_skiplot_utility.planList,
672: p_lotID IN NUMBER,
673: p_insp_status IN VARCHAR2) IS
674:
675: plan_id number;