1 PACKAGE QA_Result_GRP AUTHID CURRENT_USER AS
2 /* $Header: qltgresb.pls 120.3.12000000.1 2007/01/19 07:15:46 appldev ship $*/
3 --
4 -- API name : QA_Result_GRP.Purge
5 --
6 -- Type : Group.
7 --
8 -- Function : This API serves to delete Quality Results for
9 -- given collection id
10 --
11 -- Pre-reqs : None.
12 --
13 -- Parameters :
14 --
15 -- IN : p_api_version IN NUMBER Required
16 -- (specify the version number here, see below)
17 -- p_init_msg_list IN VARCHAR2 Optional
18 -- Default = FND_API.G_FALSE
19 -- p_commit IN VARCHAR2 Optional
20 -- Default = FND_API.G_FALSE
21 -- p_validation_level IN NUMBER Optional
22 -- Default = FND_API.G_VALID_LEVEL_FULL
23 -- p_collection_id
24 --
25 -- OUT : p_return_status OUT VARCHAR2(1)
26 -- ('S' - success,
27 -- 'E' - error,
28 -- 'U' - unexpecte error)
29 -- p_msg_count OUT NUMBER
30 -- (number of error message on the stack)
31 -- p_msg_data OUT VARCHAR2(2000)
32 -- (return the first messsage on the stack)
33 --
34 -- Version : Current version 1.0
35 -- previous version None
36 -- Initial version 1.0
37 --
38 -- Notes :
39 --
40
41 PROCEDURE Purge
42 ( p_api_version IN NUMBER ,
43 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
44 p_commit IN VARCHAR2 := FND_API.G_FALSE ,
45 p_validation_level IN NUMBER :=
46 FND_API.G_VALID_LEVEL_FULL ,
47 p_collection_id IN NUMBER ,
48 p_return_status OUT NOCOPY VARCHAR2 ,
49 p_msg_count OUT NOCOPY NUMBER ,
50 p_msg_data OUT NOCOPY VARCHAR2
51 );
52
53
54 -- API name : QA_Result_GRP.Enable
55 --
56 -- Type : Group.
57 --
58 -- Function : This API serves to enable the Quality Results for
59 -- given collection id by updating the status
60 --
61 -- Pre-reqs : None.
62 --
63 -- Parameters :
64 --
65 -- IN : p_api_version IN NUMBER Required
66 -- p_init_msg_list IN VARCHAR2 Optional
67 -- Default = FND_API.G_FALSE
68 -- p_commit IN VARCHAR2 Optional
69 -- Default = FND_API.G_FALSE
70 -- p_validation_level IN NUMBER Optional
71 -- Default = FND_API.G_VALID_LEVEL_FULL
72 -- p_collection_id
73 -- p_incident_id IN NUMBER DEFAULT NULL
74 --
75 -- OUT : p_return_status OUT VARCHAR2(1)
76 -- p_msg_count OUT NUMBER
77 -- p_msg_data OUT VARCHAR2(2000)
78 --
79 -- Version : Current version 1.0
80 -- previous version None
81 -- Initial version 1.0
82 --
83 -- Notes :
84 --
85
86 --
87 -- Added the new parameter p_incident_id for Service Request Enhancements Project
88 -- Default value is null for backward compatibility
89 -- rkunchal Tue Sep 3 10:20:12 PDT 2002
90 --
91 PROCEDURE Enable
92 ( p_api_version IN NUMBER ,
93 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
94 p_commit IN VARCHAR2 := FND_API.G_FALSE ,
95 p_validation_level IN NUMBER :=
96 FND_API.G_VALID_LEVEL_FULL ,
97 p_collection_id IN NUMBER ,
98 p_return_status OUT NOCOPY VARCHAR2 ,
99 p_msg_count OUT NOCOPY NUMBER ,
100 p_msg_data OUT NOCOPY VARCHAR2 ,
101 p_incident_id IN NUMBER DEFAULT NULL
102 );
103
104 PROCEDURE Enable_QA_Results ( X_Txn_Header_ID Number,
105 P_MSG_COUNT IN OUT NOCOPY Number );
106
107 -- Start R12 EAM Integration. Bug 4345492
108 PROCEDURE enable_and_fire_action (
109 p_api_version IN NUMBER,
110 p_init_msg_list IN VARCHAR2 := NULL,
111 p_commit IN VARCHAR2 := NULL,
112 p_validation_level IN NUMBER := NULL,
113 p_collection_id IN NUMBER,
114 x_return_status OUT NOCOPY VARCHAR2,
115 x_msg_count OUT NOCOPY NUMBER,
116 x_msg_data OUT NOCOPY VARCHAR2);
117 -- End R12 EAM Integration. Bug 4345492
118
119 -- R12 ERES Support in Service Family. Bug 4345768 Start
120 -- Record Type to store Quality Events and E-Rcord IDs
121 -- This will be used by parent teams to retrieve the E-Record IDs
122 -- and pass the same as child E-Records for the parent Events
123 -- when Quality E-Records are captured as part of the parent Txn
124 -- This would be used primarily by the SR team for R12.
125 TYPE qa_erecord_rec_type IS RECORD
126 (
127 event_name EDR_PSIG_DOCUMENTS.EVENT_NAME%TYPE,
128 event_key EDR_PSIG_DOCUMENTS.EVENT_KEY%TYPE,
129 erec_id EDR_PSIG_DOCUMENTS.DOCUMENT_ID%TYPE
130 );
131
132 TYPE qa_erecord_tbl_type IS TABLE OF qa_erecord_rec_type
133 INDEX BY BINARY_INTEGER;
134
135 -- API to retrieve the Quality Results E-Records captured as
136 -- part of a Transaction session ( collection )
137 -- The E-Record IDs are returned as part of the x_qa_erecord_tbl
138 -- output parameter.
139 PROCEDURE get_qa_results_erecords
140 (
141 p_api_version IN NUMBER ,
142 p_init_msg_list IN VARCHAR2 := NULL ,
143 p_commit IN VARCHAR2 := NULL ,
144 p_validation_level IN NUMBER := NULL ,
145 p_collection_id IN NUMBER ,
146 x_qa_erecord_tbl OUT NOCOPY qa_erecord_tbl_type ,
147 x_return_status OUT NOCOPY VARCHAR2 ,
148 x_msg_count OUT NOCOPY NUMBER ,
149 x_msg_data OUT NOCOPY VARCHAR2
150 );
151
152 -- API to enable the Quality Results captured as part of the
153 -- Transaction session ( collection ). This API will call the existing
154 -- enable API to enable the results and fire background quality actions
155 -- in addition to invoking EDR API to stamp the acknowledgement status
156 -- of the Quality E-Records captured as part of the Txn as SUCCESS
157 PROCEDURE enable_results_erecords
158 (
159 p_api_version IN NUMBER ,
160 p_init_msg_list IN VARCHAR2 := NULL ,
161 p_commit IN VARCHAR2 := NULL ,
162 p_validation_level IN NUMBER := NULL ,
163 p_collection_id IN NUMBER ,
164 p_incident_id IN NUMBER := NULL,
165 x_return_status OUT NOCOPY VARCHAR2 ,
166 x_msg_count OUT NOCOPY NUMBER ,
167 x_msg_data OUT NOCOPY VARCHAR2
168 );
169
170 -- API to purge the Quality Results captured as part of the
171 -- Transaction session ( collection ). This API will call the existing
172 -- purge API to delete the results in addition to invoking EDR API to
173 -- stamp the acknowledgement status of the Quality E-Records captured
174 -- as part of the Txn as SUCCESS
175 PROCEDURE purge_results_erecords
176 (
177 p_api_version IN NUMBER ,
178 p_init_msg_list IN VARCHAR2 := NULL ,
179 p_commit IN VARCHAR2 := NULL ,
180 p_validation_level IN NUMBER := NULL ,
181 p_collection_id IN NUMBER ,
182 x_return_status OUT NOCOPY VARCHAR2 ,
183 x_msg_count OUT NOCOPY NUMBER ,
184 x_msg_data OUT NOCOPY VARCHAR2
185 );
186 -- R12 ERES Support in Service Family. Bug 4345768 End
187
188 -- Bug 5508639. SHKALYAN 13-Sep-2006.
189 -- new API to delete the old invalid results For a collection_id
190 PROCEDURE purge_invalid_results
191 (
192 p_collection_id IN NUMBER
193 );
194 END;