1 PACKAGE QA_SAMPLING_PKG AUTHID CURRENT_USER AS
2 /* $Header: qasampls.pls 120.1.12010000.1 2008/07/25 09:20:40 appldev ship $ */
3
4
5 custom_sampling_plan CONSTANT NUMBER := 1;
6 normal_sampling_plan CONSTANT NUMBER := 2;
7 tighten_sampling_plan CONSTANT NUMBER := 3;
8 reduced_sampling_plan CONSTANT NUMBER := 4;
9 double_sampling_plan CONSTANT NUMBER := 5;
10 multiple_sampling_plan CONSTANT NUMBER := 6;
11 TYPE PlanArray IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
12
13 --
14 -- modified default value from -1 to null per coding standard
15 -- jezheng
16 -- Wed Nov 27 15:11:53 PST 2002
17 --
18
19 procedure eval_rcv_sampling_plan (
20 p_collection_id IN NUMBER,
21 p_organization_id IN number,
22 p_lot_size in number,
23 p_item_id in number default null,
24 p_item_category_id in number default null,
25 p_item_revision in varchar2 default null,
26 p_vendor_id in number default null,
27 p_vendor_site_id in number default null,
28 p_project_id in number default null,
29 p_task_id in number default null,
30 p_sampling_flag out NOCOPY varchar2);
31
32 procedure set_sample_size(
33 p_sampling_plan_id in number,
34 p_collection_id in number,
35 p_collection_plan_id in number,
36 p_lot_size in number,
37 p_sample_size out NOCOPY number);
38
39 --
40 -- Bug 6129041
41 -- Added one IN parameter p_item_id which defaults to NULL
42 -- skolluku Wed Jul 11 03:24:14 PDT 2007
43 --
44 procedure get_plan_result(
45 p_collection_id in number,
46 p_coll_plan_id in number,
47 out_plan_insp_result out NOCOPY varchar2,
48 p_item_id in number DEFAULT NULL);
49
50 procedure get_lot_result(
51 p_collection_id in number,
52 lot_insp_result out NOCOPY varchar2);
53
54 procedure launch_shipment_action(
55 p_po_txn_processor_mode IN VARCHAR2,
56 p_po_group_id IN NUMBER,
57 p_collection_id IN NUMBER,
58 p_employee_id IN NUMBER,
59 p_transaction_id IN NUMBER,
60 p_uom IN VARCHAR2,
61 p_transaction_date IN DATE,
62 p_created_by IN NUMBER,
63 p_last_updated_by IN NUMBER,
64 p_last_update_login IN NUMBER);
65
66 function is_sampling( p_collection_id in number ) return varchar2;
67
68 procedure launch_workflow(
69 p_criteria_id IN NUMBER,
70 p_coll_plan_id IN NUMBER,
71 p_wf_item_key OUT NOCOPY NUMBER);
72
73 --
74 -- Bug 6129041
75 -- Added two IN parameters p_org_id and p_item which default to null
76 -- skolluku Wed Jul 11 03:24:14 PDT 2007
77 --
78 procedure calculate_lot_result(p_collection_id IN NUMBER,
79 p_plan_ids IN VARCHAR2,
80 x_lot_result OUT NOCOPY VARCHAR2,
81 x_rej_qty OUT NOCOPY NUMBER,
82 x_acc_qty OUT NOCOPY NUMBER,
83 p_org_id IN NUMBER DEFAULT NULL,
84 p_item IN VARCHAR2 DEFAULT NULL);
85
86
87 procedure eval_rcv_sampling_plan (
88 p_collection_id IN NUMBER,
89 p_plan_id_list IN VARCHAR2,
90 p_org_id IN NUMBER,
91 p_lot_size IN NUMBER,
92 p_lpn_id IN NUMBER,
93 p_item IN VARCHAR2,
94 p_item_id IN NUMBER,
95 p_item_cat IN VARCHAR2,
96 p_item_category_id IN NUMBER,
97 p_item_rev IN VARCHAR2,
98 p_vendor IN VARCHAR2,
99 p_vendor_id IN NUMBER,
100 p_vendor_site IN VARCHAR2,
101 p_vendor_site_id IN NUMBER,
102 p_project_id IN NUMBER DEFAULT NULL,
103 p_task_id IN NUMBER DEFAULT NULL,
104 x_sampling_flag OUT NOCOPY VARCHAR2);
105
106 --
107 -- Bug 3096256. Added the below procedure for RCV/WMS Merge.
108 -- This procedure inserts the detailed Inspection results onto
109 -- qa_insp_collections_dtl_temp. This enables unit wise inspection
110 -- with LPN and at Lot/Serial levels.
111 -- Called from launch_shipment_action_int() of QA_SAMPLING_PKG and
112 -- QA_SKIPLOT_RES_ENGINE.
113 -- kabalakr Fri Aug 29 09:06:28 PDT 2003.
114 --
115
116 PROCEDURE post_insp_coll_details(p_collection_id IN NUMBER);
117
118
119 END; -- End QA_SAMPLING_PKG
120