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_SEASONALITIES_PKG

Source


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