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_SRP_TOTAL_COMPS_PKG

Source


1 PACKAGE BODY CN_SRP_TOTAL_COMPS_pkg AS
2   /*$Header: cntmotcb.pls 115.3 2002/01/28 20:04:57 pkm ship      $*/
3 
4 PROCEDURE insert_row
5   (p_SRP_TOTAL_COMP_ID IN cn_srp_total_comps.SRP_TOTAL_COMP_ID%TYPE,
6    p_srp_role_id         IN cn_srp_total_comps.srp_role_id%TYPE,
7    p_role_model_id IN cn_srp_total_comps.role_model_id%TYPE := NULL,
8    p_attain_tier_id IN cn_srp_total_comps.attain_tier_id%TYPE,
9    p_role_id IN cn_srp_total_comps.role_id%TYPE,
10    p_attain_schedule_id IN cn_srp_total_comps.attain_schedule_id%TYPE,
11    p_percent IN cn_srp_total_comps.percent%TYPE,
12    p_total_comp IN cn_srp_total_comps.total_comp%TYPE,
13    p_attribute_category IN cn_srp_total_comps.attribute_category%TYPE := NULL,
14    p_attribute1 IN cn_srp_total_comps.attribute1%TYPE := NULL,
15    p_attribute2 IN cn_srp_total_comps.attribute2%TYPE := NULL,
16    p_attribute3 IN cn_srp_total_comps.attribute3%TYPE := NULL,
17    p_attribute4 IN cn_srp_total_comps.attribute4%TYPE := NULL,
18    p_attribute5 IN cn_srp_total_comps.attribute5%TYPE := NULL,
19    p_attribute6 IN cn_srp_total_comps.attribute6%TYPE := NULL,
20    p_attribute7 IN cn_srp_total_comps.attribute7%TYPE := NULL,
21    p_attribute8 IN cn_srp_total_comps.attribute8%TYPE := NULL,
22    p_attribute9 IN cn_srp_total_comps.attribute9%TYPE := NULL,
23    p_attribute10 IN cn_srp_total_comps.attribute10%TYPE := NULL,
24    p_attribute11 IN cn_srp_total_comps.attribute11%TYPE := NULL,
25    p_attribute12 IN cn_srp_total_comps.attribute12%TYPE := NULL,
26    p_attribute13 IN cn_srp_total_comps.attribute13%TYPE := NULL,
27    p_attribute14 IN cn_srp_total_comps.attribute14%TYPE := NULL,
28    p_attribute15 IN cn_srp_total_comps.attribute15%TYPE := NULL,
29    p_created_by IN  cn_srp_total_comps.created_by%TYPE := NULL,
30    p_creation_date IN cn_srp_total_comps.creation_date%TYPE := NULL,
31    p_last_update_login IN cn_srp_total_comps.last_update_login%TYPE := NULL,
32    p_last_update_date IN cn_srp_total_comps.last_update_date%TYPE := NULL,
33    p_last_updated_by IN cn_srp_total_comps.last_updated_by%TYPE := NULL)
34    IS
35    MN NUMBER        := FND_API.G_MISS_NUM;
36    MC VARCHAR2(150) := FND_API.G_MISS_CHAR;
37    MD DATE          := FND_API.G_MISS_DATE;
38 
39 BEGIN
40    INSERT INTO cn_srp_total_comps(
41      SRP_TOTAL_COMP_ID,
42      srp_role_id,
43      role_model_id,
44      role_id,
45      attain_tier_id,
46      attain_schedule_id,
47      percent,
48      total_comp,
49      attribute_category,
50      attribute1,
51      attribute2,
52      attribute3,
53      attribute4,
54      attribute5,
55      attribute6,
56      attribute7,
57      attribute8,
58      attribute9,
59      attribute10,
60      attribute11,
61      attribute12,
62      attribute13,
63      attribute14,
64      attribute15,
65      CREATED_BY,
66      CREATION_DATE,
67      LAST_UPDATE_LOGIN,
68      LAST_UPDATE_DATE,
69      LAST_UPDATED_BY,
70      object_version_number
71    )
72    SELECT
73      cn_srp_total_comps_s.nextval,
74      p_srp_role_id,
75      p_role_model_id,
76      decode(p_role_id,mn,null,p_role_id),
77      decode(p_attain_tier_id,mn,null,p_attain_tier_id),
78      decode(p_attain_schedule_id,mn,null,p_attain_schedule_id),
79      decode(p_percent,mn,null,p_percent),
80      decode(p_total_comp,mn,null,p_total_comp),
81      decode(p_attribute_category, mc, null, p_attribute_category),
82      decode(p_attribute1, mc, null, p_attribute1),
83      decode(p_attribute2, mc, null, p_attribute2),
84      decode(p_attribute3, mc, null, p_attribute3),
85      decode(p_attribute4, mc, null, p_attribute4),
86      decode(p_attribute5, mc, null, p_attribute5),
87      decode(p_attribute6, mc, null, p_attribute6),
88      decode(p_attribute7, mc, null, p_attribute7),
89      decode(p_attribute8, mc, null, p_attribute8),
90      decode(p_attribute9, mc, null, p_attribute9),
91      decode(p_attribute10, mc, null, p_attribute10),
92      decode(p_attribute11, mc, null, p_attribute11),
93      decode(p_attribute12, mc, null, p_attribute12),
94      decode(p_attribute13, mc, null, p_attribute13),
95      decode(p_attribute14, mc, null, p_attribute14),
96      decode(p_attribute15, mc, null, p_attribute15),
97      fnd_global.user_id,
98      sysdate,
99      fnd_global.login_id,
100      sysdate,
101      fnd_global.user_id,
102      1
103     FROM dual;
104 END insert_row;
105 
106 
107 PROCEDURE update_row
108   (p_SRP_TOTAL_COMP_ID IN cn_srp_total_comps.SRP_TOTAL_COMP_ID%TYPE,
109    p_srp_role_id         IN cn_srp_total_comps.srp_role_id%TYPE,
110    p_role_model_id IN cn_srp_total_comps.role_model_id%TYPE :=NULL,
111    p_attain_tier_id IN cn_srp_total_comps.attain_tier_id%TYPE,
112    p_role_id IN cn_srp_total_comps.role_id%TYPE,
113    p_attain_schedule_id IN cn_srp_total_comps.attain_schedule_id%TYPE,
114    p_percent IN cn_srp_total_comps.percent%TYPE,
115    p_total_comp IN cn_srp_total_comps.total_comp%TYPE,
116    p_attribute_category IN cn_srp_total_comps.attribute_category%TYPE := NULL,
117    p_attribute1 IN cn_srp_total_comps.attribute1%TYPE := NULL,
118    p_attribute2 IN cn_srp_total_comps.attribute2%TYPE := NULL,
119    p_attribute3 IN cn_srp_total_comps.attribute3%TYPE := NULL,
120    p_attribute4 IN cn_srp_total_comps.attribute4%TYPE := NULL,
121    p_attribute5 IN cn_srp_total_comps.attribute5%TYPE := NULL,
122    p_attribute6 IN cn_srp_total_comps.attribute6%TYPE := NULL,
123    p_attribute7 IN cn_srp_total_comps.attribute7%TYPE := NULL,
124    p_attribute8 IN cn_srp_total_comps.attribute8%TYPE := NULL,
125    p_attribute9 IN cn_srp_total_comps.attribute9%TYPE := NULL,
126    p_attribute10 IN cn_srp_total_comps.attribute10%TYPE := NULL,
127    p_attribute11 IN cn_srp_total_comps.attribute11%TYPE := NULL,
128    p_attribute12 IN cn_srp_total_comps.attribute12%TYPE := NULL,
129    p_attribute13 IN cn_srp_total_comps.attribute13%TYPE := NULL,
130    p_attribute14 IN cn_srp_total_comps.attribute14%TYPE := NULL,
131    p_attribute15 IN cn_srp_total_comps.attribute15%TYPE := NULL,
132    p_last_update_login IN cn_srp_total_comps.last_update_login%TYPE,
133    p_last_update_date IN cn_srp_total_comps.last_update_date%TYPE,
134    p_last_updated_by IN cn_srp_total_comps.last_updated_by%TYPE,
135    p_object_version_number IN cn_srp_total_comps.object_version_number%TYPE) IS
136 
137    CURSOR l_old_csr IS
138       SELECT *
139 	FROM cn_srp_total_comps
140        WHERE srp_role_id = p_srp_role_id;
141 
142    l_old_rec   l_old_csr%ROWTYPE;
143 
144    MN NUMBER        := FND_API.G_MISS_NUM;
145    MC VARCHAR2(150) := FND_API.G_MISS_CHAR;
146    MD DATE          := FND_API.G_MISS_DATE;
147 
148    l_object_version_number  NUMBER;
149 
150 BEGIN
151    OPEN l_old_csr;
152    FETCH l_old_csr INTO l_old_rec;
153    CLOSE l_old_csr;
154 
155      SELECT decode(p_object_version_number, mn,
156                    l_old_rec.object_version_number, p_object_version_number)
157      INTO l_object_version_number
158      FROM dual
159         ;
160 
161    -- check object version number
162    IF l_object_version_number <> l_old_rec.object_version_number THEN
163      fnd_message.set_name('CN', 'CN_RECORD_CHANGED');
164      fnd_msg_pub.add;
165      raise fnd_api.g_exc_error;
166    END IF;
167 
168    UPDATE cn_srp_total_comps SET
169     (percent,
170      total_comp,
171      attribute_category,
172      attribute1,
173      attribute2,
174      attribute3,
175      attribute4,
176      attribute5,
177      attribute6,
178      attribute7,
179      attribute8,
180      attribute9,
181      attribute10,
182      attribute11,
183      attribute12,
184      attribute13,
185      attribute14,
186      attribute15,
187      object_version_number,
188      LAST_UPDATE_DATE,
189      LAST_UPDATED_BY,
190      LAST_UPDATE_LOGIN
191    ) =
192      (
193       SELECT
194         decode(p_percent, mn, l_old_rec.percent, p_percent),
195         decode(p_total_comp, mn, l_old_rec.total_comp, p_total_comp),
196         decode(p_attribute_category, mc, l_old_rec.attribute_category,p_attribute_category),
197         decode(p_attribute1, mc, l_old_rec.attribute1, p_attribute1),
198         decode(p_attribute2, mc, l_old_rec.attribute2, p_attribute2),
199         decode(p_attribute3, mc, l_old_rec.attribute3, p_attribute3),
200         decode(p_attribute4, mc, l_old_rec.attribute4, p_attribute4),
201         decode(p_attribute5, mc, l_old_rec.attribute5, p_attribute5),
202         decode(p_attribute6, mc, l_old_rec.attribute6, p_attribute6),
203         decode(p_attribute7, mc, l_old_rec.attribute7, p_attribute7),
204         decode(p_attribute8, mc, l_old_rec.attribute8, p_attribute8),
205         decode(p_attribute9, mc, l_old_rec.attribute9, p_attribute9),
206         decode(p_attribute10, mc, l_old_rec.attribute10, p_attribute10),
207         decode(p_attribute11, mc, l_old_rec.attribute11, p_attribute11),
208         decode(p_attribute12, mc, l_old_rec.attribute12, p_attribute12),
209         decode(p_attribute13, mc, l_old_rec.attribute13, p_attribute13),
210         decode(p_attribute14, mc, l_old_rec.attribute14, p_attribute14),
211         decode(p_attribute15, mc, l_old_rec.attribute15, p_attribute15),
212         decode(p_object_version_number, mn,l_old_rec.object_version_number, p_object_version_number+1),
213         sysdate,
214         fnd_global.user_id,
215         fnd_global.login_id
216        FROM dual)
217        WHERE srp_role_id = p_srp_role_id and attain_tier_id = p_attain_tier_id
218        and attain_schedule_id = p_attain_schedule_id;
219 END update_row;
220 
221 
222 PROCEDURE delete_row
223   (p_srp_role_id         IN cn_srp_total_comps.srp_role_id%TYPE) IS
224 BEGIN
225    DELETE FROM cn_srp_total_comps
226      WHERE srp_role_id = p_srp_role_id;
227 
228 END delete_row;
229 
230 END CN_SRP_TOTAL_COMPS_pkg;