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_RM_ROUTE_PVT_W

Source


1 package body ahl_rm_route_pvt_w as
2   /* $Header: AHLWROMB.pls 120.5.12020000.2 2012/12/14 05:59:22 shnatu ship $ */
3   rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4   rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5   rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6   rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7 
8   -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9   function rosetta_g_miss_date_in_map(d date) return date as
10   begin
11     if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12     if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13     return d;
14   end;
15 
16   procedure process_route(p_api_version  NUMBER
17     , p_init_msg_list  VARCHAR2
18     , p_commit  VARCHAR2
19     , p_validation_level  NUMBER
20     , p_default  VARCHAR2
21     , p_module_type  VARCHAR2
22     , x_return_status out nocopy  VARCHAR2
23     , x_msg_count out nocopy  NUMBER
24     , x_msg_data out nocopy  VARCHAR2
25     , p9_a0 in out nocopy  NUMBER
26     , p9_a1 in out nocopy  NUMBER
27     , p9_a2 in out nocopy  VARCHAR2
28     , p9_a3 in out nocopy  VARCHAR2
29     , p9_a4 in out nocopy  VARCHAR2
30     , p9_a5 in out nocopy  VARCHAR2
31     , p9_a6 in out nocopy  VARCHAR2
32     , p9_a7 in out nocopy  VARCHAR2
33     , p9_a8 in out nocopy  VARCHAR2
34     , p9_a9 in out nocopy  VARCHAR2
35     , p9_a10 in out nocopy  DATE
36     , p9_a11 in out nocopy  NUMBER
37     , p9_a12 in out nocopy  VARCHAR2
38     , p9_a13 in out nocopy  VARCHAR2
39     , p9_a14 in out nocopy  VARCHAR2
40     , p9_a15 in out nocopy  VARCHAR2
41     , p9_a16 in out nocopy  VARCHAR2
42     , p9_a17 in out nocopy  VARCHAR2
43     , p9_a18 in out nocopy  VARCHAR2
44     , p9_a19 in out nocopy  VARCHAR2
45     , p9_a20 in out nocopy  NUMBER
46     , p9_a21 in out nocopy  VARCHAR2
47     , p9_a22 in out nocopy  VARCHAR2
48     , p9_a23 in out nocopy  VARCHAR2
49     , p9_a24 in out nocopy  VARCHAR2
50     , p9_a25 in out nocopy  VARCHAR2
51     , p9_a26 in out nocopy  NUMBER
52     , p9_a27 in out nocopy  NUMBER
53     , p9_a28 in out nocopy  VARCHAR2
54     , p9_a29 in out nocopy  VARCHAR2
55     , p9_a30 in out nocopy  NUMBER
56     , p9_a31 in out nocopy  VARCHAR2
57     , p9_a32 in out nocopy  NUMBER
58     , p9_a33 in out nocopy  VARCHAR2
59     , p9_a34 in out nocopy  VARCHAR2
60     , p9_a35 in out nocopy  VARCHAR2
61     , p9_a36 in out nocopy  NUMBER
62     , p9_a37 in out nocopy  DATE
63     , p9_a38 in out nocopy  DATE
64     , p9_a39 in out nocopy  NUMBER
65     , p9_a40 in out nocopy  VARCHAR2
66     , p9_a41 in out nocopy  VARCHAR2
67     , p9_a42 in out nocopy  VARCHAR2
68     , p9_a43 in out nocopy  VARCHAR2
69     , p9_a44 in out nocopy  NUMBER
70     , p9_a45 in out nocopy  VARCHAR2
71     , p9_a46 in out nocopy  VARCHAR2
72     , p9_a47 in out nocopy  VARCHAR2
73     , p9_a48 in out nocopy  VARCHAR2
74     , p9_a49 in out nocopy  VARCHAR2
75     , p9_a50 in out nocopy  VARCHAR2
76     , p9_a51 in out nocopy  VARCHAR2
77     , p9_a52 in out nocopy  VARCHAR2
78     , p9_a53 in out nocopy  VARCHAR2
79     , p9_a54 in out nocopy  VARCHAR2
80     , p9_a55 in out nocopy  VARCHAR2
81     , p9_a56 in out nocopy  VARCHAR2
82     , p9_a57 in out nocopy  VARCHAR2
83     , p9_a58 in out nocopy  VARCHAR2
84     , p9_a59 in out nocopy  VARCHAR2
85     , p9_a60 in out nocopy  VARCHAR2
86     , p9_a61 in out nocopy  VARCHAR2
87     , p9_a62 in out nocopy  VARCHAR2
88     , p9_a63 in out nocopy  VARCHAR2
89     , p9_a64 in out nocopy  VARCHAR2
90     , p9_a65 in out nocopy  VARCHAR2
91     , p9_a66 in out nocopy  VARCHAR2
92     , p9_a67 in out nocopy  VARCHAR2
93     , p9_a68 in out nocopy  VARCHAR2
94     , p9_a69 in out nocopy  VARCHAR2
95     , p9_a70 in out nocopy  VARCHAR2
96     , p9_a71 in out nocopy  VARCHAR2
97     , p9_a72 in out nocopy  VARCHAR2
98     , p9_a73 in out nocopy  VARCHAR2
99     , p9_a74 in out nocopy  VARCHAR2
100     , p9_a75 in out nocopy  VARCHAR2
101     , p9_a76 in out nocopy  VARCHAR2
102     , p9_a77 in out nocopy  VARCHAR2
103     , p9_a78 in out nocopy  VARCHAR2
104     , p9_a79 in out nocopy  VARCHAR2
105     , p9_a80 in out nocopy  VARCHAR2
106     , p9_a81 in out nocopy  DATE
107     , p9_a82 in out nocopy  NUMBER
108     , p9_a83 in out nocopy  DATE
109     , p9_a84 in out nocopy  NUMBER
110     , p9_a85 in out nocopy  NUMBER
111     , p9_a86 in out nocopy  VARCHAR2
112   )
113 
114   as
115     ddp_x_route_rec ahl_rm_route_pvt.route_rec_type;
116     ddindx binary_integer; indx binary_integer;
117   begin
118 
119     -- copy data to the local IN or IN-OUT args, if any
120 
121 
122 
123 
124 
125 
126 
127 
128 
129     ddp_x_route_rec.route_id := p9_a0;
130     ddp_x_route_rec.object_version_number := p9_a1;
131     ddp_x_route_rec.route_no := p9_a2;
132     ddp_x_route_rec.title := p9_a3;
133     ddp_x_route_rec.route_type_code := p9_a4;
134     ddp_x_route_rec.route_type := p9_a5;
135     ddp_x_route_rec.model_code := p9_a6;
136     ddp_x_route_rec.model_meaning := p9_a7;
137     ddp_x_route_rec.enigma_doc_id := p9_a8;
138     ddp_x_route_rec.enigma_route_id := p9_a9;
139     ddp_x_route_rec.enigma_publish_date := rosetta_g_miss_date_in_map(p9_a10);
140     ddp_x_route_rec.file_id := p9_a11;
141     ddp_x_route_rec.enigma_source_code := p9_a12;
142     ddp_x_route_rec.enigma_source_meaning := p9_a13;
143     ddp_x_route_rec.job_card_lyt_code := p9_a14;
144     ddp_x_route_rec.job_card_lyt_meaning := p9_a15;
145     ddp_x_route_rec.process_code := p9_a16;
146     ddp_x_route_rec.process := p9_a17;
147     ddp_x_route_rec.product_type_code := p9_a18;
148     ddp_x_route_rec.product_type := p9_a19;
149     ddp_x_route_rec.operator_party_id := p9_a20;
150     ddp_x_route_rec.operator_name := p9_a21;
151     ddp_x_route_rec.zone_code := p9_a22;
152     ddp_x_route_rec.zone := p9_a23;
153     ddp_x_route_rec.sub_zone_code := p9_a24;
154     ddp_x_route_rec.sub_zone := p9_a25;
155     ddp_x_route_rec.service_item_id := p9_a26;
156     ddp_x_route_rec.service_item_org_id := p9_a27;
157     ddp_x_route_rec.service_item_number := p9_a28;
158     ddp_x_route_rec.accounting_class_code := p9_a29;
159     ddp_x_route_rec.accounting_class_org_id := p9_a30;
160     ddp_x_route_rec.accounting_class := p9_a31;
161     ddp_x_route_rec.task_template_group_id := p9_a32;
162     ddp_x_route_rec.task_template_group := p9_a33;
163     ddp_x_route_rec.qa_inspection_type := p9_a34;
164     ddp_x_route_rec.qa_inspection_type_desc := p9_a35;
165     ddp_x_route_rec.time_span := p9_a36;
166     ddp_x_route_rec.active_start_date := rosetta_g_miss_date_in_map(p9_a37);
167     ddp_x_route_rec.active_end_date := rosetta_g_miss_date_in_map(p9_a38);
168     ddp_x_route_rec.revision_number := p9_a39;
169     ddp_x_route_rec.revision_status_code := p9_a40;
170     ddp_x_route_rec.revision_status := p9_a41;
171     ddp_x_route_rec.unit_receipt_update_flag := p9_a42;
172     ddp_x_route_rec.unit_receipt_update := p9_a43;
173     ddp_x_route_rec.warranty_template_id := p9_a44;
174     ddp_x_route_rec.warranty_template_name := p9_a45;
175     ddp_x_route_rec.duplicate_flag := p9_a46;
176     ddp_x_route_rec.return_to_supply_flag := p9_a47;
177     ddp_x_route_rec.remarks := p9_a48;
178     ddp_x_route_rec.revision_notes := p9_a49;
179     ddp_x_route_rec.segment1 := p9_a50;
180     ddp_x_route_rec.segment2 := p9_a51;
181     ddp_x_route_rec.segment3 := p9_a52;
182     ddp_x_route_rec.segment4 := p9_a53;
183     ddp_x_route_rec.segment5 := p9_a54;
184     ddp_x_route_rec.segment6 := p9_a55;
185     ddp_x_route_rec.segment7 := p9_a56;
186     ddp_x_route_rec.segment8 := p9_a57;
187     ddp_x_route_rec.segment9 := p9_a58;
188     ddp_x_route_rec.segment10 := p9_a59;
189     ddp_x_route_rec.segment11 := p9_a60;
190     ddp_x_route_rec.segment12 := p9_a61;
191     ddp_x_route_rec.segment13 := p9_a62;
192     ddp_x_route_rec.segment14 := p9_a63;
193     ddp_x_route_rec.segment15 := p9_a64;
194     ddp_x_route_rec.attribute_category := p9_a65;
195     ddp_x_route_rec.attribute1 := p9_a66;
196     ddp_x_route_rec.attribute2 := p9_a67;
197     ddp_x_route_rec.attribute3 := p9_a68;
198     ddp_x_route_rec.attribute4 := p9_a69;
199     ddp_x_route_rec.attribute5 := p9_a70;
200     ddp_x_route_rec.attribute6 := p9_a71;
201     ddp_x_route_rec.attribute7 := p9_a72;
202     ddp_x_route_rec.attribute8 := p9_a73;
203     ddp_x_route_rec.attribute9 := p9_a74;
204     ddp_x_route_rec.attribute10 := p9_a75;
205     ddp_x_route_rec.attribute11 := p9_a76;
206     ddp_x_route_rec.attribute12 := p9_a77;
207     ddp_x_route_rec.attribute13 := p9_a78;
208     ddp_x_route_rec.attribute14 := p9_a79;
209     ddp_x_route_rec.attribute15 := p9_a80;
210     ddp_x_route_rec.last_update_date := rosetta_g_miss_date_in_map(p9_a81);
211     ddp_x_route_rec.last_updated_by := p9_a82;
212     ddp_x_route_rec.creation_date := rosetta_g_miss_date_in_map(p9_a83);
213     ddp_x_route_rec.created_by := p9_a84;
214     ddp_x_route_rec.last_update_login := p9_a85;
215     ddp_x_route_rec.dml_operation := p9_a86;
216 
217     -- here's the delegated call to the old PL/SQL routine
218     ahl_rm_route_pvt.process_route(p_api_version,
219       p_init_msg_list,
220       p_commit,
221       p_validation_level,
222       p_default,
223       p_module_type,
224       x_return_status,
225       x_msg_count,
226       x_msg_data,
227       ddp_x_route_rec);
228 
229     -- copy data back from the local variables to OUT or IN-OUT args, if any
230 
231 
232 
233 
234 
235 
236 
237 
238 
239     p9_a0 := ddp_x_route_rec.route_id;
240     p9_a1 := ddp_x_route_rec.object_version_number;
241     p9_a2 := ddp_x_route_rec.route_no;
242     p9_a3 := ddp_x_route_rec.title;
243     p9_a4 := ddp_x_route_rec.route_type_code;
244     p9_a5 := ddp_x_route_rec.route_type;
245     p9_a6 := ddp_x_route_rec.model_code;
246     p9_a7 := ddp_x_route_rec.model_meaning;
247     p9_a8 := ddp_x_route_rec.enigma_doc_id;
248     p9_a9 := ddp_x_route_rec.enigma_route_id;
249     p9_a10 := ddp_x_route_rec.enigma_publish_date;
250     p9_a11 := ddp_x_route_rec.file_id;
251     p9_a12 := ddp_x_route_rec.enigma_source_code;
252     p9_a13 := ddp_x_route_rec.enigma_source_meaning;
253     p9_a14 := ddp_x_route_rec.job_card_lyt_code;
254     p9_a15 := ddp_x_route_rec.job_card_lyt_meaning;
255     p9_a16 := ddp_x_route_rec.process_code;
256     p9_a17 := ddp_x_route_rec.process;
257     p9_a18 := ddp_x_route_rec.product_type_code;
258     p9_a19 := ddp_x_route_rec.product_type;
259     p9_a20 := ddp_x_route_rec.operator_party_id;
260     p9_a21 := ddp_x_route_rec.operator_name;
261     p9_a22 := ddp_x_route_rec.zone_code;
262     p9_a23 := ddp_x_route_rec.zone;
263     p9_a24 := ddp_x_route_rec.sub_zone_code;
264     p9_a25 := ddp_x_route_rec.sub_zone;
265     p9_a26 := ddp_x_route_rec.service_item_id;
266     p9_a27 := ddp_x_route_rec.service_item_org_id;
267     p9_a28 := ddp_x_route_rec.service_item_number;
268     p9_a29 := ddp_x_route_rec.accounting_class_code;
269     p9_a30 := ddp_x_route_rec.accounting_class_org_id;
270     p9_a31 := ddp_x_route_rec.accounting_class;
271     p9_a32 := ddp_x_route_rec.task_template_group_id;
272     p9_a33 := ddp_x_route_rec.task_template_group;
273     p9_a34 := ddp_x_route_rec.qa_inspection_type;
274     p9_a35 := ddp_x_route_rec.qa_inspection_type_desc;
275     p9_a36 := ddp_x_route_rec.time_span;
276     p9_a37 := ddp_x_route_rec.active_start_date;
277     p9_a38 := ddp_x_route_rec.active_end_date;
278     p9_a39 := ddp_x_route_rec.revision_number;
279     p9_a40 := ddp_x_route_rec.revision_status_code;
280     p9_a41 := ddp_x_route_rec.revision_status;
281     p9_a42 := ddp_x_route_rec.unit_receipt_update_flag;
282     p9_a43 := ddp_x_route_rec.unit_receipt_update;
283     p9_a44 := ddp_x_route_rec.warranty_template_id;
284     p9_a45 := ddp_x_route_rec.warranty_template_name;
285     p9_a46 := ddp_x_route_rec.duplicate_flag;
286     p9_a47 := ddp_x_route_rec.return_to_supply_flag;
287     p9_a48 := ddp_x_route_rec.remarks;
288     p9_a49 := ddp_x_route_rec.revision_notes;
289     p9_a50 := ddp_x_route_rec.segment1;
290     p9_a51 := ddp_x_route_rec.segment2;
291     p9_a52 := ddp_x_route_rec.segment3;
292     p9_a53 := ddp_x_route_rec.segment4;
293     p9_a54 := ddp_x_route_rec.segment5;
294     p9_a55 := ddp_x_route_rec.segment6;
295     p9_a56 := ddp_x_route_rec.segment7;
296     p9_a57 := ddp_x_route_rec.segment8;
297     p9_a58 := ddp_x_route_rec.segment9;
298     p9_a59 := ddp_x_route_rec.segment10;
299     p9_a60 := ddp_x_route_rec.segment11;
300     p9_a61 := ddp_x_route_rec.segment12;
301     p9_a62 := ddp_x_route_rec.segment13;
302     p9_a63 := ddp_x_route_rec.segment14;
303     p9_a64 := ddp_x_route_rec.segment15;
304     p9_a65 := ddp_x_route_rec.attribute_category;
305     p9_a66 := ddp_x_route_rec.attribute1;
306     p9_a67 := ddp_x_route_rec.attribute2;
307     p9_a68 := ddp_x_route_rec.attribute3;
308     p9_a69 := ddp_x_route_rec.attribute4;
309     p9_a70 := ddp_x_route_rec.attribute5;
310     p9_a71 := ddp_x_route_rec.attribute6;
311     p9_a72 := ddp_x_route_rec.attribute7;
312     p9_a73 := ddp_x_route_rec.attribute8;
313     p9_a74 := ddp_x_route_rec.attribute9;
314     p9_a75 := ddp_x_route_rec.attribute10;
315     p9_a76 := ddp_x_route_rec.attribute11;
316     p9_a77 := ddp_x_route_rec.attribute12;
317     p9_a78 := ddp_x_route_rec.attribute13;
318     p9_a79 := ddp_x_route_rec.attribute14;
319     p9_a80 := ddp_x_route_rec.attribute15;
320     p9_a81 := ddp_x_route_rec.last_update_date;
321     p9_a82 := ddp_x_route_rec.last_updated_by;
322     p9_a83 := ddp_x_route_rec.creation_date;
323     p9_a84 := ddp_x_route_rec.created_by;
324     p9_a85 := ddp_x_route_rec.last_update_login;
325     p9_a86 := ddp_x_route_rec.dml_operation;
326   end;
327 
328 end ahl_rm_route_pvt_w;