[Home] [Help]
PACKAGE BODY: APPS.AMS_CAL_CRT_PKG
Source
1 PACKAGE BODY AMS_Cal_Crt_PKG as
2 /* $Header: amstcctb.pls 115.4 2003/03/08 14:18:25 cgoyal noship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- AMS_Cal_Crt_PKG
7 -- Purpose
8 --
9 -- History
10 --
11 -- NOTE
12 --
13 -- This Api is generated with Latest version of
14 -- Rosetta, where g_miss indicates NULL and
15 -- NULL indicates missing value. Rosetta Version 1.55
16 -- End of Comments
17 -- ===============================================================
18
19
20 G_PKG_NAME CONSTANT VARCHAR2(30):= 'AMS_Cal_Crt_PKG';
21 G_FILE_NAME CONSTANT VARCHAR2(12) := 'amstcctb.pls';
22
23
24
25
26 -- ========================================================
27 --
28 -- NAME
29 -- Insert_Row
30 --
31 -- PURPOSE
32 --
33 -- NOTES
34 --
35 -- HISTORY
36 --
37 -- ========================================================
38 AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
39 AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
40 AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
41
42 PROCEDURE Insert_Row(
43 px_criteria_id IN OUT NOCOPY NUMBER,
44 p_object_type_code VARCHAR2,
45 p_custom_setup_id NUMBER,
46 p_activity_type_code VARCHAR2,
47 p_activity_id NUMBER,
48 p_status_id NUMBER,
49 p_priority_id VARCHAR2,
50 p_object_id NUMBER,
51 p_criteria_start_date DATE,
52 p_criteria_end_date DATE,
53 p_criteria_deleted VARCHAR2,
54 p_criteria_enabled VARCHAR2,
55 p_last_update_date DATE,
56 p_last_updated_by NUMBER,
57 p_creation_date DATE,
58 p_created_by NUMBER,
59 p_last_update_login NUMBER,
60 px_object_version_number IN OUT NOCOPY NUMBER)
61
62 IS
63 x_rowid VARCHAR2(30);
64
65
66 BEGIN
67
68
69 px_object_version_number := nvl(px_object_version_number, 1);
70
71
72 INSERT INTO ams_calendar_criteria(
73 criteria_id,
74 object_type_code,
75 custom_setup_id,
76 activity_type_code,
77 activity_id,
78 status_id,
79 priority_id,
80 object_id,
81 criteria_start_date,
82 criteria_end_date,
83 criteria_deleted,
84 criteria_enabled,
85 last_update_date,
86 last_updated_by,
87 creation_date,
88 created_by,
89 last_update_login,
90 object_version_number
91 ) VALUES (
92 DECODE( px_criteria_id, FND_API.G_MISS_NUM, NULL, px_criteria_id),
93 DECODE( p_object_type_code, FND_API.g_miss_char, NULL, p_object_type_code),
94 DECODE( p_custom_setup_id, FND_API.G_MISS_NUM, NULL, p_custom_setup_id),
95 DECODE( p_activity_type_code, FND_API.g_miss_char, NULL, p_activity_type_code),
96 DECODE( p_activity_id, FND_API.G_MISS_NUM, NULL, p_activity_id),
97 DECODE( p_status_id, FND_API.G_MISS_NUM, NULL, p_status_id),
98 DECODE( p_priority_id, FND_API.g_miss_char, NULL, p_priority_id),
99 DECODE( p_object_id, FND_API.G_MISS_NUM, NULL, p_object_id),
100 DECODE( p_criteria_start_date, FND_API.G_MISS_DATE, NULL, p_criteria_start_date),
101 DECODE( p_criteria_end_date, FND_API.G_MISS_DATE, NULL, p_criteria_end_date),
102 'N',
103 'Y',
104 DECODE( p_last_update_date, FND_API.G_MISS_DATE, SYSDATE, p_last_update_date),
105 DECODE( p_last_updated_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_last_updated_by),
106 DECODE( p_creation_date, FND_API.G_MISS_DATE, SYSDATE, p_creation_date),
107 DECODE( p_created_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_created_by),
108 DECODE( p_last_update_login, FND_API.G_MISS_NUM, FND_GLOBAL.CONC_LOGIN_ID, p_last_update_login),
109 DECODE( px_object_version_number, FND_API.G_MISS_NUM, 1, px_object_version_number));
110
111 END Insert_Row;
112
113
114
115
116 -- ========================================================
117 --
118 -- NAME
119 -- Update_Row
120 --
121 -- PURPOSE
122 --
123 -- NOTES
124 --
125 -- HISTORY
126 --
127 -- ========================================================
128 PROCEDURE Update_Row(
129 p_criteria_id NUMBER,
130 p_object_type_code VARCHAR2,
131 p_custom_setup_id NUMBER,
132 p_activity_type_code VARCHAR2,
133 p_activity_id NUMBER,
134 p_status_id NUMBER,
135 p_priority_id VARCHAR2,
136 p_object_id NUMBER,
137 p_criteria_start_date DATE,
138 p_criteria_end_date DATE,
139 p_criteria_deleted VARCHAR2,
140 p_criteria_enabled VARCHAR2,
141 p_last_update_date DATE,
142 p_last_updated_by NUMBER,
143 p_last_update_login NUMBER,
144 p_object_version_number IN NUMBER)
145
146 IS
147 BEGIN
148 Update ams_calendar_criteria
149 SET
150 criteria_id = DECODE( p_criteria_id, null, criteria_id, FND_API.G_MISS_NUM, null, p_criteria_id),
151 object_type_code = DECODE( p_object_type_code, null, object_type_code, FND_API.g_miss_char, null, p_object_type_code),
152 custom_setup_id = DECODE( p_custom_setup_id, null, custom_setup_id, FND_API.G_MISS_NUM, null, p_custom_setup_id),
153 activity_type_code = DECODE( p_activity_type_code, null, activity_type_code, FND_API.g_miss_char, null, p_activity_type_code),
154 activity_id = DECODE( p_activity_id, null, activity_id, FND_API.G_MISS_NUM, null, p_activity_id),
155 status_id = DECODE( p_status_id, null, status_id, FND_API.G_MISS_NUM, null, p_status_id),
156 priority_id = DECODE( p_priority_id, null, priority_id, FND_API.g_miss_char, null, p_priority_id),
157 object_id = DECODE( p_object_id, null, object_id, FND_API.G_MISS_NUM, null, p_object_id),
158 criteria_start_date = DECODE( p_criteria_start_date, null, criteria_start_date, FND_API.G_MISS_DATE, null, p_criteria_start_date),
159 criteria_end_date = DECODE( p_criteria_end_date, null, criteria_end_date, FND_API.G_MISS_DATE, null, p_criteria_end_date),
160 criteria_deleted = DECODE( p_criteria_deleted, null, criteria_deleted, FND_API.g_miss_char, null, p_criteria_deleted),
161 criteria_enabled = DECODE( p_criteria_enabled, null, criteria_enabled, FND_API.g_miss_char, null, p_criteria_enabled),
162 last_update_date = DECODE( p_last_update_date, null, last_update_date, FND_API.G_MISS_DATE, null, p_last_update_date),
163 last_updated_by = DECODE( p_last_updated_by, null, last_updated_by, FND_API.G_MISS_NUM, null, p_last_updated_by),
164 last_update_login = DECODE( p_last_update_login, null, last_update_login, FND_API.G_MISS_NUM, null, p_last_update_login),
165 object_version_number = nvl(p_object_version_number,0) + 1
166 WHERE criteria_id = p_criteria_id
167 AND object_version_number = p_object_version_number;
168
169
170 IF (SQL%NOTFOUND) THEN
171 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172 END IF;
173
174
175 END Update_Row;
176
177
178
179
180 -- ========================================================
181 --
182 -- NAME
183 -- Delete_Row
184 --
185 -- PURPOSE
186 --
187 -- NOTES
188 --
189 -- HISTORY
190 --
191 -- ========================================================
192 PROCEDURE Delete_Row(
193 p_criteria_id NUMBER,
194 p_object_version_number NUMBER)
195 IS
196 BEGIN
197 DELETE FROM ams_calendar_criteria
198 WHERE criteria_id = p_criteria_id
199 AND object_version_number = p_object_version_number;
200 If (SQL%NOTFOUND) then
201 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
202 End If;
203 END Delete_Row ;
204
205
206
207
208
209 -- ========================================================
210 --
211 -- NAME
212 -- Lock_Row
213 --
214 -- PURPOSE
215 --
216 -- NOTES
217 --
218 -- HISTORY
219 --
220 -- ========================================================
221 PROCEDURE Lock_Row(
222 p_criteria_id NUMBER,
223 p_object_version_number NUMBER)
224 IS
225 CURSOR C IS
226 SELECT *
227 FROM ams_calendar_criteria
228 WHERE criteria_id = p_criteria_id
229 AND object_version_number = p_object_version_number
230 FOR UPDATE OF criteria_id NOWAIT;
231 Recinfo C%ROWTYPE;
232 BEGIN
233
234 OPEN c;
235 FETCH c INTO Recinfo;
236 IF (c%NOTFOUND) THEN
237 CLOSE c;
238 AMS_Utility_PVT.error_message ('AMS_API_RECORD_NOT_FOUND');
239 RAISE FND_API.g_exc_error;
240 END IF;
241 CLOSE c;
242 END Lock_Row;
243
244 END AMS_Cal_Crt_PKG;