[Home] [Help]
PACKAGE: APPS.PQH_GEN_FORM
Source
1 Package PQH_GEN_FORM AUTHID CURRENT_USER as
2 /* $Header: pqgnfnf.pkh 115.12 2002/11/27 23:43:50 rpasapul ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |-----------------------------< PQH_GEN_FORM >---------------------------------|
6 -- ----------------------------------------------------------------------------
7 -- {Start Of Comments}
8 --
9 -- Created by : Sanej Nair (SCNair)
10 --
11 -- Description:
12 -- This handles internal Generic form support functionalities.
13 --
14 -- Access Status:
15 -- Internal Use Only.
16 --
17 -- {End Of Comments}
18 -- ----------------------------------------------------------------------------
19 -- Version Date Author Comment
20 -- -------+-----------+--------------+----------------------------------------
21 -- 115.1 27-Feb-2000 Sanej Nair Initial Version
22 -- 115.10 28-jun-2001 Sanej Nair Added default value to match the package
23 -- body (bug 1857207)
24 -- 115.12 27-Nov-2002 rpasapul NOCOPY Changes.
25 -- ==========================================================================
26 g_count number;
27 g_msg varchar2(2000);
28
29 --
30 -- Define record and table
31 --
32 type v_type is record
33 ( column_alias varchar2(80),
34 ddf_column_name varchar2(80),
35 changeable_column_name varchar2(80));
36 type v_r_type is record
37 ( vset_id number(15),
38 code varchar2(255),
39 meaning varchar2(255));
40
41 type v_tab is table of v_type
42 index by binary_integer;
43 --
44 type v_t_tab is table of v_r_type
45 index by binary_integer;
46 --
47 -- define global PL/SQL table
48 --
49 g_attrib_tab v_tab;
50 g_vset_tab v_t_tab;
51 --
52 g_start_with pqh_copy_entity_txns.start_with%type;
53 g_initial_value pqh_copy_entity_results.information1%type;
54 --
55 g_context pqh_copy_entity_txns.context%type;
56 g_gbl_context pqh_copy_entity_txns.context%type;
57 g_txn_name pqh_transaction_categories.short_name%type ;
58 g_txn_id pqh_copy_entity_txns.copy_entity_txn_id%type;
59 --
60 c_information1 pqh_copy_entity_attribs.information1%type;
61 c_information2 pqh_copy_entity_attribs.information2%type;
62 c_information3 pqh_copy_entity_attribs.information3%type;
63 c_information4 pqh_copy_entity_attribs.information4%type;
64 c_information5 pqh_copy_entity_attribs.information5%type;
65 c_information6 pqh_copy_entity_attribs.information6%type;
66 c_information7 pqh_copy_entity_attribs.information7%type;
67 c_information8 pqh_copy_entity_attribs.information8%type;
68 c_information9 pqh_copy_entity_attribs.information9%type;
69 c_information10 pqh_copy_entity_attribs.information10%type;
70 c_information11 pqh_copy_entity_attribs.information11%type;
71 c_information12 pqh_copy_entity_attribs.information12%type;
72 c_information13 pqh_copy_entity_attribs.information13%type;
73 c_information14 pqh_copy_entity_attribs.information14%type;
74 c_information15 pqh_copy_entity_attribs.information15%type;
75 c_information16 pqh_copy_entity_attribs.information16%type;
76 c_information17 pqh_copy_entity_attribs.information17%type;
77 c_information18 pqh_copy_entity_attribs.information18%type;
78 c_information19 pqh_copy_entity_attribs.information19%type;
79 c_information20 pqh_copy_entity_attribs.information20%type;
80 c_information21 pqh_copy_entity_attribs.information21%type;
81 c_information22 pqh_copy_entity_attribs.information22%type;
82 c_information23 pqh_copy_entity_attribs.information23%type;
83 c_information24 pqh_copy_entity_attribs.information24%type;
84 c_information25 pqh_copy_entity_attribs.information25%type;
85 c_information26 pqh_copy_entity_attribs.information26%type;
86 c_information27 pqh_copy_entity_attribs.information27%type;
87 c_information28 pqh_copy_entity_attribs.information28%type;
88 c_information29 pqh_copy_entity_attribs.information29%type;
89 c_information30 pqh_copy_entity_attribs.information30%type;
90 --
91 k1_information1 pqh_copy_entity_attribs.information1%type;
92 k1_information2 pqh_copy_entity_attribs.information2%type;
93 k1_information3 pqh_copy_entity_attribs.information3%type;
94 k1_information4 pqh_copy_entity_attribs.information4%type;
95 k1_information5 pqh_copy_entity_attribs.information5%type;
96 k1_information6 pqh_copy_entity_attribs.information6%type;
97 k1_information7 pqh_copy_entity_attribs.information7%type;
98 k1_information8 pqh_copy_entity_attribs.information8%type;
99 k1_information9 pqh_copy_entity_attribs.information9%type;
100 k1_information10 pqh_copy_entity_attribs.information10%type;
101 k1_information11 pqh_copy_entity_attribs.information11%type;
102 k1_information12 pqh_copy_entity_attribs.information12%type;
103 k1_information13 pqh_copy_entity_attribs.information13%type;
104 k1_information14 pqh_copy_entity_attribs.information14%type;
105 k1_information15 pqh_copy_entity_attribs.information15%type;
106 k1_information16 pqh_copy_entity_attribs.information16%type;
107 k1_information17 pqh_copy_entity_attribs.information17%type;
108 k1_information18 pqh_copy_entity_attribs.information18%type;
109 k1_information19 pqh_copy_entity_attribs.information19%type;
110 k1_information20 pqh_copy_entity_attribs.information20%type;
111 k1_information21 pqh_copy_entity_attribs.information21%type;
112 k1_information22 pqh_copy_entity_attribs.information22%type;
113 k1_information23 pqh_copy_entity_attribs.information23%type;
114 k1_information24 pqh_copy_entity_attribs.information24%type;
115 k1_information25 pqh_copy_entity_attribs.information25%type;
116 k1_information26 pqh_copy_entity_attribs.information26%type;
117 k1_information27 pqh_copy_entity_attribs.information27%type;
118 k1_information28 pqh_copy_entity_attribs.information28%type;
119 k1_information29 pqh_copy_entity_attribs.information29%type;
120 k1_information30 pqh_copy_entity_attribs.information30%type;
121 --
122 k2_information1 pqh_copy_entity_attribs.information1%type;
123 k2_information2 pqh_copy_entity_attribs.information2%type;
124 k2_information3 pqh_copy_entity_attribs.information3%type;
125 k2_information4 pqh_copy_entity_attribs.information4%type;
126 k2_information5 pqh_copy_entity_attribs.information5%type;
127 k2_information6 pqh_copy_entity_attribs.information6%type;
128 k2_information7 pqh_copy_entity_attribs.information7%type;
129 k2_information8 pqh_copy_entity_attribs.information8%type;
130 k2_information9 pqh_copy_entity_attribs.information9%type;
131 k2_information10 pqh_copy_entity_attribs.information10%type;
132 k2_information11 pqh_copy_entity_attribs.information11%type;
133 k2_information12 pqh_copy_entity_attribs.information12%type;
134 k2_information13 pqh_copy_entity_attribs.information13%type;
135 k2_information14 pqh_copy_entity_attribs.information14%type;
136 k2_information15 pqh_copy_entity_attribs.information15%type;
137 k2_information16 pqh_copy_entity_attribs.information16%type;
138 k2_information17 pqh_copy_entity_attribs.information17%type;
139 k2_information18 pqh_copy_entity_attribs.information18%type;
140 k2_information19 pqh_copy_entity_attribs.information19%type;
141 k2_information20 pqh_copy_entity_attribs.information20%type;
142 k2_information21 pqh_copy_entity_attribs.information21%type;
143 k2_information22 pqh_copy_entity_attribs.information22%type;
144 k2_information23 pqh_copy_entity_attribs.information23%type;
145 k2_information24 pqh_copy_entity_attribs.information24%type;
146 k2_information25 pqh_copy_entity_attribs.information25%type;
147 k2_information26 pqh_copy_entity_attribs.information26%type;
148 k2_information27 pqh_copy_entity_attribs.information27%type;
149 k2_information28 pqh_copy_entity_attribs.information28%type;
150 k2_information29 pqh_copy_entity_attribs.information29%type;
151 k2_information30 pqh_copy_entity_attribs.information30%type;
152 --
153 g_information1 pqh_copy_entity_results.information1%type;
154 g_information2 pqh_copy_entity_results.information2%type;
155 g_information3 pqh_copy_entity_results.information3%type;
156 g_information4 pqh_copy_entity_results.information4%type;
157 g_information5 pqh_copy_entity_results.information5%type;
158 g_information6 pqh_copy_entity_results.information6%type;
159 g_information7 pqh_copy_entity_results.information7%type;
160 g_information8 pqh_copy_entity_results.information8%type;
161 g_information9 pqh_copy_entity_results.information9%type;
162 g_information10 pqh_copy_entity_results.information10%type;
163 g_information11 pqh_copy_entity_results.information11%type;
164 g_information12 pqh_copy_entity_results.information12%type;
165 g_information13 pqh_copy_entity_results.information13%type;
166 g_information14 pqh_copy_entity_results.information14%type;
167 g_information15 pqh_copy_entity_results.information15%type;
168 g_information16 pqh_copy_entity_results.information16%type;
169 g_information17 pqh_copy_entity_results.information17%type;
170 g_information18 pqh_copy_entity_results.information18%type;
171 g_information19 pqh_copy_entity_results.information19%type;
172 g_information20 pqh_copy_entity_results.information20%type;
173 g_information21 pqh_copy_entity_results.information21%type;
174 g_information22 pqh_copy_entity_results.information22%type;
175 g_information23 pqh_copy_entity_results.information23%type;
176 g_information24 pqh_copy_entity_results.information24%type;
177 g_information25 pqh_copy_entity_results.information25%type;
178 g_information26 pqh_copy_entity_results.information26%type;
179 g_information27 pqh_copy_entity_results.information27%type;
180 g_information28 pqh_copy_entity_results.information28%type;
181 g_information29 pqh_copy_entity_results.information29%type;
182 g_information30 pqh_copy_entity_results.information30%type;
183 g_information31 pqh_copy_entity_results.information31%type;
184 g_information32 pqh_copy_entity_results.information32%type;
185 g_information33 pqh_copy_entity_results.information33%type;
186 g_information34 pqh_copy_entity_results.information34%type;
187 g_information35 pqh_copy_entity_results.information35%type;
188 g_information36 pqh_copy_entity_results.information36%type;
189 g_information37 pqh_copy_entity_results.information37%type;
190 g_information38 pqh_copy_entity_results.information38%type;
191 g_information39 pqh_copy_entity_results.information39%type;
192 g_information40 pqh_copy_entity_results.information40%type;
193 g_information41 pqh_copy_entity_results.information41%type;
194 g_information42 pqh_copy_entity_results.information42%type;
195 g_information43 pqh_copy_entity_results.information43%type;
196 g_information44 pqh_copy_entity_results.information44%type;
197 g_information45 pqh_copy_entity_results.information46%type;
198 g_information46 pqh_copy_entity_results.information46%type;
199 g_information47 pqh_copy_entity_results.information47%type;
200 g_information48 pqh_copy_entity_results.information48%type;
201 g_information49 pqh_copy_entity_results.information49%type;
202 g_information50 pqh_copy_entity_results.information50%type;
203 g_information51 pqh_copy_entity_results.information51%type;
204 g_information52 pqh_copy_entity_results.information52%type;
205 g_information53 pqh_copy_entity_results.information53%type;
206 g_information54 pqh_copy_entity_results.information54%type;
207 g_information55 pqh_copy_entity_results.information55%type;
208 g_information56 pqh_copy_entity_results.information56%type;
209 g_information57 pqh_copy_entity_results.information57%type;
210 g_information58 pqh_copy_entity_results.information58%type;
211 g_information59 pqh_copy_entity_results.information59%type;
212 g_information60 pqh_copy_entity_results.information60%type;
213 g_information61 pqh_copy_entity_results.information61%type;
214 g_information62 pqh_copy_entity_results.information62%type;
215 g_information63 pqh_copy_entity_results.information63%type;
216 g_information64 pqh_copy_entity_results.information64%type;
217 g_information65 pqh_copy_entity_results.information65%type;
218 g_information66 pqh_copy_entity_results.information66%type;
219 g_information67 pqh_copy_entity_results.information67%type;
220 g_information68 pqh_copy_entity_results.information68%type;
221 g_information69 pqh_copy_entity_results.information69%type;
222 g_information70 pqh_copy_entity_results.information70%type;
223 g_information71 pqh_copy_entity_results.information71%type;
224 g_information72 pqh_copy_entity_results.information72%type;
225 g_information73 pqh_copy_entity_results.information73%type;
226 g_information74 pqh_copy_entity_results.information74%type;
227 g_information75 pqh_copy_entity_results.information75%type;
228 g_information76 pqh_copy_entity_results.information76%type;
229 g_information77 pqh_copy_entity_results.information77%type;
230 g_information78 pqh_copy_entity_results.information78%type;
231 g_information79 pqh_copy_entity_results.information79%type;
232 g_information80 pqh_copy_entity_results.information80%type;
233 g_information81 pqh_copy_entity_results.information81%type;
234 g_information82 pqh_copy_entity_results.information82%type;
235 g_information83 pqh_copy_entity_results.information83%type;
236 g_information84 pqh_copy_entity_results.information84%type;
237 g_information85 pqh_copy_entity_results.information85%type;
238 g_information86 pqh_copy_entity_results.information86%type;
239 g_information87 pqh_copy_entity_results.information87%type;
240 g_information88 pqh_copy_entity_results.information88%type;
241 g_information89 pqh_copy_entity_results.information89%type;
242 g_information90 pqh_copy_entity_results.information90%type;
243 g_information91 pqh_copy_entity_results.information91%type;
244 g_information92 pqh_copy_entity_results.information92%type;
245 g_information93 pqh_copy_entity_results.information93%type;
246 g_information94 pqh_copy_entity_results.information94%type;
247 g_information95 pqh_copy_entity_results.information95%type;
248 g_information96 pqh_copy_entity_results.information96%type;
249 g_information97 pqh_copy_entity_results.information97%type;
250 g_information98 pqh_copy_entity_results.information98%type;
251 g_information99 pqh_copy_entity_results.information99%type;
252 g_information100 pqh_copy_entity_results.information100%type;
253 g_information101 pqh_copy_entity_results.information101%type;
254 g_information102 pqh_copy_entity_results.information102%type;
255 g_information103 pqh_copy_entity_results.information103%type;
256 g_information104 pqh_copy_entity_results.information104%type;
257 g_information105 pqh_copy_entity_results.information105%type;
258 g_information106 pqh_copy_entity_results.information106%type;
259 g_information107 pqh_copy_entity_results.information107%type;
260 g_information108 pqh_copy_entity_results.information108%type;
261 g_information109 pqh_copy_entity_results.information109%type;
262 g_information110 pqh_copy_entity_results.information110%type;
263 g_information111 pqh_copy_entity_results.information111%type;
264 g_information112 pqh_copy_entity_results.information112%type;
265 g_information113 pqh_copy_entity_results.information113%type;
266 g_information114 pqh_copy_entity_results.information114%type;
267 g_information115 pqh_copy_entity_results.information115%type;
271 g_information119 pqh_copy_entity_results.information119%type;
268 g_information116 pqh_copy_entity_results.information116%type;
269 g_information117 pqh_copy_entity_results.information117%type;
270 g_information118 pqh_copy_entity_results.information118%type;
272 g_information120 pqh_copy_entity_results.information120%type;
273 g_information121 pqh_copy_entity_results.information121%type;
274 g_information122 pqh_copy_entity_results.information122%type;
275 g_information123 pqh_copy_entity_results.information123%type;
276 g_information124 pqh_copy_entity_results.information124%type;
277 g_information125 pqh_copy_entity_results.information125%type;
278 g_information126 pqh_copy_entity_results.information126%type;
279 g_information127 pqh_copy_entity_results.information127%type;
280 g_information128 pqh_copy_entity_results.information128%type;
281 g_information129 pqh_copy_entity_results.information129%type;
282 g_information130 pqh_copy_entity_results.information130%type;
283 g_information131 pqh_copy_entity_results.information131%type;
284 g_information132 pqh_copy_entity_results.information132%type;
285 g_information133 pqh_copy_entity_results.information133%type;
286 g_information134 pqh_copy_entity_results.information134%type;
287 g_information135 pqh_copy_entity_results.information135%type;
288 g_information136 pqh_copy_entity_results.information136%type;
289 g_information137 pqh_copy_entity_results.information137%type;
290 g_information138 pqh_copy_entity_results.information138%type;
291 g_information139 pqh_copy_entity_results.information139%type;
292 g_information140 pqh_copy_entity_results.information140%type;
293 g_information141 pqh_copy_entity_results.information141%type;
294 g_information142 pqh_copy_entity_results.information142%type;
295 g_information143 pqh_copy_entity_results.information143%type;
296 g_information144 pqh_copy_entity_results.information144%type;
297 g_information145 pqh_copy_entity_results.information145%type;
298 g_information146 pqh_copy_entity_results.information146%type;
299 g_information147 pqh_copy_entity_results.information147%type;
300 g_information148 pqh_copy_entity_results.information148%type;
301 g_information149 pqh_copy_entity_results.information149%type;
302 g_information150 pqh_copy_entity_results.information150%type;
303 g_information151 pqh_copy_entity_results.information151%type;
304 g_information152 pqh_copy_entity_results.information152%type;
305 g_information153 pqh_copy_entity_results.information153%type;
306 g_information154 pqh_copy_entity_results.information154%type;
307 g_information155 pqh_copy_entity_results.information155%type;
308 g_information156 pqh_copy_entity_results.information156%type;
309 g_information157 pqh_copy_entity_results.information157%type;
310 g_information158 pqh_copy_entity_results.information158%type;
311 g_information159 pqh_copy_entity_results.information159%type;
312 g_information160 pqh_copy_entity_results.information160%type;
313 g_information161 pqh_copy_entity_results.information161%type;
314 g_information162 pqh_copy_entity_results.information162%type;
315 g_information163 pqh_copy_entity_results.information163%type;
316 g_information164 pqh_copy_entity_results.information164%type;
317 g_information165 pqh_copy_entity_results.information165%type;
318 g_information166 pqh_copy_entity_results.information166%type;
319 g_information167 pqh_copy_entity_results.information167%type;
320 g_information168 pqh_copy_entity_results.information168%type;
321 g_information169 pqh_copy_entity_results.information169%type;
322 g_information170 pqh_copy_entity_results.information170%type;
323 g_information171 pqh_copy_entity_results.information171%type;
324 g_information172 pqh_copy_entity_results.information172%type;
325 g_information173 pqh_copy_entity_results.information173%type;
326 g_information174 pqh_copy_entity_results.information174%type;
327 g_information175 pqh_copy_entity_results.information175%type;
328 g_information176 pqh_copy_entity_results.information176%type;
329 g_information177 pqh_copy_entity_results.information177%type;
330 g_information178 pqh_copy_entity_results.information178%type;
331 g_information179 pqh_copy_entity_results.information179%type;
332 g_information180 pqh_copy_entity_results.information180%type;
333
334 g_v_id varchar2(2000);
335 g_v_value varchar2(2000);
336 --
337 -- Procedure to retrive number of records likey to be retrived / create source records
338 --
339 procedure create_source ( p_copy_entity_txn_id number
340 , p_delimiter varchar2
341 , p_copies number default 1
342 , p_msg out nocopy varchar2);
343 --
344 procedure count_source ( p_copy_entity_txn_id number
345 , p_delimiter varchar2
346 , p_count out nocopy number
347 , p_msg out nocopy varchar2);
348 --
349 procedure recount_source ( p_copy_entity_txn_id number
350 , p_delimiter varchar2
351 , p_count out nocopy number
352 , p_msg out nocopy varchar2);
353 --
354 procedure update_source (p_copy_entity_result_id number
355 , p_count number
359 , p_ld1 varchar2 --delimiter1
356 , p_object_version_number in out nocopy number );
357 --
358 Procedure create_target ( p_copy_entity_txn_id number
360 , p_lf1 varchar2 default null --flex_code1
361 , p_ln1 varchar2 default null --flex numb1
362 , p_ld2 varchar2 default null --delimiter2
363 , p_lf2 varchar2 default null --flex_code2
364 , p_ln2 varchar2 default null --flex numb1
365 , p_batch_status out nocopy varchar2 ) ;
366 --
367 function get_sql_from_vset_id(p_vset_id in number,
368 p_add_where_clause in varchar2 default null,
369 p_where_on_id in boolean default false ) return varchar2;
370 --
371 function get_value_from_id(p_id in varchar2,
372 p_vset_id in varchar2) return varchar2 ;
373 --
374 function get_id_from_value(p_value in varchar2,
375 p_vset_id in varchar2) return varchar2 ;
376 --
377 function populate_prefs(p_copy_entity_txn_id in number
378 , p_transaction_category_id in number ) return boolean;
379 --
380 function get_legislation_code (p_business_group_id in varchar2) return varchar2;
381 --
382 function get_alr(p_application_id in number
383 ,p_responsibility_id in number
384 ,p_business_group_id in varchar2
385 ,p_transaction_short_name in varchar2
386 ,p_application_short_name out nocopy varchar2
387 ,p_legislation_code out nocopy varchar2
388 ,p_responsibility_key out nocopy varchar2
389 ,p_gbl_context out nocopy varchar2 ) return varchar2 ;
390 --
391 procedure populate_context(p_copy_entity_txn_id in number);
392 --
393 procedure chk_transaction_category (p_short_name in out nocopy varchar2,
394 p_transaction_category_id in out nocopy varchar2,
395 p_transaction_id in varchar2,
396 p_member_cd out nocopy varchar2,
397 p_name out nocopy varchar2);
398 --
399 function get_transaction_type (p_transaction_category_id in number
400 , p_context in varchar2) return varchar2;
401 --
402 function my_con return varchar2;
403 --
404 function get_look (p_code in varchar2) return varchar2;
405 --
406 function kf(p_string in varchar2 ,
407 p_delimiter in varchar2 ) return varchar2;
408 --
409 procedure delete_source (p_validate in boolean
410 , p_copy_entity_result_id in number
411 , p_object_version_number in number
412 , p_effective_date in date);
413 --
414 procedure flip_selection (p_mode in varchar2,
415 p_copy_entity_txn_id in number ,
416 p_copy_entity_result_id in number default null ,
417 p_block in varchar2 default 'SOURCE',
418 p_select_value in varchar2 ) ;
419 --
420 function check_id_flex_struct ( p_id_flex_code in varchar2,
421 p_id_flex_num in number ) return boolean ;
422 --
423 function context_bg return varchar2;
424 --
425 procedure set_txn_id (p_txn_id in number);
426 --
427 procedure set_dt (p_dt_mode in varchar2, p_dt_desc in varchar2);
428 --
429 function check_valueset_type (p_valueset_id in varchar2) return varchar2 ;
430 --
431 function get_segment(p_col in varchar2) return varchar2;
432 --
433 END PQH_GEN_FORM;