[Home] [Help]
PACKAGE: APPS.GMD_RESULTS_PUB
Source
1 PACKAGE GMD_RESULTS_PUB AUTHID CURRENT_USER AS
2 /* $Header: GMDPRESS.pls 120.1.12020000.2 2012/07/17 10:07:02 mtou ship $*/
3 /*#
4 * This interface is used for processing QM Results.
5 * This package defines and implements the procedures and datatypes
6 * required for processing QM results.
7 * @rep:scope public
8 * @rep:product GMD
9 * @rep:lifecycle active
10 * @rep:displayname GMD Results Package
11 * @rep:compatibility S
12 * @rep:category BUSINESS_ENTITY GMD_RESULTS_PUB
13 */
14 -- Define Results Rec Type
15 -- Bug 3559515 EVAL_IND and ACTION_CODE assigned proper data types.
16
17 TYPE RESULTS_REC IS RECORD
18 ( UPDATE_INSTANCE_ID GMD_RESULTS.UPDATE_INSTANCE_ID%TYPE,
19 RESULT_ID GMD_RESULTS.RESULT_ID%TYPE,
20 SAMPLE_ID GMD_RESULTS.SAMPLE_ID%TYPE,
21 SAMPLE_NO GMD_SAMPLES.SAMPLE_NO%TYPE,
22 ORGANIZATION_ID GMD_SAMPLES.ORGANIZATION_ID%TYPE, /*NSRIVAST, INVCONV*/
23 LAB_ORGANIZATION_ID GMD_RESULTS.LAB_ORGANIZATION_ID%TYPE, /*NSRIVAST, INVCONV*/
24 TEST_CODE GMD_QC_TESTS.TEST_CODE%TYPE,
25 TEST_ID GMD_RESULTS.TEST_ID%TYPE,
26 TEST_REPLICATE_CNT GMD_RESULTS.TEST_REPLICATE_CNT%TYPE,
27 RESULT_VALUE VARCHAR2(80),
28 RESULT_DATE GMD_RESULTS.RESULT_DATE%TYPE,
29 TEST_KIT_INV_ITEM_ID GMD_RESULTS.TEST_KIT_INV_ITEM_ID%TYPE, /*NSRIVAST, INVCONV*/
30 TEST_KIT_LOT_NUMBER GMD_RESULTS.TEST_KIT_LOT_NUMBER%TYPE, /*NSRIVAST, INVCONV*/
31 TESTER GMD_RESULTS.TESTER%TYPE,
32 TESTER_ID GMD_RESULTS.TESTER_ID%TYPE,
33 TEST_PROVIDER_CODE GMD_RESULTS.TEST_PROVIDER_CODE%TYPE,
34 TEST_PROVIDER_ID GMD_RESULTS.TEST_PROVIDER_ID%TYPE,
35 SEQ GMD_RESULTS.SEQ%TYPE,
36 IN_SPEC GMD_SPEC_RESULTS.IN_SPEC_IND%TYPE,
37 ASSAY_RETEST GMD_RESULTS.ASSAY_RETEST%TYPE,
38 EVAL_IND GMD_SPEC_RESULTS.EVALUATION_IND%TYPE,
39 ACTION_CODE GMD_SPEC_RESULTS.ACTION_CODE%TYPE,
40 AD_HOC_PRINT_ON_COA_IND GMD_RESULTS.AD_HOC_PRINT_ON_COA_IND%TYPE,
41 PLANNED_RESOURCE GMD_RESULTS.PLANNED_RESOURCE%TYPE,
42 PLANNED_RESOURCE_INSTANCE GMD_RESULTS.PLANNED_RESOURCE_INSTANCE%TYPE,
43 ACTUAL_RESOURCE GMD_RESULTS.ACTUAL_RESOURCE%TYPE,
44 ACTUAL_RESOURCE_INSTANCE GMD_RESULTS.ACTUAL_RESOURCE_INSTANCE%TYPE,
45 PLANNED_RESULT_DATE GMD_RESULTS.PLANNED_RESULT_DATE%TYPE,
46 TEST_BY_DATE GMD_RESULTS.TEST_BY_DATE%TYPE,
47 TEST_QTY GMD_RESULTS.TEST_QTY%TYPE,
48 TEST_QTY_UOM GMD_RESULTS.TEST_QTY_UOM%TYPE, /*NSRIVAST, INVCONV*/
49 RESERVE_SAMPLE_ID GMD_RESULTS.RESERVE_SAMPLE_ID%TYPE,
50 CONSUMED_QTY GMD_RESULTS.CONSUMED_QTY%TYPE,
51 attribute_category VARCHAR2(30), -- added dffs for Bug 13976016 - HOW TO UPDATE DFF IN QUALITY RESULT FORM, USING API
52 attribute1 VARCHAR2(240),
53 attribute2 VARCHAR2(240),
54 attribute3 VARCHAR2(240),
55 attribute4 VARCHAR2(240),
56 attribute5 VARCHAR2(240),
57 attribute6 VARCHAR2(240),
58 attribute7 VARCHAR2(240),
59 attribute8 VARCHAR2(240),
60 attribute9 VARCHAR2(240),
61 attribute10 VARCHAR2(240),
62 attribute11 VARCHAR2(240),
63 attribute12 VARCHAR2(240),
64 attribute13 VARCHAR2(240),
65 attribute14 VARCHAR2(240),
66 attribute15 VARCHAR2(240),
67 attribute16 VARCHAR2(240),
68 attribute17 VARCHAR2(240),
69 attribute18 VARCHAR2(240),
70 attribute19 VARCHAR2(240),
71 attribute20 VARCHAR2(240),
72 attribute21 VARCHAR2(240),
73 attribute22 VARCHAR2(240),
74 attribute23 VARCHAR2(240),
75 attribute24 VARCHAR2(240),
76 attribute25 VARCHAR2(240),
77 attribute26 VARCHAR2(240),
78 attribute27 VARCHAR2(240),
79 attribute28 VARCHAR2(240),
80 attribute29 VARCHAR2(240),
81 attribute30 VARCHAR2(240)
82
83 );
84
85
86 /* Define Procedures And Functions : */
87
88 /*#
89 * Validates input
90 * This procedure checks input against various validations and
91 * will throw an exception if any validation fails.
92 * @param p_results_rec Record structure for Result
93 * @param x_return_status 'S'-Success, 'E'-Error, 'U'-Unexpected Error
94 * @rep:scope public
95 * @rep:lifecycle active
96 * @rep:displayname Validate Result Input Procedure
97 * @rep:compatibility S
98 */
99
100 PROCEDURE VALIDATE_INPUT
101 ( p_results_rec IN GMD_RESULTS_PUB.RESULTS_REC,
102 x_return_status OUT NOCOPY VARCHAR2
103 );
104
105 /*#
106 * Gets Result information
107 * @param p_results_rec Record structure for results
108 * @param x_tests_rec Record structure for tests
109 * @param x_samples_rec Record structure for samples
110 * @param x_return_status 'S'-Success, 'E'-Error, 'U'-Unexpected Error
111 * @rep:scope public
112 * @rep:lifecycle active
113 * @rep:displayname Get Result Information
114 * @rep:compatibility S
115 */
116
117 PROCEDURE GET_RESULT_INFO
118 ( p_results_rec IN GMD_RESULTS_PUB.RESULTS_REC,
119 x_tests_rec OUT NOCOPY GMD_QC_TESTS%ROWTYPE,
120 x_samples_rec OUT NOCOPY GMD_SAMPLES%ROWTYPE,
121 x_return_status OUT NOCOPY VARCHAR2
122 );
123
124
125 /*#
126 * records results
127 * @param p_api_version API version field
128 * @param p_init_msg_list Flag to check if message list is intialized
129 * @param p_commit Flag to check for commit
130 * @param p_validation_level For future use
131 * @param p_results_rec Record structure for Results
132 * @param p_user_name Login User Name
133 * @param x_results_rec Record structure for GMD results
134 * @param x_spec_results_rec Record structure for GMD specification results
135 * @param x_return_status 'S'-Success, 'E'-Error, 'U'-Unexpected Error
136 * @param x_msg_count Number of messages on message stack
137 * @param x_msg_data Actual message data on message stack
138 * @rep:scope public
139 * @rep:lifecycle active
140 * @rep:displayname Record Results
141 * @rep:compatibility S
142 */
143
144
145
146 PROCEDURE RECORD_RESULTS
147 ( p_api_version IN NUMBER
148 , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
149 , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
150 , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
151 , p_results_rec IN GMD_RESULTS_PUB.RESULTS_REC
152 , p_user_name IN VARCHAR2
153 , x_results_rec OUT NOCOPY GMD_RESULTS%ROWTYPE
154 , x_spec_results_rec OUT NOCOPY GMD_SPEC_RESULTS%ROWTYPE
155 , x_return_status OUT NOCOPY VARCHAR2
156 , x_msg_count OUT NOCOPY NUMBER
157 , x_msg_data OUT NOCOPY VARCHAR2
158 , p_user_responsibility_id IN NUMBER DEFAULT NULL /*NSRIVAST, INVCONV*/
159 );
160
161
162 /*#
163 * adds tests to the sample
164 * @param p_api_version API version field
165 * @param p_init_msg_list Flag to check if message list is intialized
166 * @param p_commit Flag to check for commit
167 * @param p_validation_level For future use
168 * @param p_user_name Login User Name
169 * @param p_sample_rec Record structure for Samples
170 * @param p_test_id_tab Table structure for Table IDs
171 * @param p_event_spec_disp_id Event spec disp ID
172 * @param x_results_tab Table structure for Results
173 * @param x_spec_results_tab Table structure for Specification Results
174 * @param x_return_status 'S'-Success, 'E'-Error, 'U'-Unexpected Error
175 * @param x_msg_count Number of messages on message stack
176 * @param x_msg_data Actual message data on message stack
177 * @rep:scope public
178 * @rep:lifecycle active
179 * @rep:displayname Add tests to sample
180 * @rep:compatibility S
181 */
182
183 PROCEDURE ADD_TESTS_TO_SAMPLE
184 (
185 p_api_version IN NUMBER
186 , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
187 , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
188 , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
189 , p_user_name IN VARCHAR2
190 , p_sample_rec IN GMD_SAMPLES%ROWTYPE
191 , p_test_id_tab IN GMD_API_PUB.number_tab
192 , p_event_spec_disp_id IN NUMBER
193 , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
194 , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
195 , x_return_status OUT NOCOPY VARCHAR2
196 , x_msg_count OUT NOCOPY NUMBER
197 , x_msg_data OUT NOCOPY VARCHAR2
198 );
199
200 END GMD_RESULTS_PUB;