eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.AHL_MEL_CDL_HEADERS_PVT_W

Source


1 package body ahl_mel_cdl_headers_pvt_w as
2   /* $Header: AHLWMEHB.pls 120.0 2005/07/04 03:56 tamdas noship $ */
3   procedure create_mel_cdl(p_api_version  NUMBER
4     , p_init_msg_list  VARCHAR2
5     , p_commit  VARCHAR2
6     , p_validation_level  NUMBER
7     , p_default  VARCHAR2
8     , p_module_type  VARCHAR2
9     , x_return_status out nocopy  VARCHAR2
10     , x_msg_count out nocopy  NUMBER
11     , x_msg_data out nocopy  VARCHAR2
12     , p9_a0 in out nocopy  NUMBER
13     , p9_a1 in out nocopy  NUMBER
14     , p9_a2 in out nocopy  NUMBER
15     , p9_a3 in out nocopy  VARCHAR2
16     , p9_a4 in out nocopy  VARCHAR2
17     , p9_a5 in out nocopy  VARCHAR2
18     , p9_a6 in out nocopy  VARCHAR2
19     , p9_a7 in out nocopy  VARCHAR2
20     , p9_a8 in out nocopy  NUMBER
21     , p9_a9 in out nocopy  DATE
22     , p9_a10 in out nocopy  DATE
23     , p9_a11 in out nocopy  VARCHAR2
24     , p9_a12 in out nocopy  VARCHAR2
25     , p9_a13 in out nocopy  VARCHAR2
26     , p9_a14 in out nocopy  VARCHAR2
27     , p9_a15 in out nocopy  VARCHAR2
28     , p9_a16 in out nocopy  VARCHAR2
29     , p9_a17 in out nocopy  VARCHAR2
30     , p9_a18 in out nocopy  VARCHAR2
31     , p9_a19 in out nocopy  VARCHAR2
32     , p9_a20 in out nocopy  VARCHAR2
33     , p9_a21 in out nocopy  VARCHAR2
34     , p9_a22 in out nocopy  VARCHAR2
35     , p9_a23 in out nocopy  VARCHAR2
36     , p9_a24 in out nocopy  VARCHAR2
37     , p9_a25 in out nocopy  VARCHAR2
38     , p9_a26 in out nocopy  VARCHAR2
39   )
40 
41   as
42     ddp_x_mel_cdl_header_rec ahl_mel_cdl_headers_pvt.header_rec_type;
43     ddindx binary_integer; indx binary_integer;
44   begin
45 
46     -- copy data to the local IN or IN-OUT args, if any
47 
48 
49 
50 
51 
52 
53 
54 
55 
56     ddp_x_mel_cdl_header_rec.mel_cdl_header_id := p9_a0;
57     ddp_x_mel_cdl_header_rec.object_version_number := p9_a1;
58     ddp_x_mel_cdl_header_rec.pc_node_id := p9_a2;
59     ddp_x_mel_cdl_header_rec.mel_cdl_type_code := p9_a3;
60     ddp_x_mel_cdl_header_rec.mel_cdl_type_meaning := p9_a4;
61     ddp_x_mel_cdl_header_rec.status_code := p9_a5;
62     ddp_x_mel_cdl_header_rec.status_meaning := p9_a6;
63     ddp_x_mel_cdl_header_rec.revision := p9_a7;
64     ddp_x_mel_cdl_header_rec.version_number := p9_a8;
65     ddp_x_mel_cdl_header_rec.revision_date := p9_a9;
66     ddp_x_mel_cdl_header_rec.expired_date := p9_a10;
67     ddp_x_mel_cdl_header_rec.attribute_category := p9_a11;
68     ddp_x_mel_cdl_header_rec.attribute1 := p9_a12;
69     ddp_x_mel_cdl_header_rec.attribute2 := p9_a13;
70     ddp_x_mel_cdl_header_rec.attribute3 := p9_a14;
71     ddp_x_mel_cdl_header_rec.attribute4 := p9_a15;
72     ddp_x_mel_cdl_header_rec.attribute5 := p9_a16;
73     ddp_x_mel_cdl_header_rec.attribute6 := p9_a17;
74     ddp_x_mel_cdl_header_rec.attribute7 := p9_a18;
75     ddp_x_mel_cdl_header_rec.attribute8 := p9_a19;
76     ddp_x_mel_cdl_header_rec.attribute9 := p9_a20;
77     ddp_x_mel_cdl_header_rec.attribute10 := p9_a21;
78     ddp_x_mel_cdl_header_rec.attribute11 := p9_a22;
79     ddp_x_mel_cdl_header_rec.attribute12 := p9_a23;
80     ddp_x_mel_cdl_header_rec.attribute13 := p9_a24;
81     ddp_x_mel_cdl_header_rec.attribute14 := p9_a25;
82     ddp_x_mel_cdl_header_rec.attribute15 := p9_a26;
83 
84     -- here's the delegated call to the old PL/SQL routine
85     ahl_mel_cdl_headers_pvt.create_mel_cdl(p_api_version,
86       p_init_msg_list,
87       p_commit,
88       p_validation_level,
89       p_default,
90       p_module_type,
91       x_return_status,
92       x_msg_count,
93       x_msg_data,
94       ddp_x_mel_cdl_header_rec);
95 
96     -- copy data back from the local variables to OUT or IN-OUT args, if any
97 
98 
99 
100 
101 
102 
103 
104 
105 
106     p9_a0 := ddp_x_mel_cdl_header_rec.mel_cdl_header_id;
107     p9_a1 := ddp_x_mel_cdl_header_rec.object_version_number;
108     p9_a2 := ddp_x_mel_cdl_header_rec.pc_node_id;
109     p9_a3 := ddp_x_mel_cdl_header_rec.mel_cdl_type_code;
110     p9_a4 := ddp_x_mel_cdl_header_rec.mel_cdl_type_meaning;
111     p9_a5 := ddp_x_mel_cdl_header_rec.status_code;
112     p9_a6 := ddp_x_mel_cdl_header_rec.status_meaning;
113     p9_a7 := ddp_x_mel_cdl_header_rec.revision;
114     p9_a8 := ddp_x_mel_cdl_header_rec.version_number;
115     p9_a9 := ddp_x_mel_cdl_header_rec.revision_date;
116     p9_a10 := ddp_x_mel_cdl_header_rec.expired_date;
117     p9_a11 := ddp_x_mel_cdl_header_rec.attribute_category;
118     p9_a12 := ddp_x_mel_cdl_header_rec.attribute1;
119     p9_a13 := ddp_x_mel_cdl_header_rec.attribute2;
120     p9_a14 := ddp_x_mel_cdl_header_rec.attribute3;
121     p9_a15 := ddp_x_mel_cdl_header_rec.attribute4;
122     p9_a16 := ddp_x_mel_cdl_header_rec.attribute5;
123     p9_a17 := ddp_x_mel_cdl_header_rec.attribute6;
124     p9_a18 := ddp_x_mel_cdl_header_rec.attribute7;
125     p9_a19 := ddp_x_mel_cdl_header_rec.attribute8;
126     p9_a20 := ddp_x_mel_cdl_header_rec.attribute9;
127     p9_a21 := ddp_x_mel_cdl_header_rec.attribute10;
128     p9_a22 := ddp_x_mel_cdl_header_rec.attribute11;
129     p9_a23 := ddp_x_mel_cdl_header_rec.attribute12;
130     p9_a24 := ddp_x_mel_cdl_header_rec.attribute13;
131     p9_a25 := ddp_x_mel_cdl_header_rec.attribute14;
132     p9_a26 := ddp_x_mel_cdl_header_rec.attribute15;
133   end;
134 
135   procedure update_mel_cdl(p_api_version  NUMBER
136     , p_init_msg_list  VARCHAR2
137     , p_commit  VARCHAR2
138     , p_validation_level  NUMBER
139     , p_default  VARCHAR2
140     , p_module_type  VARCHAR2
141     , x_return_status out nocopy  VARCHAR2
142     , x_msg_count out nocopy  NUMBER
143     , x_msg_data out nocopy  VARCHAR2
144     , p9_a0 in out nocopy  NUMBER
145     , p9_a1 in out nocopy  NUMBER
146     , p9_a2 in out nocopy  NUMBER
147     , p9_a3 in out nocopy  VARCHAR2
148     , p9_a4 in out nocopy  VARCHAR2
149     , p9_a5 in out nocopy  VARCHAR2
150     , p9_a6 in out nocopy  VARCHAR2
151     , p9_a7 in out nocopy  VARCHAR2
152     , p9_a8 in out nocopy  NUMBER
153     , p9_a9 in out nocopy  DATE
154     , p9_a10 in out nocopy  DATE
155     , p9_a11 in out nocopy  VARCHAR2
156     , p9_a12 in out nocopy  VARCHAR2
157     , p9_a13 in out nocopy  VARCHAR2
158     , p9_a14 in out nocopy  VARCHAR2
159     , p9_a15 in out nocopy  VARCHAR2
160     , p9_a16 in out nocopy  VARCHAR2
161     , p9_a17 in out nocopy  VARCHAR2
162     , p9_a18 in out nocopy  VARCHAR2
163     , p9_a19 in out nocopy  VARCHAR2
164     , p9_a20 in out nocopy  VARCHAR2
165     , p9_a21 in out nocopy  VARCHAR2
166     , p9_a22 in out nocopy  VARCHAR2
167     , p9_a23 in out nocopy  VARCHAR2
168     , p9_a24 in out nocopy  VARCHAR2
169     , p9_a25 in out nocopy  VARCHAR2
170     , p9_a26 in out nocopy  VARCHAR2
171   )
172 
173   as
174     ddp_x_mel_cdl_header_rec ahl_mel_cdl_headers_pvt.header_rec_type;
175     ddindx binary_integer; indx binary_integer;
176   begin
177 
178     -- copy data to the local IN or IN-OUT args, if any
179 
180 
181 
182 
183 
184 
185 
186 
187 
188     ddp_x_mel_cdl_header_rec.mel_cdl_header_id := p9_a0;
189     ddp_x_mel_cdl_header_rec.object_version_number := p9_a1;
190     ddp_x_mel_cdl_header_rec.pc_node_id := p9_a2;
191     ddp_x_mel_cdl_header_rec.mel_cdl_type_code := p9_a3;
192     ddp_x_mel_cdl_header_rec.mel_cdl_type_meaning := p9_a4;
193     ddp_x_mel_cdl_header_rec.status_code := p9_a5;
194     ddp_x_mel_cdl_header_rec.status_meaning := p9_a6;
195     ddp_x_mel_cdl_header_rec.revision := p9_a7;
196     ddp_x_mel_cdl_header_rec.version_number := p9_a8;
197     ddp_x_mel_cdl_header_rec.revision_date := p9_a9;
198     ddp_x_mel_cdl_header_rec.expired_date := p9_a10;
199     ddp_x_mel_cdl_header_rec.attribute_category := p9_a11;
200     ddp_x_mel_cdl_header_rec.attribute1 := p9_a12;
201     ddp_x_mel_cdl_header_rec.attribute2 := p9_a13;
202     ddp_x_mel_cdl_header_rec.attribute3 := p9_a14;
203     ddp_x_mel_cdl_header_rec.attribute4 := p9_a15;
204     ddp_x_mel_cdl_header_rec.attribute5 := p9_a16;
205     ddp_x_mel_cdl_header_rec.attribute6 := p9_a17;
206     ddp_x_mel_cdl_header_rec.attribute7 := p9_a18;
207     ddp_x_mel_cdl_header_rec.attribute8 := p9_a19;
208     ddp_x_mel_cdl_header_rec.attribute9 := p9_a20;
209     ddp_x_mel_cdl_header_rec.attribute10 := p9_a21;
210     ddp_x_mel_cdl_header_rec.attribute11 := p9_a22;
211     ddp_x_mel_cdl_header_rec.attribute12 := p9_a23;
212     ddp_x_mel_cdl_header_rec.attribute13 := p9_a24;
213     ddp_x_mel_cdl_header_rec.attribute14 := p9_a25;
214     ddp_x_mel_cdl_header_rec.attribute15 := p9_a26;
215 
216     -- here's the delegated call to the old PL/SQL routine
217     ahl_mel_cdl_headers_pvt.update_mel_cdl(p_api_version,
218       p_init_msg_list,
219       p_commit,
220       p_validation_level,
221       p_default,
222       p_module_type,
223       x_return_status,
224       x_msg_count,
225       x_msg_data,
226       ddp_x_mel_cdl_header_rec);
227 
228     -- copy data back from the local variables to OUT or IN-OUT args, if any
229 
230 
231 
232 
233 
234 
235 
236 
237 
238     p9_a0 := ddp_x_mel_cdl_header_rec.mel_cdl_header_id;
239     p9_a1 := ddp_x_mel_cdl_header_rec.object_version_number;
240     p9_a2 := ddp_x_mel_cdl_header_rec.pc_node_id;
241     p9_a3 := ddp_x_mel_cdl_header_rec.mel_cdl_type_code;
242     p9_a4 := ddp_x_mel_cdl_header_rec.mel_cdl_type_meaning;
243     p9_a5 := ddp_x_mel_cdl_header_rec.status_code;
244     p9_a6 := ddp_x_mel_cdl_header_rec.status_meaning;
245     p9_a7 := ddp_x_mel_cdl_header_rec.revision;
246     p9_a8 := ddp_x_mel_cdl_header_rec.version_number;
247     p9_a9 := ddp_x_mel_cdl_header_rec.revision_date;
248     p9_a10 := ddp_x_mel_cdl_header_rec.expired_date;
249     p9_a11 := ddp_x_mel_cdl_header_rec.attribute_category;
250     p9_a12 := ddp_x_mel_cdl_header_rec.attribute1;
251     p9_a13 := ddp_x_mel_cdl_header_rec.attribute2;
252     p9_a14 := ddp_x_mel_cdl_header_rec.attribute3;
253     p9_a15 := ddp_x_mel_cdl_header_rec.attribute4;
254     p9_a16 := ddp_x_mel_cdl_header_rec.attribute5;
255     p9_a17 := ddp_x_mel_cdl_header_rec.attribute6;
256     p9_a18 := ddp_x_mel_cdl_header_rec.attribute7;
257     p9_a19 := ddp_x_mel_cdl_header_rec.attribute8;
258     p9_a20 := ddp_x_mel_cdl_header_rec.attribute9;
259     p9_a21 := ddp_x_mel_cdl_header_rec.attribute10;
260     p9_a22 := ddp_x_mel_cdl_header_rec.attribute11;
261     p9_a23 := ddp_x_mel_cdl_header_rec.attribute12;
262     p9_a24 := ddp_x_mel_cdl_header_rec.attribute13;
263     p9_a25 := ddp_x_mel_cdl_header_rec.attribute14;
264     p9_a26 := ddp_x_mel_cdl_header_rec.attribute15;
265   end;
266 
267 end ahl_mel_cdl_headers_pvt_w;