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.ASO_SUP_TMPL_SECT_MAP_PKG

Source


1 Package Body ASO_SUP_TMPL_SECT_MAP_PKG AS
2 /* $Header: asospteb.pls 120.1 2005/06/29 12:38:14 appldev ship $*/
3 
4 /* procedure to insert INSERT_ROW */
5 
6 PROCEDURE INSERT_ROW
7 (
8   PX_ROWID              IN OUT NOCOPY /* file.sql.39 change */  VARCHAR2,
9   PX_TEMPLATE_SECTION_MAP_ID       IN OUT NOCOPY /* file.sql.39 change */  NUMBER,
10   P_created_by          IN NUMBER ,
11   P_creation_date       IN DATE ,
12   P_last_updated_by     IN NUMBER,
13   P_last_update_date    IN DATE,
14   P_last_update_login   IN NUMBER,
15   P_TEMPLATE_ID         IN NUMBER,
16   P_SECTION_ID          IN NUMBER,
17   P_DISPLAY_SEQUENCE    IN NUMBER,
18   P_CONTEXT             IN VARCHAR2 := NULL,
19   P_ATTRIBUTE1          IN VARCHAR2 := NULL,
20   P_ATTRIBUTE2          IN VARCHAR2 := NULL,
21   P_ATTRIBUTE3          IN VARCHAR2 := NULL,
22   P_ATTRIBUTE4          IN VARCHAR2 := NULL,
23   P_ATTRIBUTE5          IN VARCHAR2 := NULL,
24   P_ATTRIBUTE6          IN VARCHAR2 := NULL,
25   P_ATTRIBUTE7          IN VARCHAR2 := NULL,
26   P_ATTRIBUTE8          IN VARCHAR2 := NULL,
27   P_ATTRIBUTE9          IN VARCHAR2 := NULL,
28   P_ATTRIBUTE10         IN VARCHAR2 := NULL,
29   P_ATTRIBUTE11         IN VARCHAR2 := NULL,
30   P_ATTRIBUTE12         IN VARCHAR2 := NULL,
31   P_ATTRIBUTE13         IN VARCHAR2 := NULL,
32   P_ATTRIBUTE14         IN VARCHAR2 := NULL,
33   P_ATTRIBUTE15         IN VARCHAR2 := NULL,
34   P_ATTRIBUTE16         IN VARCHAR2 := NULL,
35   P_ATTRIBUTE17         IN VARCHAR2 := NULL,
36   P_ATTRIBUTE18         IN VARCHAR2 := NULL,
37   P_ATTRIBUTE19         IN VARCHAR2 := NULL,
38   P_ATTRIBUTE20         IN VARCHAR2 := NULL
39 )
40 IS
41 
42   cursor c is
43     select ROWID
44     from  ASO_SUP_TMPL_SECT_MAP
45     where  TEMPLATE_SECTION_MAP_ID = PX_TEMPLATE_SECTION_MAP_ID ;
46 
47   cursor CU_TEMPLATE_SECTION_MAP_ID IS
48     select ASO_SUP_TMPL_SECT_MAP_S.NEXTVAL from sys.dual;
49 
50 Begin
51 
52   IF (PX_TEMPLATE_SECTION_MAP_ID IS NULL) OR (PX_TEMPLATE_SECTION_MAP_ID = FND_API.G_MISS_NUM) THEN
53       OPEN  CU_TEMPLATE_SECTION_MAP_ID;
54       FETCH CU_TEMPLATE_SECTION_MAP_ID INTO PX_TEMPLATE_SECTION_MAP_ID;
55       CLOSE CU_TEMPLATE_SECTION_MAP_ID;
56 
57   END IF;
58 
59   insert into ASO_SUP_TMPL_SECT_MAP (
60   TEMPLATE_SECTION_MAP_ID,
61   TEMPLATE_ID,
62   SECTION_ID ,
63   DISPLAY_SEQUENCE,
64   created_by  ,
65   creation_date ,
66   last_updated_by ,
67   last_update_date ,
68   last_update_login ,
69   CONTEXT,
70   ATTRIBUTE1 ,
71   ATTRIBUTE2 ,
72   ATTRIBUTE3 ,
73   ATTRIBUTE4 ,
74   ATTRIBUTE5 ,
75   ATTRIBUTE6 ,
76   ATTRIBUTE7 ,
77   ATTRIBUTE8 ,
78   ATTRIBUTE9 ,
79   ATTRIBUTE10 ,
80   ATTRIBUTE11 ,
81   ATTRIBUTE12 ,
82   ATTRIBUTE13 ,
83   ATTRIBUTE14 ,
84   ATTRIBUTE15 ,
85    ATTRIBUTE16,
86   ATTRIBUTE17,
87   ATTRIBUTE18,
88   ATTRIBUTE19,
89   ATTRIBUTE20)
90 values
91   (
92   PX_TEMPLATE_SECTION_MAP_ID,
93   P_TEMPLATE_ID,
94   P_SECTION_ID ,
95   P_DISPLAY_SEQUENCE,
96   P_created_by  ,
97   P_creation_date ,
98   P_last_updated_by ,
99   P_last_update_date ,
100   P_last_update_login,
101   P_CONTEXT,
102   P_ATTRIBUTE1 ,
103   P_ATTRIBUTE2 ,
104   P_ATTRIBUTE3 ,
105   P_ATTRIBUTE4 ,
106   P_ATTRIBUTE5 ,
107   P_ATTRIBUTE6 ,
108   P_ATTRIBUTE7 ,
109   P_ATTRIBUTE8 ,
110   P_ATTRIBUTE9 ,
111   P_ATTRIBUTE10 ,
112   P_ATTRIBUTE11 ,
113   P_ATTRIBUTE12 ,
114   P_ATTRIBUTE13 ,
115   P_ATTRIBUTE14 ,
116   P_ATTRIBUTE15,
117    P_ATTRIBUTE16,
118   P_ATTRIBUTE17,
119   P_ATTRIBUTE18,
120   P_ATTRIBUTE19,
121   P_ATTRIBUTE20
122   ) ;
123 
124 
125   open c;
126   fetch c into PX_ROWID;
127   if (c%notfound) then
128     close c;
129     raise no_data_found;
130   end if;
131   close c;
132 
133 end INSERT_ROW;
134 
135 
136 /* procedure to Update Row */
137 
138 PROCEDURE UPDATE_ROW
139 (
140   P_TEMPLATE_SECTION_MAP_ID       IN NUMBER,
141   P_last_updated_by     IN NUMBER,
142   P_last_update_date    IN DATE,
143   P_last_update_login   IN NUMBER,
144   P_SECTION_ID          IN NUMBER,
145   P_TEMPLATE_ID         IN NUMBER,
146   P_DISPLAY_SEQUENCE    IN NUMBER,
147   P_CONTEXT             IN VARCHAR2,
148   P_ATTRIBUTE1          IN VARCHAR2,
149   P_ATTRIBUTE2          IN VARCHAR2,
150   P_ATTRIBUTE3          IN VARCHAR2,
151   P_ATTRIBUTE4          IN VARCHAR2,
152   P_ATTRIBUTE5          IN VARCHAR2,
153   P_ATTRIBUTE6          IN VARCHAR2,
154   P_ATTRIBUTE7          IN VARCHAR2,
155   P_ATTRIBUTE8          IN VARCHAR2,
156   P_ATTRIBUTE9          IN VARCHAR2,
157   P_ATTRIBUTE10         IN VARCHAR2,
158   P_ATTRIBUTE11         IN VARCHAR2,
159   P_ATTRIBUTE12         IN VARCHAR2,
160   P_ATTRIBUTE13         IN VARCHAR2,
161   P_ATTRIBUTE14         IN VARCHAR2,
162   P_ATTRIBUTE15         IN VARCHAR2,
163   P_ATTRIBUTE16         IN VARCHAR2,
164   P_ATTRIBUTE17         IN VARCHAR2,
165   P_ATTRIBUTE18         IN VARCHAR2,
166   P_ATTRIBUTE19         IN VARCHAR2,
167   P_ATTRIBUTE20         IN VARCHAR2
168 )
169 
170 IS
171 
172 Begin
173 
174   update ASO_SUP_TMPL_SECT_MAP
175   set
176   TEMPLATE_ID   = P_TEMPLATE_ID,
177   SECTION_ID     = P_SECTION_ID,
178   DISPLAY_SEQUENCE = P_DISPLAY_SEQUENCE,
179   last_updated_by = P_last_updated_by,
180   last_update_date = P_last_update_date,
181   last_update_login = P_last_update_login,
182   context = P_context,
183   ATTRIBUTE1 = P_ATTRIBUTE1,
184   ATTRIBUTE2 = P_ATTRIBUTE2,
185   ATTRIBUTE3 = P_ATTRIBUTE3,
186   ATTRIBUTE4 = P_ATTRIBUTE4,
187   ATTRIBUTE5 = P_ATTRIBUTE5,
188   ATTRIBUTE6 = P_ATTRIBUTE6,
189   ATTRIBUTE7 = P_ATTRIBUTE7,
190   ATTRIBUTE8 = P_ATTRIBUTE8,
191   ATTRIBUTE9 = P_ATTRIBUTE9,
192   ATTRIBUTE10 = P_ATTRIBUTE10,
193   ATTRIBUTE11 = P_ATTRIBUTE11,
194   ATTRIBUTE12 = P_ATTRIBUTE12,
195   ATTRIBUTE13 = P_ATTRIBUTE13,
196   ATTRIBUTE14 = P_ATTRIBUTE14,
197   ATTRIBUTE15 = P_ATTRIBUTE15,
198   ATTRIBUTE16 = P_ATTRIBUTE16,
199   ATTRIBUTE17 = P_ATTRIBUTE17,
200   ATTRIBUTE18 = P_ATTRIBUTE18,
201   ATTRIBUTE19 = P_ATTRIBUTE19,
202   ATTRIBUTE20 = P_ATTRIBUTE20
203 where  TEMPLATE_SECTION_MAP_ID = P_TEMPLATE_SECTION_MAP_ID;
204 
205   if (sql%notfound) then
206     raise no_data_found;
207   end if;
208 
209 
210 End UPDATE_ROW;
211 
212 /* procedure to Delete Row */
213 
214 
215 procedure DELETE_ROW (
216   P_TEMPLATE_SECTION_MAP_ID IN NUMBER
217 
218 )
219 
220 IS
221 
222 Begin
223 
224  delete from ASO_SUP_TMPL_SECT_MAP
225   where  TEMPLATE_SECTION_MAP_ID = P_TEMPLATE_SECTION_MAP_ID;
226 
227   if (sql%notfound) then
228     raise no_data_found;
229   end if;
230 
231 
232 End Delete_row;
233 
234 
235 /* procedure to Lock Row */
236 
237 PROCEDURE LOCK_ROW
238 (
239   P_TEMPLATE_SECTION_MAP_ID       IN NUMBER,
240   P_created_by          IN NUMBER ,
241   P_creation_date       IN DATE ,
242   P_last_updated_by     IN NUMBER,
243   P_last_update_date    IN DATE,
244   P_last_update_login   IN NUMBER,
245   P_TEMPLATE_ID        IN NUMBER,
246   P_SECTION_ID          IN NUMBER,
247   P_DISPLAY_SEQUENCE    IN NUMBER,
248   P_CONTEXT             IN VARCHAR2,
249   P_ATTRIBUTE1          IN VARCHAR2,
250   P_ATTRIBUTE2          IN VARCHAR2,
251   P_ATTRIBUTE3          IN VARCHAR2,
252   P_ATTRIBUTE4          IN VARCHAR2,
253   P_ATTRIBUTE5          IN VARCHAR2,
254   P_ATTRIBUTE6          IN VARCHAR2,
255   P_ATTRIBUTE7          IN VARCHAR2,
256   P_ATTRIBUTE8          IN VARCHAR2,
257   P_ATTRIBUTE9          IN VARCHAR2,
258   P_ATTRIBUTE10         IN VARCHAR2,
259   P_ATTRIBUTE11         IN VARCHAR2,
260   P_ATTRIBUTE12         IN VARCHAR2,
261   P_ATTRIBUTE13         IN VARCHAR2,
262   P_ATTRIBUTE14         IN VARCHAR2,
263   P_ATTRIBUTE15         IN VARCHAR2
264 )
265 
266 IS
267 
268 CURSOR i_csr is
269 SELECT
270   a.TEMPLATE_SECTION_MAP_ID ,
271   a.TEMPLATE_ID,
272   a.SECTION_ID ,
273   a.DISPLAY_SEQUENCE,
274   created_by  ,
275   creation_date ,
276   last_updated_by ,
277   last_update_date ,
278   last_update_login ,
279   context,
280   ATTRIBUTE1 ,
281   ATTRIBUTE2 ,
282   ATTRIBUTE3 ,
283   ATTRIBUTE4 ,
284   ATTRIBUTE5 ,
285   ATTRIBUTE6 ,
286   ATTRIBUTE7 ,
287   ATTRIBUTE8 ,
288   ATTRIBUTE9 ,
289   ATTRIBUTE10 ,
290   ATTRIBUTE11 ,
291   ATTRIBUTE12 ,
292   ATTRIBUTE13 ,
293   ATTRIBUTE14 ,
294   ATTRIBUTE15
295 
296  from  ASO_SUP_TMPL_SECT_MAP a
297  where a.TEMPLATE_SECTION_MAP_ID = P_TEMPLATE_SECTION_MAP_ID
298  for update of a.TEMPLATE_SECTION_MAP_ID nowait;
299 
300 recinfo i_csr%rowtype;
301 
302 
303   l_Item_ID         NUMBER ;
304   l_Org_ID          NUMBER ;
305 
306   l_return_status   VARCHAR2(1) ;
307 
308 BEGIN
309 
310 
311   l_Item_ID := P_TEMPLATE_SECTION_MAP_ID ;
312 
313   open i_csr;
314 
315   fetch i_csr into recinfo;
316 
317   if (i_csr%notfound) then
318     close i_csr;
319     fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
320     app_exception.raise_exception;
321   end if;
322 
323   close i_csr;
324 
325 -- Do not compare to the B table column;
326 -- only compare to TL column (c1 cursor below).
327 
328 
329   if (
330           ((recinfo.TEMPLATE_SECTION_MAP_ID = P_TEMPLATE_SECTION_MAP_ID)
331            OR ((recinfo.TEMPLATE_SECTION_MAP_ID is null) AND (P_TEMPLATE_SECTION_MAP_ID is null)))
332       AND ((recinfo.TEMPLATE_ID = P_TEMPLATE_ID)
333            OR ((recinfo.TEMPLATE_ID is null) AND (P_TEMPLATE_ID is null)))
334       AND ((recinfo.SECTION_ID = P_SECTION_ID)
335            OR ((recinfo.SECTION_ID is null) AND (P_SECTION_ID is null)))
336       AND ((recinfo.DISPLAY_SEQUENCE = P_DISPLAY_SEQUENCE)
337            OR ((recinfo.DISPLAY_SEQUENCE is null) AND (P_DISPLAY_SEQUENCE is null)))
338       AND ((recinfo.CREATED_BY = P_CREATED_BY)
339            OR ((recinfo.CREATED_BY is null) AND (P_CREATED_BY is null)))
340       AND ((recinfo.CREATION_DATE = P_CREATION_DATE)
341            OR ((recinfo.CREATION_DATE is null) AND (P_CREATION_DATE is null)))
342       AND ((recinfo.LAST_UPDATED_BY = P_LAST_UPDATED_BY)
343            OR ((recinfo.LAST_UPDATED_BY is null) AND (P_LAST_UPDATED_BY is null)))
344       AND ((recinfo.LAST_UPDATE_DATE = P_LAST_UPDATE_DATE)
345            OR ((recinfo.LAST_UPDATE_DATE is null) AND (P_LAST_UPDATE_DATE is null)))
346       AND ((recinfo.LAST_UPDATE_LOGIN = P_LAST_UPDATE_LOGIN)
347            OR ((recinfo.LAST_UPDATE_LOGIN is null) AND (P_LAST_UPDATE_LOGIN is null)))
348       AND ((recinfo.CONTEXT = P_CONTEXT)
349            OR ((recinfo.CONTEXT is null) AND (P_CONTEXT is null)))
350       AND ((recinfo.ATTRIBUTE1 = P_ATTRIBUTE1)
351            OR ((recinfo.ATTRIBUTE1 is null) AND (P_ATTRIBUTE1 is null)))
352       AND ((recinfo.ATTRIBUTE2 = P_ATTRIBUTE2)
353            OR ((recinfo.ATTRIBUTE2 is null) AND (P_ATTRIBUTE2 is null)))
354       AND ((recinfo.ATTRIBUTE3 = P_ATTRIBUTE3)
355            OR ((recinfo.ATTRIBUTE3 is null) AND (P_ATTRIBUTE3 is null)))
356       AND ((recinfo.ATTRIBUTE4 = P_ATTRIBUTE4)
357            OR ((recinfo.ATTRIBUTE4 is null) AND (P_ATTRIBUTE4 is null)))
358       AND ((recinfo.ATTRIBUTE5 = P_ATTRIBUTE5)
359            OR ((recinfo.ATTRIBUTE5 is null) AND (P_ATTRIBUTE5 is null)))
360       AND ((recinfo.ATTRIBUTE6 = P_ATTRIBUTE6)
361            OR ((recinfo.ATTRIBUTE6 is null) AND (P_ATTRIBUTE6 is null)))
362       AND ((recinfo.ATTRIBUTE7 = P_ATTRIBUTE7)
363            OR ((recinfo.ATTRIBUTE7 is null) AND (P_ATTRIBUTE7 is null)))
364       AND ((recinfo.ATTRIBUTE8 = P_ATTRIBUTE8)
365            OR ((recinfo.ATTRIBUTE8 is null) AND (P_ATTRIBUTE8 is null)))
366       AND ((recinfo.ATTRIBUTE9 = P_ATTRIBUTE9)
367            OR ((recinfo.ATTRIBUTE9 is null) AND (P_ATTRIBUTE9 is null)))
368       AND ((recinfo.ATTRIBUTE10 = P_ATTRIBUTE10)
369            OR ((recinfo.ATTRIBUTE10 is null) AND (P_ATTRIBUTE10 is null)))
370       AND ((recinfo.ATTRIBUTE11 = P_ATTRIBUTE11)
371            OR ((recinfo.ATTRIBUTE11 is null) AND (P_ATTRIBUTE11 is null)))
372       AND ((recinfo.ATTRIBUTE12 = P_ATTRIBUTE12)
373            OR ((recinfo.ATTRIBUTE12 is null) AND (P_ATTRIBUTE12 is null)))
374       AND ((recinfo.ATTRIBUTE13 = P_ATTRIBUTE13)
375            OR ((recinfo.ATTRIBUTE13 is null) AND (P_ATTRIBUTE13 is null)))
376       AND ((recinfo.ATTRIBUTE14 = P_ATTRIBUTE14)
377            OR ((recinfo.ATTRIBUTE14 is null) AND (P_ATTRIBUTE14 is null)))
378       AND ((recinfo.ATTRIBUTE15 = P_ATTRIBUTE15)
379            OR ((recinfo.ATTRIBUTE15 is null) AND (P_ATTRIBUTE15 is null)))
380   ) then
381     null;
382   else
383     fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
384     app_exception.raise_exception;
385   end if;
386 
387  return;
388 
389 End Lock_Row;
390 
391 
392 
393 END; -- Package Body ASO_SUP_TMPL_SECT_MAP_PKG