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

Source


1 package body AK_FLOW_REGION_RELATIONS_PKG as
2 /* $Header: AKDFRGRB.pls 120.2 2005/09/29 13:59:47 tshort ship $ */
3 procedure INSERT_ROW (
4   X_ROWID in out NOCOPY VARCHAR2,
5   X_FLOW_APPLICATION_ID in NUMBER,
6   X_FLOW_CODE in VARCHAR2,
7   X_FOREIGN_KEY_NAME in VARCHAR2,
8   X_FROM_PAGE_APPL_ID in NUMBER,
9   X_FROM_PAGE_CODE in VARCHAR2,
10   X_FROM_REGION_APPL_ID in NUMBER,
11   X_FROM_REGION_CODE in VARCHAR2,
12   X_TO_PAGE_APPL_ID in NUMBER,
13   X_TO_PAGE_CODE in VARCHAR2,
14   X_TO_REGION_APPL_ID in NUMBER,
15   X_TO_REGION_CODE in VARCHAR2,
16   X_APPLICATION_ID in NUMBER,
17   X_CREATION_DATE in DATE,
18   X_CREATED_BY in NUMBER,
19   X_LAST_UPDATE_DATE in DATE,
20   X_LAST_UPDATED_BY in NUMBER,
21   X_LAST_UPDATE_LOGIN in NUMBER,
22   X_ATTRIBUTE_CATEGORY in VARCHAR2,
23   X_ATTRIBUTE1 in VARCHAR2,
24   X_ATTRIBUTE2 in VARCHAR2,
25   X_ATTRIBUTE3 in VARCHAR2,
26   X_ATTRIBUTE4 in VARCHAR2,
27   X_ATTRIBUTE5 in VARCHAR2,
28   X_ATTRIBUTE6 in VARCHAR2,
29   X_ATTRIBUTE7 in VARCHAR2,
30   X_ATTRIBUTE8 in VARCHAR2,
31   X_ATTRIBUTE9 in VARCHAR2,
32   X_ATTRIBUTE10 in VARCHAR2,
33   X_ATTRIBUTE11 in VARCHAR2,
34   X_ATTRIBUTE12 in VARCHAR2,
35   X_ATTRIBUTE13 in VARCHAR2,
36   X_ATTRIBUTE14 in VARCHAR2,
37   X_ATTRIBUTE15 in VARCHAR2
38 ) is
39   cursor C is select ROWID from AK_FLOW_REGION_RELATIONS
40     where FLOW_APPLICATION_ID = X_FLOW_APPLICATION_ID
41     and FLOW_CODE = X_FLOW_CODE
42     and FOREIGN_KEY_NAME = X_FOREIGN_KEY_NAME
43     and FROM_PAGE_APPL_ID = X_FROM_PAGE_APPL_ID
44     and FROM_PAGE_CODE  = X_FROM_PAGE_CODE
45     and FROM_REGION_APPL_ID = X_FROM_REGION_APPL_ID
46     and FROM_REGION_CODE = X_FROM_REGION_CODE
47     and TO_PAGE_APPL_ID = X_TO_PAGE_APPL_ID
48     and TO_PAGE_CODE = X_TO_PAGE_CODE
49     and TO_REGION_APPL_ID = X_TO_REGION_APPL_ID
50     and TO_REGION_CODE = X_TO_REGION_CODE;
51 begin
52   insert into AK_FLOW_REGION_RELATIONS(
53     FLOW_APPLICATION_ID,
54     FLOW_CODE,
55     FOREIGN_KEY_NAME,
56     FROM_PAGE_APPL_ID,
57     FROM_PAGE_CODE,
58     FROM_REGION_APPL_ID,
59     FROM_REGION_CODE,
60     TO_PAGE_APPL_ID,
61     TO_PAGE_CODE,
62     TO_REGION_APPL_ID,
63     TO_REGION_CODE,
64     APPLICATION_ID,
65     CREATION_DATE,
66     CREATED_BY,
67     LAST_UPDATE_DATE,
68     LAST_UPDATED_BY,
69     LAST_UPDATE_LOGIN,
70     ATTRIBUTE_CATEGORY,
71     ATTRIBUTE1,
72     ATTRIBUTE2,
73     ATTRIBUTE3,
74     ATTRIBUTE4,
75     ATTRIBUTE5,
76     ATTRIBUTE6,
77     ATTRIBUTE7,
78     ATTRIBUTE8,
79     ATTRIBUTE9,
80     ATTRIBUTE10,
81     ATTRIBUTE11,
82     ATTRIBUTE12,
83     ATTRIBUTE13,
84     ATTRIBUTE14,
85     ATTRIBUTE15
86   ) values (
87     X_FLOW_APPLICATION_ID,
88     X_FLOW_CODE,
89     X_FOREIGN_KEY_NAME,
90     X_FROM_PAGE_APPL_ID,
91     X_FROM_PAGE_CODE,
92     X_FROM_REGION_APPL_ID,
93     X_FROM_REGION_CODE,
94     X_TO_PAGE_APPL_ID,
95     X_TO_PAGE_CODE,
96     X_TO_REGION_APPL_ID,
97     X_TO_REGION_CODE,
98     X_APPLICATION_ID,
99     X_CREATION_DATE,
100     X_CREATED_BY,
101     X_LAST_UPDATE_DATE,
102     X_LAST_UPDATED_BY,
103     X_LAST_UPDATE_LOGIN,
104     X_ATTRIBUTE_CATEGORY,
105     X_ATTRIBUTE1,
106     X_ATTRIBUTE2,
107     X_ATTRIBUTE3,
108     X_ATTRIBUTE4,
109     X_ATTRIBUTE5,
110     X_ATTRIBUTE6,
111     X_ATTRIBUTE7,
112     X_ATTRIBUTE8,
113     X_ATTRIBUTE9,
114     X_ATTRIBUTE10,
115     X_ATTRIBUTE11,
116     X_ATTRIBUTE12,
117     X_ATTRIBUTE13,
118     X_ATTRIBUTE14,
119     X_ATTRIBUTE15
120   );
121 
122   open c;
123   fetch c into X_ROWID;
124   if (c%notfound) then
125     close c;
126     raise no_data_found;
127   end if;
128   close c;
129 end INSERT_ROW;
130 
131 procedure LOCK_ROW (
132   X_FLOW_APPLICATION_ID in NUMBER,
133   X_FLOW_CODE in VARCHAR2,
134   X_FOREIGN_KEY_NAME in VARCHAR2,
135   X_FROM_PAGE_APPL_ID in NUMBER,
136   X_FROM_PAGE_CODE in VARCHAR2,
137   X_FROM_REGION_APPL_ID in NUMBER,
138   X_FROM_REGION_CODE in VARCHAR2,
139   X_TO_PAGE_APPL_ID in NUMBER,
140   X_TO_PAGE_CODE in VARCHAR2,
141   X_TO_REGION_APPL_ID in NUMBER,
142   X_TO_REGION_CODE in VARCHAR2,
143   X_APPLICATION_ID in NUMBER
144 ) is
145   cursor c is select
146     APPLICATION_ID
147     from AK_FLOW_REGION_RELATIONS
148     where FLOW_APPLICATION_ID = X_FLOW_APPLICATION_ID
149     and FLOW_CODE = X_FLOW_CODE
150     and FOREIGN_KEY_NAME = X_FOREIGN_KEY_NAME
151     and FROM_PAGE_APPL_ID = X_FROM_PAGE_APPL_ID
152     and FROM_PAGE_CODE = X_FROM_PAGE_CODE
153     and FROM_REGION_APPL_ID = X_FROM_REGION_APPL_ID
154     and FROM_REGION_CODE = X_FROM_REGION_CODE
155     and TO_PAGE_APPL_ID = X_TO_PAGE_APPL_ID
156     and TO_PAGE_CODE = X_TO_PAGE_CODE
157     and TO_REGION_APPL_ID = X_TO_REGION_APPL_ID
158     and TO_REGION_CODE = X_TO_REGION_CODE
159     for update of APPLICATION_ID nowait;
160   recinfo c%rowtype;
161 
162 begin
163   open c;
164   fetch c into recinfo;
165   if (c%notfound) then
166     close c;
167     fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
168     app_exception.raise_exception;
169   end if;
170 
171   if (NOT( (recinfo.APPLICATION_ID = X_APPLICATION_ID)
172   )) then
173     fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
174     app_exception.raise_exception;
175   end if;
176   if c%isopen then
177     close c;
178   end if;
179 end LOCK_ROW;
180 
181 procedure UPDATE_ROW (
182   X_FLOW_APPLICATION_ID in NUMBER,
183   X_FLOW_CODE in VARCHAR2,
184   X_FOREIGN_KEY_NAME in VARCHAR2,
185   X_FROM_PAGE_APPL_ID in NUMBER,
186   X_FROM_PAGE_CODE in VARCHAR2,
187   X_FROM_REGION_APPL_ID in NUMBER,
188   X_FROM_REGION_CODE in VARCHAR2,
189   X_TO_PAGE_APPL_ID in NUMBER,
190   X_TO_PAGE_CODE in VARCHAR2,
191   X_TO_REGION_APPL_ID in NUMBER,
192   X_TO_REGION_CODE in VARCHAR2,
193   X_APPLICATION_ID in NUMBER,
194   X_LAST_UPDATE_DATE in DATE,
195   X_LAST_UPDATED_BY in NUMBER,
196   X_LAST_UPDATE_LOGIN in NUMBER,
197   X_ATTRIBUTE_CATEGORY in VARCHAR2,
198   X_ATTRIBUTE1 in VARCHAR2,
199   X_ATTRIBUTE2 in VARCHAR2,
200   X_ATTRIBUTE3 in VARCHAR2,
201   X_ATTRIBUTE4 in VARCHAR2,
202   X_ATTRIBUTE5 in VARCHAR2,
203   X_ATTRIBUTE6 in VARCHAR2,
204   X_ATTRIBUTE7 in VARCHAR2,
205   X_ATTRIBUTE8 in VARCHAR2,
206   X_ATTRIBUTE9 in VARCHAR2,
207   X_ATTRIBUTE10 in VARCHAR2,
208   X_ATTRIBUTE11 in VARCHAR2,
209   X_ATTRIBUTE12 in VARCHAR2,
210   X_ATTRIBUTE13 in VARCHAR2,
211   X_ATTRIBUTE14 in VARCHAR2,
212   X_ATTRIBUTE15 in VARCHAR2
213 ) is
214 begin
215   update AK_FLOW_REGION_RELATIONS set
216     FLOW_APPLICATION_ID = X_FLOW_APPLICATION_ID,
217     FLOW_CODE = X_FLOW_CODE,
218     FOREIGN_KEY_NAME = X_FOREIGN_KEY_NAME,
219     FROM_PAGE_APPL_ID = X_FROM_PAGE_APPL_ID,
220     FROM_PAGE_CODE = X_FROM_PAGE_CODE,
221     FROM_REGION_APPL_ID = X_FROM_REGION_APPL_ID,
222     FROM_REGION_CODE = X_FROM_REGION_CODE,
223     TO_PAGE_APPL_ID = X_TO_PAGE_APPL_ID,
224     TO_PAGE_CODE = X_TO_PAGE_CODE,
225     TO_REGION_APPL_ID = X_TO_REGION_APPL_ID,
226     TO_REGION_CODE = X_TO_REGION_CODE,
227     APPLICATION_ID = X_APPLICATION_ID,
228     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
229     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
230     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
231     ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
232     ATTRIBUTE1 = X_ATTRIBUTE1,
233     ATTRIBUTE2 = X_ATTRIBUTE2,
234     ATTRIBUTE3 = X_ATTRIBUTE3,
235     ATTRIBUTE4 = X_ATTRIBUTE4,
236     ATTRIBUTE5 = X_ATTRIBUTE5,
237     ATTRIBUTE6 = X_ATTRIBUTE6,
238     ATTRIBUTE7 = X_ATTRIBUTE7,
239     ATTRIBUTE8 = X_ATTRIBUTE8,
240     ATTRIBUTE9 = X_ATTRIBUTE9,
241     ATTRIBUTE10 = X_ATTRIBUTE10,
242     ATTRIBUTE11 = X_ATTRIBUTE11,
243     ATTRIBUTE12 = X_ATTRIBUTE12,
244     ATTRIBUTE13 = X_ATTRIBUTE13,
245     ATTRIBUTE14 = X_ATTRIBUTE14,
246     ATTRIBUTE15 = X_ATTRIBUTE15
247   where FLOW_APPLICATION_ID = X_FLOW_APPLICATION_ID
248   and FLOW_CODE = X_FLOW_CODE
249   and FOREIGN_KEY_NAME = X_FOREIGN_KEY_NAME
250   and FROM_PAGE_APPL_ID = X_FROM_PAGE_APPL_ID
251   and FROM_PAGE_CODE = X_FROM_PAGE_CODE
252   and FROM_REGION_APPL_ID = X_FROM_REGION_APPL_ID
253   and FROM_REGION_CODE = X_FROM_REGION_CODE
254   and TO_PAGE_APPL_ID = X_TO_PAGE_APPL_ID
255   and TO_PAGE_CODE = X_TO_PAGE_CODE
256   and TO_REGION_APPL_ID = X_TO_REGION_APPL_ID
257   and TO_REGION_CODE = X_TO_REGION_CODE;
258 
259   if (sql%notfound) then
260     raise no_data_found;
261   end if;
262 end UPDATE_ROW;
263 
264 procedure DELETE_ROW (
265   X_FLOW_APPLICATION_ID in NUMBER,
266   X_FLOW_CODE in VARCHAR2,
267   X_FOREIGN_KEY_NAME in VARCHAR2,
268   X_FROM_PAGE_APPL_ID in NUMBER,
269   X_FROM_PAGE_CODE in VARCHAR2,
270   X_FROM_REGION_APPL_ID in NUMBER,
271   X_FROM_REGION_CODE in VARCHAR2,
272   X_TO_PAGE_APPL_ID in NUMBER,
273   X_TO_PAGE_CODE in VARCHAR2,
274   X_TO_REGION_APPL_ID in NUMBER,
275   X_TO_REGION_CODE in VARCHAR2
276 ) is
277 begin
278   delete from AK_FLOW_REGION_RELATIONS
279   where FLOW_APPLICATION_ID = X_FLOW_APPLICATION_ID
280   and FLOW_CODE = X_FLOW_CODE
281   and FOREIGN_KEY_NAME = X_FOREIGN_KEY_NAME
282   and FROM_PAGE_APPL_ID = X_FROM_PAGE_APPL_ID
283   and FROM_PAGE_CODE = X_FROM_PAGE_CODE
284   and FROM_REGION_APPL_ID = X_FROM_REGION_APPL_ID
285   and FROM_REGION_CODE = X_FROM_REGION_CODE
286   and TO_PAGE_APPL_ID = X_TO_PAGE_APPL_ID
287   and TO_PAGE_CODE = X_TO_PAGE_CODE
288   and TO_REGION_APPL_ID = X_TO_REGION_APPL_ID
289   and TO_REGION_CODE = X_TO_REGION_CODE;
290 
291   if (sql%notfound) then
292     raise no_data_found;
293   end if;
294 end DELETE_ROW;
295 end AK_FLOW_REGION_RELATIONS_PKG;