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 249: p_availablePlans OUT NOCOPY qa_skiplot_utility.planList,

245: p_manufacturer_id IN NUMBER,
246: p_lot_qty IN NUMBER,
247: p_primary_uom IN varchar2,
248: p_transaction_uom IN varchar2,
249: p_availablePlans OUT NOCOPY qa_skiplot_utility.planList,
250: p_criteria_id OUT NOCOPY NUMBER,
251: p_process_id OUT NOCOPY NUMBER)IS
252:
253: x_availablePlans qa_skiplot_utility.planList;

Line 253: x_availablePlans qa_skiplot_utility.planList;

249: p_availablePlans OUT NOCOPY qa_skiplot_utility.planList,
250: p_criteria_id OUT NOCOPY NUMBER,
251: p_process_id OUT NOCOPY NUMBER)IS
252:
253: x_availablePlans qa_skiplot_utility.planList;
254: x_criteria_id NUMBER := -1;
255: x_process_id NUMBER := -1;
256:
257: primary_lot_qty NUMBER;

Line 326: p_availablePlans IN qa_skiplot_utility.planList,

322:
323: END EVALUATE_RCV_CRITERIA;
324:
325: PROCEDURE EVALUATE_RULES (
326: p_availablePlans IN qa_skiplot_utility.planList,
327: p_criteria_id IN NUMBER,
328: p_process_id IN NUMBER,
329: p_txn IN NUMBER,
330: p_lot_id OUT NOCOPY NUMBER,

Line 331: p_applicablePlans OUT NOCOPY qa_skiplot_utility.planList)IS

327: p_criteria_id IN NUMBER,
328: p_process_id IN NUMBER,
329: p_txn IN NUMBER,
330: p_lot_id OUT NOCOPY NUMBER,
331: p_applicablePlans OUT NOCOPY qa_skiplot_utility.planList)IS
332:
333: pID number; -- plan id
334: alternate_plan_id number;
335: plan_states qa_skiplot_utility.planStateTable;

Line 335: plan_states qa_skiplot_utility.planStateTable;

331: p_applicablePlans OUT NOCOPY qa_skiplot_utility.planList)IS
332:
333: pID number; -- plan id
334: alternate_plan_id number;
335: plan_states qa_skiplot_utility.planStateTable;
336: i number := null;
337: p_plan_id number; -- process plan id
338: rule_start_lotid number;
339:

Line 412: x_lotID := qa_skiplot_utility.get_lot_id;

408: qspp.process_id = x_pid;
409:
410: BEGIN
411:
412: x_lotID := qa_skiplot_utility.get_lot_id;
413: p_lot_id := x_lotID;
414:
415: fetch_plan_states(
416: p_planList => p_availablePlans,

Line 465: qa_skiplot_utility.init_plan_state(

461: -- ntungare Wed Feb 15 06:50:41 PST 2006
462: --
463:
464: if not plan_states.exists(pID) THEN
465: qa_skiplot_utility.init_plan_state(
466: p_plan_id=> pID,
467: p_criteria_id => p_criteria_id,
468: p_process_id => p_process_id,
469: p_txn => p_txn,

Line 475: qa_skiplot_utility.date_reasonable (

471: p_process_plan_id => p_plan_id);
472:
473: plan_init_flag := TRUE;
474: elsif
475: qa_skiplot_utility.date_reasonable (
476: p_receipt_date => sysdate,
477: p_check_mode => qa_skiplot_utility.ADJACENT_DATE_CHECK,
478: p_plan_state =>plan_states(pID)) = fnd_api.g_false THEN
479: --

Line 477: p_check_mode => qa_skiplot_utility.ADJACENT_DATE_CHECK,

473: plan_init_flag := TRUE;
474: elsif
475: qa_skiplot_utility.date_reasonable (
476: p_receipt_date => sysdate,
477: p_check_mode => qa_skiplot_utility.ADJACENT_DATE_CHECK,
478: p_plan_state =>plan_states(pID)) = fnd_api.g_false THEN
479: --
480: -- bug 6344791
481: -- Included a parameter p_criteria_id so as

Line 491: QA_SKIPLOT_UTILITY.UPDATE_PLAN_STATE (

487: -- bhsankar Wed Aug 22 01:16:48 PDT 2007
488: --
489: For ps in plan_det (p_process_id, p_criteria_id)
490: LOOP
491: QA_SKIPLOT_UTILITY.UPDATE_PLAN_STATE (
492: p_process_plan_id => ps.process_plan_id,
493: p_criteria_id => p_criteria_id,
494: p_next_rule => 0,
495: p_next_round => 1,

Line 498: p_txn => QA_SKIPLOT_UTILITY.RCV);

494: p_next_rule => 0,
495: p_next_round => 1,
496: p_next_lot => 0,
497: p_lot_accepted => 0,
498: p_txn => QA_SKIPLOT_UTILITY.RCV);
499:
500: QA_SKIPLOT_UTILITY.RESET_LAST_RECEIPT_DATE(
501: p_criteria_id => p_criteria_id,
502: p_process_plan_id => ps.process_plan_id);

Line 500: QA_SKIPLOT_UTILITY.RESET_LAST_RECEIPT_DATE(

496: p_next_lot => 0,
497: p_lot_accepted => 0,
498: p_txn => QA_SKIPLOT_UTILITY.RCV);
499:
500: QA_SKIPLOT_UTILITY.RESET_LAST_RECEIPT_DATE(
501: p_criteria_id => p_criteria_id,
502: p_process_plan_id => ps.process_plan_id);
503: END LOOP;
504:

Line 553: process_plan_id := QA_SKIPLOT_UTILITY.GET_PROCESS_PLAN_ID(

549: -- be skipped that is it should directly go to next rule.
550: -- saugupta Tue, 23 Nov 2004 00:01:19 -0800 PDT
551: IF q_rounds =0 THEN
552:
553: process_plan_id := QA_SKIPLOT_UTILITY.GET_PROCESS_PLAN_ID(
554: p_plan_id => pID,
555: p_criteria_id => p_criteria_id,
556: p_process_id => p_process_id,
557: p_txn => p_txn);

Line 564: QA_SKIPLOT_UTILITY.CHECK_RULE_FREQUENCY(

560: OPEN nxt_rule(process_plan_id, 0);
561: FETCH nxt_rule INTO next_rule;
562: CLOSE nxt_rule;
563:
564: QA_SKIPLOT_UTILITY.CHECK_RULE_FREQUENCY(
565: process_plan_id,
566: next_rule,
567: freq_num,
568: freq_denom);

Line 573: QA_SKIPLOT_UTILITY.update_plan_state(

569: -- Bug 3959767. Checking the frequency of next rule. If this is also set
570: -- to zero then skip and update the plan state/process state.
571: -- saugupta Tue, 23 Nov 2004 00:01:58 -0800 PDT
572: IF freq_num = 0 THEN
573: QA_SKIPLOT_UTILITY.update_plan_state(
574: p_process_plan_id => process_plan_id,
575: p_criteria_id => p_criteria_id,
576: p_next_rule => next_rule,
577: p_txn => p_txn);

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

594: --
595: -- if rule_start_lot_id is null, update it with new id
596: -- otherwise leave it as it is
597: --
598: if qa_skiplot_utility.insp_rule_finished(plan_states(pID)) = fnd_api.g_true and
599: (plan_states(pID).last_receipt_date is null or
600: plan_states(pID).rule_start_date is null or
601: plan_states(pID).day_span is null or
602: trunc(plan_states(pID).last_receipt_date) - trunc(plan_states(pID).rule_start_date) <=

Line 613: qa_skiplot_utility.update_plan_state (

609:
610: --
611: -- update plan state with the latest lot id
612: --
613: qa_skiplot_utility.update_plan_state (
614: p_process_plan_id => plan_states(pID).process_plan_id,
615: p_criteria_id => p_criteria_id,
616: p_last_receipt_lot_id => x_lotID,
617: p_rule_start_lotid => rule_start_lotid,

Line 627: qa_skiplot_utility.update_plan_state (

623: -- forward the current_lot and
624: -- update the last receipt lot id
625: -- get alternate plan if available
626: --
627: qa_skiplot_utility.update_plan_state (
628: p_process_plan_id => plan_states(pID).process_plan_id,
629: p_criteria_id => p_criteria_id,
630: p_next_lot => plan_states(pID).current_lot + 1,
631: p_last_receipt_lot_id => x_lotID,

Line 647: qa_skiplot_utility.insert_error_log (

643: end loop;
644:
645: EXCEPTION
646: WHEN OTHERS THEN
647: qa_skiplot_utility.insert_error_log (
648: p_module_name => 'QA_SKIPLOT_EVAL_ENGINE.EVALUATE_RULES',
649: p_error_message => 'QA_SKIPLOT_EVAL_RULE_FAILURE',
650: p_comments => SUBSTR (SQLERRM , 1 , 240));
651: fnd_message.set_name ('QA', 'QA_SKIPLOT_EVAL_RULE_FAILURE');

Line 676: x_lotID := qa_skiplot_utility.get_lot_id;

672:
673: x_lotID := p_lotID;
674:
675: if x_lotID is null then
676: x_lotID := qa_skiplot_utility.get_lot_id;
677: end if;
678:
679: insert into qa_skiplot_rcv_results(
680: INSP_LOT_ID,

Line 725: p_applicablePlans IN qa_skiplot_utility.planList,

721:
722: END INSERT_RCV_RESULTS;
723:
724: PROCEDURE STORE_LOT_PLANS(
725: p_applicablePlans IN qa_skiplot_utility.planList,
726: p_lotID IN NUMBER,
727: p_insp_status IN VARCHAR2) IS
728:
729: plan_id number;