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

Source


1 PACKAGE BODY CN_SF_PARAMS_pkg AS
2 /*$Header: cntprmsb.pls 115.2 2002/01/28 20:05:07 pkm ship      $*/
3 
4 PROCEDURE insert_row
5 (
6    P_REPOSITORY_ID            IN cn_sf_repositories.REPOSITORY_ID%TYPE,
7    P_CONTRACT_TITLE           IN cn_sf_repositories.CONTRACT_TITLE%TYPE,
8    P_TERMS_AND_CONDITIONS     IN cn_sf_repositories.TERMS_AND_CONDITIONS%TYPE,
9    P_CLUB_QUAL_TEXT           IN cn_sf_repositories.CLUB_QUAL_TEXT%TYPE,
10    P_APPROVER_NAME            IN cn_sf_repositories.APPROVER_NAME%TYPE,
11    P_APPROVER_TITLE           IN cn_sf_repositories.APPROVER_TITLE%TYPE,
12    P_APPROVER_ORG_NAME        IN cn_sf_repositories.APPROVER_ORG_NAME%TYPE,
13    P_FILE_ID                  IN cn_sf_repositories.FILE_ID%TYPE,
14    P_FORMU_ACTIVATED_FLAG     IN cn_sf_repositories.FORMU_ACTIVATED_FLAG%TYPE,
15    P_TRANSACTION_CALENDAR_ID  IN cn_sf_repositories.TRANSACTION_CALENDAR_ID%TYPE,
16    p_attribute_category IN cn_sf_repositories.attribute_category%TYPE := NULL,
17    p_attribute1 IN cn_sf_repositories.attribute1%TYPE := NULL,
18    p_attribute2 IN cn_sf_repositories.attribute2%TYPE := NULL,
19    p_attribute3 IN cn_sf_repositories.attribute3%TYPE := NULL,
20    p_attribute4 IN cn_sf_repositories.attribute4%TYPE := NULL,
21    p_attribute5 IN cn_sf_repositories.attribute5%TYPE := NULL,
22    p_attribute6 IN cn_sf_repositories.attribute6%TYPE := NULL,
23    p_attribute7 IN cn_sf_repositories.attribute7%TYPE := NULL,
24    p_attribute8 IN cn_sf_repositories.attribute8%TYPE := NULL,
25    p_attribute9 IN cn_sf_repositories.attribute9%TYPE := NULL,
26    p_attribute10 IN cn_sf_repositories.attribute10%TYPE := NULL,
27    p_attribute11 IN cn_sf_repositories.attribute11%TYPE := NULL,
28    p_attribute12 IN cn_sf_repositories.attribute12%TYPE := NULL,
29    p_attribute13 IN cn_sf_repositories.attribute13%TYPE := NULL,
30    p_attribute14 IN cn_sf_repositories.attribute14%TYPE := NULL,
31    p_attribute15 IN cn_sf_repositories.attribute15%TYPE := NULL,
32    p_created_by IN  cn_sf_repositories.created_by%TYPE := NULL,
33    p_creation_date IN cn_sf_repositories.creation_date%TYPE := NULL,
34    p_last_update_login IN cn_sf_repositories.last_update_login%TYPE := NULL,
35    p_last_update_date IN cn_sf_repositories.last_update_date%TYPE := NULL,
36    p_last_updated_by IN cn_sf_repositories.last_updated_by%TYPE := NULL,
37    p_OBJECT_VERSION_NUMBER IN cn_sf_repositories.OBJECT_VERSION_NUMBER%TYPE := NULL)
38    IS
39    MN NUMBER        := FND_API.G_MISS_NUM;
40    MC VARCHAR2(150) := FND_API.G_MISS_CHAR;
41    MD DATE          := FND_API.G_MISS_DATE;
42 
43 BEGIN
44 
45     --DBMS_OUTPUT.PUT_LINE('Begin : I have just ran the insert_row.');
46 
47    INSERT INTO cn_sf_repositories (
48      REPOSITORY_ID,
49      CONTRACT_TITLE,
50      TERMS_AND_CONDITIONS,
51      CLUB_QUAL_TEXT,
52      APPROVER_NAME,
53      APPROVER_TITLE,
54      APPROVER_ORG_NAME,
55      FILE_ID,
56      FORMU_ACTIVATED_FLAG,
57      TRANSACTION_CALENDAR_ID,
58      attribute_category,
59      attribute1,
60      attribute2,
61      attribute3,
62      attribute4,
63      attribute5,
64      attribute6,
65      attribute7,
66      attribute8,
67      attribute9,
68      attribute10,
69      attribute11,
70      attribute12,
71      attribute13,
72      attribute14,
73      attribute15,
74      CREATED_BY,
75      CREATION_DATE,
76      LAST_UPDATE_LOGIN,
77      LAST_UPDATE_DATE,
78      LAST_UPDATED_BY,
79      object_version_number
80    )
81    SELECT
82      cn_sf_repositories_s.nextval,
83      P_CONTRACT_TITLE,
84      P_TERMS_AND_CONDITIONS,
85      P_CLUB_QUAL_TEXT,
86      P_APPROVER_NAME ,
87      P_APPROVER_TITLE,
88      P_APPROVER_ORG_NAME,
89      P_FILE_ID,
90      P_FORMU_ACTIVATED_FLAG,
91      P_TRANSACTION_CALENDAR_ID,
92      decode(p_attribute_category, mc, null, p_attribute_category),
93      decode(p_attribute1, mc, null, p_attribute1),
94      decode(p_attribute2, mc, null, p_attribute2),
95      decode(p_attribute3, mc, null, p_attribute3),
96      decode(p_attribute4, mc, null, p_attribute4),
97      decode(p_attribute5, mc, null, p_attribute5),
98      decode(p_attribute6, mc, null, p_attribute6),
99      decode(p_attribute7, mc, null, p_attribute7),
100      decode(p_attribute8, mc, null, p_attribute8),
101      decode(p_attribute9, mc, null, p_attribute9),
102      decode(p_attribute10, mc, null, p_attribute10),
103      decode(p_attribute11, mc, null, p_attribute11),
104      decode(p_attribute12, mc, null, p_attribute12),
105      decode(p_attribute13, mc, null, p_attribute13),
106      decode(p_attribute14, mc, null, p_attribute14),
107      decode(p_attribute15, mc, null, p_attribute15),
108      fnd_global.user_id,
109      sysdate,
110      fnd_global.login_id,
111      sysdate,
112      fnd_global.user_id,
113      1
114     FROM dual;
115 
116  --DBMS_OUTPUT.PUT_LINE('End : I have just ran the insert_row.');
117 END insert_row;
118 
119 
120 PROCEDURE update_row
121 (
122    P_REPOSITORY_ID            IN cn_sf_repositories.REPOSITORY_ID%TYPE,
123    P_CONTRACT_TITLE           IN cn_sf_repositories.CONTRACT_TITLE%TYPE,
124    P_TERMS_AND_CONDITIONS     IN cn_sf_repositories.TERMS_AND_CONDITIONS%TYPE,
125    P_CLUB_QUAL_TEXT           IN cn_sf_repositories.CLUB_QUAL_TEXT%TYPE,
126    P_APPROVER_NAME            IN cn_sf_repositories.APPROVER_NAME%TYPE,
127    P_APPROVER_TITLE           IN cn_sf_repositories.APPROVER_TITLE%TYPE,
128    P_APPROVER_ORG_NAME        IN cn_sf_repositories.APPROVER_ORG_NAME%TYPE,
129    P_FILE_ID                  IN cn_sf_repositories.FILE_ID%TYPE,
130    P_FORMU_ACTIVATED_FLAG     IN cn_sf_repositories.FORMU_ACTIVATED_FLAG%TYPE,
131    P_TRANSACTION_CALENDAR_ID  IN cn_sf_repositories.TRANSACTION_CALENDAR_ID%TYPE,
132    p_attribute_category IN cn_sf_repositories.attribute_category%TYPE := NULL,
133    p_attribute1 IN cn_sf_repositories.attribute1%TYPE := NULL,
134    p_attribute2 IN cn_sf_repositories.attribute2%TYPE := NULL,
135    p_attribute3 IN cn_sf_repositories.attribute3%TYPE := NULL,
136    p_attribute4 IN cn_sf_repositories.attribute4%TYPE := NULL,
137    p_attribute5 IN cn_sf_repositories.attribute5%TYPE := NULL,
138    p_attribute6 IN cn_sf_repositories.attribute6%TYPE := NULL,
139    p_attribute7 IN cn_sf_repositories.attribute7%TYPE := NULL,
140    p_attribute8 IN cn_sf_repositories.attribute8%TYPE := NULL,
141    p_attribute9 IN cn_sf_repositories.attribute9%TYPE := NULL,
142    p_attribute10 IN cn_sf_repositories.attribute10%TYPE := NULL,
143    p_attribute11 IN cn_sf_repositories.attribute11%TYPE := NULL,
144    p_attribute12 IN cn_sf_repositories.attribute12%TYPE := NULL,
145    p_attribute13 IN cn_sf_repositories.attribute13%TYPE := NULL,
146    p_attribute14 IN cn_sf_repositories.attribute14%TYPE := NULL,
147    p_attribute15 IN cn_sf_repositories.attribute15%TYPE := NULL,
148    p_created_by IN  cn_sf_repositories.created_by%TYPE := NULL,
149    p_creation_date IN cn_sf_repositories.creation_date%TYPE := NULL,
150    p_last_update_login IN cn_sf_repositories.last_update_login%TYPE := NULL,
151    p_last_update_date IN cn_sf_repositories.last_update_date%TYPE := NULL,
152    p_last_updated_by IN cn_sf_repositories.last_updated_by%TYPE := NULL,
153    p_object_version_number IN cn_sf_repositories.OBJECT_VERSION_NUMBER%TYPE := NULL) IS
154 
155    /* CURSOR l_old_csr IS
156       SELECT *
157 	FROM cn_seasonalities
158        WHERE SEASONALITY_ID = P_SEASONALITY_ID AND SEAS_SCHEDULE_ID = P_SEAS_SCHEDULE_ID ;
159        */
160 
161    CURSOR l_old_csr IS
162       SELECT *
163 	FROM cn_sf_repositories
164        WHERE REPOSITORY_ID = P_REPOSITORY_ID;
165 
166    l_old_rec   l_old_csr%ROWTYPE;
167 
168    MN NUMBER        := FND_API.G_MISS_NUM;
169    MC VARCHAR2(150) := FND_API.G_MISS_CHAR;
170    MD DATE          := FND_API.G_MISS_DATE;
171 
172    l_object_version_number  NUMBER;
173    l_num NUMBER ;
174 
175 BEGIN
176    OPEN l_old_csr;
177    FETCH l_old_csr INTO l_old_rec;
178    CLOSE l_old_csr;
179 
180    SELECT decode(p_object_version_number, mn,
181                  l_old_rec.object_version_number, p_object_version_number)
182    INTO l_object_version_number
183    FROM dual;
184    l_num := l_old_rec.repository_id ;
185 
186    --DBMS_OUTPUT.PUT_LINE('I have just ran the update_row.');
187 
188    -- check object version number
189    IF l_object_version_number <> l_old_rec.object_version_number THEN
190      fnd_message.set_name('CN', 'CN_RECORD_CHANGED');
191      fnd_msg_pub.add;
192      raise fnd_api.g_exc_error;
193    END IF;
194 
195    --DBMS_OUTPUT.PUT_LINE(' Table Handlers update : Started. ID : ');
196    --DBMS_OUTPUT.PUT_LINE('Old Num : ' || l_num || ' ID in procedure : ' || p_repository_id);
197    --DBMS_OUTPUT.PUT_LINE('Parameter version ' || p_object_version_number) ;
198    --DBMS_OUTPUT.PUT_LINE('version Number :' || l_object_version_number || ': OVN :' || l_old_rec.object_version_number) ;
199    --update cn_sf_repositories set contract_title = ( select 'wormsss4' from dual ) where repository_id = 10061 ;
200 
201    UPDATE cn_sf_repositories SET (
202      CONTRACT_TITLE,
203      TERMS_AND_CONDITIONS,
204      CLUB_QUAL_TEXT,
205      APPROVER_NAME,
206      APPROVER_TITLE,
207      APPROVER_ORG_NAME,
208      FILE_ID,
209      FORMU_ACTIVATED_FLAG,
210      TRANSACTION_CALENDAR_ID,
211      attribute_category,
212      attribute1,
213      attribute2,
214      attribute3,
215      attribute4,
216      attribute5,
217      attribute6,
218      attribute7,
219      attribute8,
220      attribute9,
221      attribute10,
222      attribute11,
223      attribute12,
224      attribute13,
225      attribute14,
226      attribute15,
227      object_version_number,
228      LAST_UPDATE_DATE,
229      LAST_UPDATED_BY,
230      LAST_UPDATE_LOGIN
231    ) =
232      (
233       SELECT
234         P_CONTRACT_TITLE,
235         P_TERMS_AND_CONDITIONS,
236         P_CLUB_QUAL_TEXT,
237         P_APPROVER_NAME,
238         P_APPROVER_TITLE,
239         P_APPROVER_ORG_NAME,
240         P_FILE_ID,
241         P_FORMU_ACTIVATED_FLAG,
242         P_TRANSACTION_CALENDAR_ID,
243         decode(p_attribute_category, mc, l_old_rec.attribute_category,p_attribute_category),
244         decode(p_attribute1, mc, l_old_rec.attribute1, p_attribute1),
245         decode(p_attribute2, mc, l_old_rec.attribute2, p_attribute2),
246         decode(p_attribute3, mc, l_old_rec.attribute3, p_attribute3),
247         decode(p_attribute4, mc, l_old_rec.attribute4, p_attribute4),
248         decode(p_attribute5, mc, l_old_rec.attribute5, p_attribute5),
249         decode(p_attribute6, mc, l_old_rec.attribute6, p_attribute6),
250         decode(p_attribute7, mc, l_old_rec.attribute7, p_attribute7),
251         decode(p_attribute8, mc, l_old_rec.attribute8, p_attribute8),
252         decode(p_attribute9, mc, l_old_rec.attribute9, p_attribute9),
253         decode(p_attribute10, mc, l_old_rec.attribute10, p_attribute10),
254         decode(p_attribute11, mc, l_old_rec.attribute11, p_attribute11),
255         decode(p_attribute12, mc, l_old_rec.attribute12, p_attribute12),
256         decode(p_attribute13, mc, l_old_rec.attribute13, p_attribute13),
257         decode(p_attribute14, mc, l_old_rec.attribute14, p_attribute14),
258         decode(p_attribute15, mc, l_old_rec.attribute15, p_attribute15),
259         decode(p_object_version_number, mn,l_old_rec.object_version_number, p_object_version_number+1),
260         sysdate,
261         fnd_global.user_id,
262         fnd_global.login_id
263        FROM dual)
264        WHERE repository_id = p_repository_id;
265 
266        --DBMS_OUTPUT.PUT_LINE(' Table Handlers update : Completed. 1');
267 END update_row;
268 
269 -- delete record
270 PROCEDURE delete_row
271   (P_REPOSITORY_ID  IN cn_sf_repositories.REPOSITORY_ID%TYPE) IS
272 BEGIN
273    DELETE FROM cn_sf_repositories
274         WHERE REPOSITORY_ID = P_REPOSITORY_ID;
275    --DBMS_OUTPUT.PUT_LINE('I have just ran the procedure.');
276 END delete_row;
277 
278 END CN_SF_PARAMS_pkg;