21:
22:
23: PROCEDURE create_resource_team
24: (P_API_VERSION IN NUMBER,
25: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
26: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
27: P_TEAM_NAME IN JTF_RS_TEAMS_VL.TEAM_NAME%TYPE,
28: P_TEAM_DESC IN JTF_RS_TEAMS_VL.TEAM_DESC%TYPE DEFAULT NULL,
29: P_EXCLUSIVE_FLAG IN JTF_RS_TEAMS_VL.EXCLUSIVE_FLAG%TYPE DEFAULT 'N',
22:
23: PROCEDURE create_resource_team
24: (P_API_VERSION IN NUMBER,
25: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
26: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
27: P_TEAM_NAME IN JTF_RS_TEAMS_VL.TEAM_NAME%TYPE,
28: P_TEAM_DESC IN JTF_RS_TEAMS_VL.TEAM_DESC%TYPE DEFAULT NULL,
29: P_EXCLUSIVE_FLAG IN JTF_RS_TEAMS_VL.EXCLUSIVE_FLAG%TYPE DEFAULT 'N',
30: P_EMAIL_ADDRESS IN JTF_RS_TEAMS_VL.EMAIL_ADDRESS%TYPE DEFAULT NULL,
53:
54:
55: SAVEPOINT create_resource_team_pub;
56:
57: x_return_status := fnd_api.g_ret_sts_success;
58:
59: -- DBMS_OUTPUT.put_line(' Started Create Resource Team Pub ');
60:
61:
58:
59: -- DBMS_OUTPUT.put_line(' Started Create Resource Team Pub ');
60:
61:
62: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
63:
64: RAISE fnd_api.g_exc_unexpected_error;
65:
66: END IF;
60:
61:
62: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
63:
64: RAISE fnd_api.g_exc_unexpected_error;
65:
66: END IF;
67:
68:
65:
66: END IF;
67:
68:
69: IF fnd_api.to_boolean(p_init_msg_list) THEN
70:
71: fnd_msg_pub.initialize;
72:
73: END IF;
81:
82: fnd_message.set_name('JTF', 'JTF_RS_TEAM_NAME_NULL');
83: fnd_msg_pub.add;
84:
85: x_return_status := fnd_api.g_ret_sts_unexp_error;
86:
87: RAISE fnd_api.g_exc_unexpected_error;
88:
89: END IF;
83: fnd_msg_pub.add;
84:
85: x_return_status := fnd_api.g_ret_sts_unexp_error;
86:
87: RAISE fnd_api.g_exc_unexpected_error;
88:
89: END IF;
90:
91:
97:
98: fnd_message.set_name('JTF', 'JTF_RS_START_DATE_NULL');
99: fnd_msg_pub.add;
100:
101: x_return_status := fnd_api.g_ret_sts_unexp_error;
102:
103: RAISE fnd_api.g_exc_unexpected_error;
104:
105: END IF;
99: fnd_msg_pub.add;
100:
101: x_return_status := fnd_api.g_ret_sts_unexp_error;
102:
103: RAISE fnd_api.g_exc_unexpected_error;
104:
105: END IF;
106:
107:
108: /* Call the private procedure with the validated parameters. */
109:
110: jtf_rs_teams_pvt.create_resource_team
111: (P_API_VERSION => 1,
112: P_INIT_MSG_LIST => fnd_api.g_false,
113: P_COMMIT => fnd_api.g_false,
114: P_TEAM_NAME => l_team_name,
115: P_TEAM_DESC => l_team_desc,
116: P_EXCLUSIVE_FLAG => l_exclusive_flag,
109:
110: jtf_rs_teams_pvt.create_resource_team
111: (P_API_VERSION => 1,
112: P_INIT_MSG_LIST => fnd_api.g_false,
113: P_COMMIT => fnd_api.g_false,
114: P_TEAM_NAME => l_team_name,
115: P_TEAM_DESC => l_team_desc,
116: P_EXCLUSIVE_FLAG => l_exclusive_flag,
117: P_EMAIL_ADDRESS => l_email_address,
124: X_TEAM_NUMBER => x_team_number
125: );
126:
127:
128: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
129:
130: -- dbms_output.put_line('Failed status from call to private procedure');
131:
132: RAISE fnd_api.g_exc_unexpected_error;
128: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
129:
130: -- dbms_output.put_line('Failed status from call to private procedure');
131:
132: RAISE fnd_api.g_exc_unexpected_error;
133:
134: END IF;
135:
136:
133:
134: END IF;
135:
136:
137: IF fnd_api.to_boolean(p_commit) THEN
138:
139: COMMIT WORK;
140:
141: END IF;
145:
146: EXCEPTION
147:
148:
149: WHEN fnd_api.g_exc_unexpected_error THEN
150:
151: -- DBMS_OUTPUT.put_line (' ========================================== ');
152:
153: -- DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error ======= ======== ');
153: -- DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error ======= ======== ');
154:
155: ROLLBACK TO create_resource_team_pub;
156:
157: x_return_status := fnd_api.g_ret_sts_unexp_error;
158:
159: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
160:
161:
168: -- DBMS_OUTPUT.put_line (SQLCODE || SQLERRM);
169:
170: ROLLBACK TO create_resource_team_pub;
171:
172: x_return_status := fnd_api.g_ret_sts_unexp_error;
173:
174: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
175:
176:
182: passed by calling routines. */
183:
184: PROCEDURE update_resource_team
185: (P_API_VERSION IN NUMBER,
186: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
187: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
188: P_TEAM_ID IN JTF_RS_TEAMS_VL.TEAM_ID%TYPE,
189: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
190: P_TEAM_NAME IN JTF_RS_TEAMS_VL.TEAM_NAME%TYPE DEFAULT FND_API.G_MISS_CHAR,
183:
184: PROCEDURE update_resource_team
185: (P_API_VERSION IN NUMBER,
186: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
187: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
188: P_TEAM_ID IN JTF_RS_TEAMS_VL.TEAM_ID%TYPE,
189: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
190: P_TEAM_NAME IN JTF_RS_TEAMS_VL.TEAM_NAME%TYPE DEFAULT FND_API.G_MISS_CHAR,
191: P_TEAM_DESC IN JTF_RS_TEAMS_VL.TEAM_DESC%TYPE DEFAULT FND_API.G_MISS_CHAR,
186: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
187: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
188: P_TEAM_ID IN JTF_RS_TEAMS_VL.TEAM_ID%TYPE,
189: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
190: P_TEAM_NAME IN JTF_RS_TEAMS_VL.TEAM_NAME%TYPE DEFAULT FND_API.G_MISS_CHAR,
191: P_TEAM_DESC IN JTF_RS_TEAMS_VL.TEAM_DESC%TYPE DEFAULT FND_API.G_MISS_CHAR,
192: P_EXCLUSIVE_FLAG IN JTF_RS_TEAMS_VL.EXCLUSIVE_FLAG%TYPE DEFAULT FND_API.G_MISS_CHAR,
193: P_EMAIL_ADDRESS IN JTF_RS_TEAMS_VL.EMAIL_ADDRESS%TYPE DEFAULT FND_API.G_MISS_CHAR,
194: P_START_DATE_ACTIVE IN JTF_RS_TEAMS_VL.START_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
187: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
188: P_TEAM_ID IN JTF_RS_TEAMS_VL.TEAM_ID%TYPE,
189: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
190: P_TEAM_NAME IN JTF_RS_TEAMS_VL.TEAM_NAME%TYPE DEFAULT FND_API.G_MISS_CHAR,
191: P_TEAM_DESC IN JTF_RS_TEAMS_VL.TEAM_DESC%TYPE DEFAULT FND_API.G_MISS_CHAR,
192: P_EXCLUSIVE_FLAG IN JTF_RS_TEAMS_VL.EXCLUSIVE_FLAG%TYPE DEFAULT FND_API.G_MISS_CHAR,
193: P_EMAIL_ADDRESS IN JTF_RS_TEAMS_VL.EMAIL_ADDRESS%TYPE DEFAULT FND_API.G_MISS_CHAR,
194: P_START_DATE_ACTIVE IN JTF_RS_TEAMS_VL.START_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
195: P_END_DATE_ACTIVE IN JTF_RS_TEAMS_VL.END_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
188: P_TEAM_ID IN JTF_RS_TEAMS_VL.TEAM_ID%TYPE,
189: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
190: P_TEAM_NAME IN JTF_RS_TEAMS_VL.TEAM_NAME%TYPE DEFAULT FND_API.G_MISS_CHAR,
191: P_TEAM_DESC IN JTF_RS_TEAMS_VL.TEAM_DESC%TYPE DEFAULT FND_API.G_MISS_CHAR,
192: P_EXCLUSIVE_FLAG IN JTF_RS_TEAMS_VL.EXCLUSIVE_FLAG%TYPE DEFAULT FND_API.G_MISS_CHAR,
193: P_EMAIL_ADDRESS IN JTF_RS_TEAMS_VL.EMAIL_ADDRESS%TYPE DEFAULT FND_API.G_MISS_CHAR,
194: P_START_DATE_ACTIVE IN JTF_RS_TEAMS_VL.START_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
195: P_END_DATE_ACTIVE IN JTF_RS_TEAMS_VL.END_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
196: P_OBJECT_VERSION_NUM IN OUT NOCOPY JTF_RS_TEAMS_VL.OBJECT_VERSION_NUMBER%TYPE,
189: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
190: P_TEAM_NAME IN JTF_RS_TEAMS_VL.TEAM_NAME%TYPE DEFAULT FND_API.G_MISS_CHAR,
191: P_TEAM_DESC IN JTF_RS_TEAMS_VL.TEAM_DESC%TYPE DEFAULT FND_API.G_MISS_CHAR,
192: P_EXCLUSIVE_FLAG IN JTF_RS_TEAMS_VL.EXCLUSIVE_FLAG%TYPE DEFAULT FND_API.G_MISS_CHAR,
193: P_EMAIL_ADDRESS IN JTF_RS_TEAMS_VL.EMAIL_ADDRESS%TYPE DEFAULT FND_API.G_MISS_CHAR,
194: P_START_DATE_ACTIVE IN JTF_RS_TEAMS_VL.START_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
195: P_END_DATE_ACTIVE IN JTF_RS_TEAMS_VL.END_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
196: P_OBJECT_VERSION_NUM IN OUT NOCOPY JTF_RS_TEAMS_VL.OBJECT_VERSION_NUMBER%TYPE,
197: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
190: P_TEAM_NAME IN JTF_RS_TEAMS_VL.TEAM_NAME%TYPE DEFAULT FND_API.G_MISS_CHAR,
191: P_TEAM_DESC IN JTF_RS_TEAMS_VL.TEAM_DESC%TYPE DEFAULT FND_API.G_MISS_CHAR,
192: P_EXCLUSIVE_FLAG IN JTF_RS_TEAMS_VL.EXCLUSIVE_FLAG%TYPE DEFAULT FND_API.G_MISS_CHAR,
193: P_EMAIL_ADDRESS IN JTF_RS_TEAMS_VL.EMAIL_ADDRESS%TYPE DEFAULT FND_API.G_MISS_CHAR,
194: P_START_DATE_ACTIVE IN JTF_RS_TEAMS_VL.START_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
195: P_END_DATE_ACTIVE IN JTF_RS_TEAMS_VL.END_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
196: P_OBJECT_VERSION_NUM IN OUT NOCOPY JTF_RS_TEAMS_VL.OBJECT_VERSION_NUMBER%TYPE,
197: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
198: X_MSG_COUNT OUT NOCOPY NUMBER,
191: P_TEAM_DESC IN JTF_RS_TEAMS_VL.TEAM_DESC%TYPE DEFAULT FND_API.G_MISS_CHAR,
192: P_EXCLUSIVE_FLAG IN JTF_RS_TEAMS_VL.EXCLUSIVE_FLAG%TYPE DEFAULT FND_API.G_MISS_CHAR,
193: P_EMAIL_ADDRESS IN JTF_RS_TEAMS_VL.EMAIL_ADDRESS%TYPE DEFAULT FND_API.G_MISS_CHAR,
194: P_START_DATE_ACTIVE IN JTF_RS_TEAMS_VL.START_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
195: P_END_DATE_ACTIVE IN JTF_RS_TEAMS_VL.END_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
196: P_OBJECT_VERSION_NUM IN OUT NOCOPY JTF_RS_TEAMS_VL.OBJECT_VERSION_NUMBER%TYPE,
197: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
198: X_MSG_COUNT OUT NOCOPY NUMBER,
199: X_MSG_DATA OUT NOCOPY VARCHAR2
217:
218:
219: SAVEPOINT update_resource_team_pub;
220:
221: x_return_status := fnd_api.g_ret_sts_success;
222:
223: -- DBMS_OUTPUT.put_line(' Started Update Resource Team Pub ');
224:
225:
222:
223: -- DBMS_OUTPUT.put_line(' Started Update Resource Team Pub ');
224:
225:
226: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
227:
228: RAISE fnd_api.g_exc_unexpected_error;
229:
230: END IF;
224:
225:
226: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
227:
228: RAISE fnd_api.g_exc_unexpected_error;
229:
230: END IF;
231:
232:
229:
230: END IF;
231:
232:
233: IF fnd_api.to_boolean(p_init_msg_list) THEN
234:
235: fnd_msg_pub.initialize;
236:
237: END IF;
247: );
248: -- added for NOCOPY
249: l_team_id := l_team_id_out;
250:
251: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
252:
253: x_return_status := fnd_api.g_ret_sts_unexp_error;
254:
255: RAISE fnd_api.g_exc_unexpected_error;
249: l_team_id := l_team_id_out;
250:
251: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
252:
253: x_return_status := fnd_api.g_ret_sts_unexp_error;
254:
255: RAISE fnd_api.g_exc_unexpected_error;
256:
257: END IF;
251: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
252:
253: x_return_status := fnd_api.g_ret_sts_unexp_error;
254:
255: RAISE fnd_api.g_exc_unexpected_error;
256:
257: END IF;
258:
259:
261: /* Call the private procedure with the validated parameters. */
262:
263: jtf_rs_teams_pvt.update_resource_team
264: (P_API_VERSION => 1,
265: P_INIT_MSG_LIST => fnd_api.g_false,
266: P_COMMIT => fnd_api.g_false,
267: P_TEAM_ID => l_team_id,
268: P_TEAM_NAME => l_team_name,
269: P_TEAM_DESC => l_team_desc,
262:
263: jtf_rs_teams_pvt.update_resource_team
264: (P_API_VERSION => 1,
265: P_INIT_MSG_LIST => fnd_api.g_false,
266: P_COMMIT => fnd_api.g_false,
267: P_TEAM_ID => l_team_id,
268: P_TEAM_NAME => l_team_name,
269: P_TEAM_DESC => l_team_desc,
270: P_EXCLUSIVE_FLAG => l_exclusive_flag,
277: X_MSG_DATA => x_msg_data
278: );
279:
280:
281: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
282:
283: -- dbms_output.put_line('Failed status from call to private procedure');
284:
285: RAISE fnd_api.g_exc_unexpected_error;
281: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
282:
283: -- dbms_output.put_line('Failed status from call to private procedure');
284:
285: RAISE fnd_api.g_exc_unexpected_error;
286:
287: END IF;
288:
289: /* Return the new value of the object version number */
290:
291: p_object_version_num := l_object_version_num;
292:
293:
294: IF fnd_api.to_boolean(p_commit) THEN
295:
296: COMMIT WORK;
297:
298: END IF;
302:
303: EXCEPTION
304:
305:
306: WHEN fnd_api.g_exc_unexpected_error THEN
307:
308: -- DBMS_OUTPUT.put_line (' ========================================== ');
309:
310: -- DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error ======= ======== ');
310: -- DBMS_OUTPUT.put_line ('=========== Raised Unexpected Error ======= ======== ');
311:
312: ROLLBACK TO update_resource_team_pub;
313:
314: x_return_status := fnd_api.g_ret_sts_unexp_error;
315:
316: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
317:
318:
325: -- DBMS_OUTPUT.put_line (SQLCODE || SQLERRM);
326:
327: ROLLBACK TO update_resource_team_pub;
328:
329: x_return_status := fnd_api.g_ret_sts_unexp_error;
330:
331: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
332:
333: