[Home] [Help]
PACKAGE BODY: APPS.AMS_ATTACHMENT_PVT_W
Source
1 package body ams_attachment_pvt_w as
2 /* $Header: amswatcb.pls 115.4 2003/05/06 12:46:50 mayjain 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
6 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7 function rosetta_g_miss_date_in_map(d date) return date as
8 begin
9 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10 return d;
11 end;
12
13 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure create_fnd_attachment(p_api_version_number NUMBER
23 , p_init_msg_list VARCHAR2
24 , p_commit VARCHAR2
25 , p_validation_level NUMBER
26 , x_return_status out nocopy VARCHAR2
27 , x_msg_count out nocopy NUMBER
28 , x_msg_data out nocopy VARCHAR2
29 , x_document_id out nocopy NUMBER
30 , x_attached_document_id out nocopy NUMBER
31 , p7_a0 VARCHAR2 := fnd_api.g_miss_char
32 , p7_a1 NUMBER := 0-1962.0724
33 , p7_a2 NUMBER := 0-1962.0724
34 , p7_a3 NUMBER := 0-1962.0724
35 , p7_a4 NUMBER := 0-1962.0724
36 , p7_a5 VARCHAR := fnd_api.g_miss_char
37 , p7_a6 VARCHAR2 := fnd_api.g_miss_char
38 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
39 , p7_a8 NUMBER := 0-1962.0724
40 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
41 , p7_a10 NUMBER := 0-1962.0724
42 , p7_a11 NUMBER := 0-1962.0724
43 , p7_a12 VARCHAR2 := fnd_api.g_miss_char
44 , p7_a13 VARCHAR2 := fnd_api.g_miss_char
45 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
46 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
47 , p7_a16 DATE := fnd_api.g_miss_date
48 , p7_a17 NUMBER := 0-1962.0724
49 , p7_a18 DATE := fnd_api.g_miss_date
50 , p7_a19 NUMBER := 0-1962.0724
51 , p7_a20 NUMBER := 0-1962.0724
52 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
53 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
54 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
55 , p7_a24 DATE := fnd_api.g_miss_date
56 )
57
58 as
59 ddp_fnd_attachment_rec ams_attachment_pvt.fnd_attachment_rec_type;
60 ddindx binary_integer; indx binary_integer;
61 begin
62
63 -- copy data to the local IN or IN-OUT args, if any
64
65
66
67
68
69
70
71 ddp_fnd_attachment_rec.rowid := p7_a0;
72 ddp_fnd_attachment_rec.document_id := rosetta_g_miss_num_map(p7_a1);
73 ddp_fnd_attachment_rec.datatype_id := rosetta_g_miss_num_map(p7_a2);
74 ddp_fnd_attachment_rec.category_id := rosetta_g_miss_num_map(p7_a3);
75 ddp_fnd_attachment_rec.security_type := rosetta_g_miss_num_map(p7_a4);
76 ddp_fnd_attachment_rec.publish_flag := p7_a5;
77 ddp_fnd_attachment_rec.description := p7_a6;
78 ddp_fnd_attachment_rec.file_name := p7_a7;
79 ddp_fnd_attachment_rec.media_id := rosetta_g_miss_num_map(p7_a8);
80 ddp_fnd_attachment_rec.file_size := p7_a9;
81 ddp_fnd_attachment_rec.attached_document_id := rosetta_g_miss_num_map(p7_a10);
82 ddp_fnd_attachment_rec.seq_num := rosetta_g_miss_num_map(p7_a11);
83 ddp_fnd_attachment_rec.entity_name := p7_a12;
84 ddp_fnd_attachment_rec.pk1_value := p7_a13;
85 ddp_fnd_attachment_rec.automatically_added_flag := p7_a14;
86 ddp_fnd_attachment_rec.short_text := p7_a15;
87 ddp_fnd_attachment_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a16);
88 ddp_fnd_attachment_rec.last_updated_by := rosetta_g_miss_num_map(p7_a17);
89 ddp_fnd_attachment_rec.creation_date := rosetta_g_miss_date_in_map(p7_a18);
90 ddp_fnd_attachment_rec.created_by := rosetta_g_miss_num_map(p7_a19);
91 ddp_fnd_attachment_rec.last_update_login := rosetta_g_miss_num_map(p7_a20);
92 ddp_fnd_attachment_rec.attachment_type := p7_a21;
93 ddp_fnd_attachment_rec.language := p7_a22;
94 ddp_fnd_attachment_rec.usage_type := p7_a23;
95 ddp_fnd_attachment_rec.concur_last_update_date := rosetta_g_miss_date_in_map(p7_a24);
96
97
98
99 -- here's the delegated call to the old PL/SQL routine
100 ams_attachment_pvt.create_fnd_attachment(p_api_version_number,
101 p_init_msg_list,
102 p_commit,
103 p_validation_level,
104 x_return_status,
105 x_msg_count,
106 x_msg_data,
107 ddp_fnd_attachment_rec,
108 x_document_id,
109 x_attached_document_id);
110
111 -- copy data back from the local variables to OUT or IN-OUT args, if any
112
113
114
115
116
117
118
119
120
121 end;
122
123 procedure update_fnd_attachment(p_api_version_number NUMBER
124 , p_init_msg_list VARCHAR2
125 , p_commit VARCHAR2
126 , p_validation_level NUMBER
127 , x_return_status out nocopy VARCHAR2
128 , x_msg_count out nocopy NUMBER
129 , x_msg_data out nocopy VARCHAR2
130 , p7_a0 VARCHAR2 := fnd_api.g_miss_char
131 , p7_a1 NUMBER := 0-1962.0724
132 , p7_a2 NUMBER := 0-1962.0724
133 , p7_a3 NUMBER := 0-1962.0724
134 , p7_a4 NUMBER := 0-1962.0724
135 , p7_a5 VARCHAR := fnd_api.g_miss_char
136 , p7_a6 VARCHAR2 := fnd_api.g_miss_char
137 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
138 , p7_a8 NUMBER := 0-1962.0724
139 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
140 , p7_a10 NUMBER := 0-1962.0724
141 , p7_a11 NUMBER := 0-1962.0724
142 , p7_a12 VARCHAR2 := fnd_api.g_miss_char
143 , p7_a13 VARCHAR2 := fnd_api.g_miss_char
144 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
145 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
146 , p7_a16 DATE := fnd_api.g_miss_date
147 , p7_a17 NUMBER := 0-1962.0724
148 , p7_a18 DATE := fnd_api.g_miss_date
149 , p7_a19 NUMBER := 0-1962.0724
150 , p7_a20 NUMBER := 0-1962.0724
151 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
152 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
153 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
154 , p7_a24 DATE := fnd_api.g_miss_date
155 )
156
157 as
158 ddp_fnd_attachment_rec ams_attachment_pvt.fnd_attachment_rec_type;
159 ddindx binary_integer; indx binary_integer;
160 begin
161
162 -- copy data to the local IN or IN-OUT args, if any
163
164
165
166
167
168
169
170 ddp_fnd_attachment_rec.rowid := p7_a0;
171 ddp_fnd_attachment_rec.document_id := rosetta_g_miss_num_map(p7_a1);
172 ddp_fnd_attachment_rec.datatype_id := rosetta_g_miss_num_map(p7_a2);
173 ddp_fnd_attachment_rec.category_id := rosetta_g_miss_num_map(p7_a3);
174 ddp_fnd_attachment_rec.security_type := rosetta_g_miss_num_map(p7_a4);
175 ddp_fnd_attachment_rec.publish_flag := p7_a5;
176 ddp_fnd_attachment_rec.description := p7_a6;
177 ddp_fnd_attachment_rec.file_name := p7_a7;
178 ddp_fnd_attachment_rec.media_id := rosetta_g_miss_num_map(p7_a8);
179 ddp_fnd_attachment_rec.file_size := p7_a9;
180 ddp_fnd_attachment_rec.attached_document_id := rosetta_g_miss_num_map(p7_a10);
181 ddp_fnd_attachment_rec.seq_num := rosetta_g_miss_num_map(p7_a11);
182 ddp_fnd_attachment_rec.entity_name := p7_a12;
183 ddp_fnd_attachment_rec.pk1_value := p7_a13;
184 ddp_fnd_attachment_rec.automatically_added_flag := p7_a14;
185 ddp_fnd_attachment_rec.short_text := p7_a15;
186 ddp_fnd_attachment_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a16);
187 ddp_fnd_attachment_rec.last_updated_by := rosetta_g_miss_num_map(p7_a17);
188 ddp_fnd_attachment_rec.creation_date := rosetta_g_miss_date_in_map(p7_a18);
189 ddp_fnd_attachment_rec.created_by := rosetta_g_miss_num_map(p7_a19);
190 ddp_fnd_attachment_rec.last_update_login := rosetta_g_miss_num_map(p7_a20);
191 ddp_fnd_attachment_rec.attachment_type := p7_a21;
192 ddp_fnd_attachment_rec.language := p7_a22;
193 ddp_fnd_attachment_rec.usage_type := p7_a23;
194 ddp_fnd_attachment_rec.concur_last_update_date := rosetta_g_miss_date_in_map(p7_a24);
195
196 -- here's the delegated call to the old PL/SQL routine
197 ams_attachment_pvt.update_fnd_attachment(p_api_version_number,
198 p_init_msg_list,
199 p_commit,
200 p_validation_level,
201 x_return_status,
202 x_msg_count,
203 x_msg_data,
204 ddp_fnd_attachment_rec);
205
206 -- copy data back from the local variables to OUT or IN-OUT args, if any
207
208
209
210
211
212
213
214 end;
215
216 end ams_attachment_pvt_w;