1 PACKAGE QA_SKIPLOT_EVAL_ENGINE AUTHID CURRENT_USER AS
2 /* $Header: qaslevas.pls 120.1 2006/03/31 05:19:51 saugupta noship $ */
3
4 --
5 -- This package defines skip lot evaluation engine
6 -- logic.
7 --
8
9 --
10 -- The function returns criteria id
11 -- it also resolve the criteria conflicts
12 -- so that only one criteria id is returned
13 -- if multiple groups of criteria are setup
14 --
15
16 FUNCTION GET_RCV_CRITERIA_ID
17 (p_organization_id IN NUMBER,
18 p_vendor_id IN NUMBER,
19 p_vendor_site_id IN NUMBER,
20 p_item_id IN NUMBER,
21 p_item_revision IN VARCHAR2,
22 p_item_category_id IN NUMBER,
23 p_project_id IN NUMBER,
24 p_task_id IN NUMBER,
25 p_manufacturer_id IN NUMBER)
26 RETURN NUMBER;
27
28
29 --
30 -- The procedure evaluates receiving inspection
31 -- criteria and process and creates avaliable plan
32 -- list if inspection is required.
33 --
34
35 PROCEDURE EVALUATE_RCV_CRITERIA (
36 p_organization_id IN NUMBER,
37 p_vendor_id IN NUMBER,
38 p_vendor_site_id IN NUMBER,
39 p_item_id IN NUMBER,
40 p_item_revision IN VARCHAR2,
41 p_item_category_id IN NUMBER,
42 p_project_id IN NUMBER,
43 p_task_id IN NUMBER,
44 p_manufacturer_id IN NUMBER,
45 p_lot_qty IN NUMBER,
46 p_primary_uom IN varchar2,
47 p_transaction_uom IN varchar2,
48 p_availablePlans OUT NOCOPY qa_skiplot_utility.planList,
49 p_criteria_id OUT NOCOPY NUMBER,
50 p_process_id OUT NOCOPY NUMBER);
51
52
53 --
54 -- The procedure evaluate skip lot rules
55 -- and generate applicable plan list if
56 -- applicable.
57 --
58
59 PROCEDURE EVALUATE_RULES (
60 p_availablePlans IN qa_skiplot_utility.planList,
61 p_criteria_id IN NUMBER,
62 p_process_id IN NUMBER,
63 p_txn IN NUMBER,
64 p_lot_id OUT NOCOPY NUMBER,
65 p_applicablePlans OUT NOCOPY qa_skiplot_utility.planList);
66
67
68 --
69 -- The procedure inserts the inspection
70 -- lot into skip lot result table and
71 -- set inspection statuses.
72 --
73 PROCEDURE INSERT_RCV_RESULTS (
74 p_interface_txn_id IN NUMBER,
75 p_manufacturer_id IN NUMBER,
76 p_receipt_qty IN NUMBER,
77 p_criteriaID IN NUMBER,
78 p_insp_status IN VARCHAR2,
79 p_receipt_date IN DATE,
80 p_lotID IN NUMBER DEFAULT NULL,
81 p_source_inspected IN NUMBER,
82 p_process_id IN NUMBER,
83 p_lpn_id IN NUMBER);
84
85 --
86 -- The procedure stores the lot/plan pairs
87 -- for inspection time usage.
88 --
89
90 PROCEDURE STORE_LOT_PLANS(
91 p_applicablePlans IN qa_skiplot_utility.planList,
92 p_lotid IN NUMBER,
93 p_insp_status IN VARCHAR2);
94
95 END QA_SKIPLOT_EVAL_ENGINE;
96