DBA Data[Home] [Help]

APPS.AHL_LTP_SPACE_ASSIGN_PUB dependencies on FND_API

Line 38: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

34: -- NOTES
35: --
36: PROCEDURE Assign_Sch_Visit_Spaces (
37: p_api_version IN NUMBER,
38: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
39: p_commit IN VARCHAR2 := Fnd_Api.g_false,
40: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
41: p_module_type IN VARCHAR2 := 'JSP',
42: p_x_space_assignment_tbl IN OUT NOCOPY Space_Assignment_Tbl,

Line 39: p_commit IN VARCHAR2 := Fnd_Api.g_false,

35: --
36: PROCEDURE Assign_Sch_Visit_Spaces (
37: p_api_version IN NUMBER,
38: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
39: p_commit IN VARCHAR2 := Fnd_Api.g_false,
40: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
41: p_module_type IN VARCHAR2 := 'JSP',
42: p_x_space_assignment_tbl IN OUT NOCOPY Space_Assignment_Tbl,
43: p_x_schedule_visit_rec IN OUT NOCOPY Schedule_Visit_Rec,

Line 40: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

36: PROCEDURE Assign_Sch_Visit_Spaces (
37: p_api_version IN NUMBER,
38: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
39: p_commit IN VARCHAR2 := Fnd_Api.g_false,
40: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
41: p_module_type IN VARCHAR2 := 'JSP',
42: p_x_space_assignment_tbl IN OUT NOCOPY Space_Assignment_Tbl,
43: p_x_schedule_visit_rec IN OUT NOCOPY Schedule_Visit_Rec,
44: x_return_status OUT NOCOPY VARCHAR2,

Line 69: IF Fnd_Api.to_boolean(p_init_msg_list)

65: IF G_DEBUG='Y' THEN
66: Ahl_Debug_Pub.debug( 'enter ahl_ltp_space_assign_pub.Assign Sch Visit Spaces','+SPANT+');
67: END IF;
68: -- Standard call to check for call compatibility.
69: IF Fnd_Api.to_boolean(p_init_msg_list)
70: THEN
71: Fnd_Msg_Pub.initialize;
72: END IF;
73: -- Initialize API return status to success

Line 74: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

70: THEN
71: Fnd_Msg_Pub.initialize;
72: END IF;
73: -- Initialize API return status to success
74: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
75: -- Initialize message list if p_init_msg_list is set to TRUE.
76: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
77: p_api_version,
78: l_api_name,G_PKG_NAME)

Line 76: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,

72: END IF;
73: -- Initialize API return status to success
74: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
75: -- Initialize message list if p_init_msg_list is set to TRUE.
76: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
77: p_api_version,
78: l_api_name,G_PKG_NAME)
79: THEN
80: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

Line 80: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

76: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
77: p_api_version,
78: l_api_name,G_PKG_NAME)
79: THEN
80: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
81: END IF;
82: --------------------Start of API Body-----------------------------------
83: IF p_x_space_assignment_tbl.COUNT > 0 THEN
84: FOR i IN p_x_space_assignment_tbl.FIRST..p_x_space_assignment_tbl.LAST

Line 142: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

138: l_msg_count := Fnd_Msg_Pub.count_msg;
139:
140: IF l_msg_count > 0 THEN
141: X_msg_count := l_msg_count;
142: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
143: RAISE Fnd_Api.G_EXC_ERROR;
144: END IF;
145: --
146: END IF;

Line 143: RAISE Fnd_Api.G_EXC_ERROR;

139:
140: IF l_msg_count > 0 THEN
141: X_msg_count := l_msg_count;
142: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
143: RAISE Fnd_Api.G_EXC_ERROR;
144: END IF;
145: --
146: END IF;
147: --

Line 167: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

163: l_msg_count := Fnd_Msg_Pub.count_msg;
164:
165: IF l_msg_count > 0 THEN
166: X_msg_count := l_msg_count;
167: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
168: RAISE Fnd_Api.G_EXC_ERROR;
169: END IF;
170:
171: --Standard check for commit

Line 168: RAISE Fnd_Api.G_EXC_ERROR;

164:
165: IF l_msg_count > 0 THEN
166: X_msg_count := l_msg_count;
167: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
168: RAISE Fnd_Api.G_EXC_ERROR;
169: END IF;
170:
171: --Standard check for commit
172: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 172: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

168: RAISE Fnd_Api.G_EXC_ERROR;
169: END IF;
170:
171: --Standard check for commit
172: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
173: COMMIT;
174: END IF;
175: -- Debug info
176: IF G_DEBUG='Y' THEN

Line 184: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

180: IF G_DEBUG='Y' THEN
181: Ahl_Debug_Pub.disable_debug;
182: END IF;
183: EXCEPTION
184: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
185: ROLLBACK TO Assign_Sch_Visit_Spaces;
186: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
187: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
188: p_count => x_msg_count,

Line 186: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

182: END IF;
183: EXCEPTION
184: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
185: ROLLBACK TO Assign_Sch_Visit_Spaces;
186: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
187: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
188: p_count => x_msg_count,
189: p_data => x_msg_data);
190: IF G_DEBUG='Y' THEN

Line 187: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

183: EXCEPTION
184: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
185: ROLLBACK TO Assign_Sch_Visit_Spaces;
186: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
187: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
188: p_count => x_msg_count,
189: p_data => x_msg_data);
190: IF G_DEBUG='Y' THEN
191:

Line 198: WHEN Fnd_Api.G_EXC_ERROR THEN

194: Ahl_Debug_Pub.debug( 'ahl_ltp_space_assign_pub.Assign Sch Visit Spaces','+SPANT+');
195: -- Check if API is called in debug mode. If yes, disable debug.
196: Ahl_Debug_Pub.disable_debug;
197: END IF;
198: WHEN Fnd_Api.G_EXC_ERROR THEN
199: ROLLBACK TO Assign_Sch_Visit_Spaces;
200: X_return_status := Fnd_Api.G_RET_STS_ERROR;
201: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
202: p_count => x_msg_count,

Line 200: X_return_status := Fnd_Api.G_RET_STS_ERROR;

196: Ahl_Debug_Pub.disable_debug;
197: END IF;
198: WHEN Fnd_Api.G_EXC_ERROR THEN
199: ROLLBACK TO Assign_Sch_Visit_Spaces;
200: X_return_status := Fnd_Api.G_RET_STS_ERROR;
201: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
202: p_count => x_msg_count,
203: p_data => X_msg_data);
204: IF G_DEBUG='Y' THEN

Line 201: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

197: END IF;
198: WHEN Fnd_Api.G_EXC_ERROR THEN
199: ROLLBACK TO Assign_Sch_Visit_Spaces;
200: X_return_status := Fnd_Api.G_RET_STS_ERROR;
201: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
202: p_count => x_msg_count,
203: p_data => X_msg_data);
204: IF G_DEBUG='Y' THEN
205: -- Debug info.

Line 214: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

210: Ahl_Debug_Pub.disable_debug;
211: END IF;
212: WHEN OTHERS THEN
213: ROLLBACK TO Assign_Sch_Visit_Spaces;
214: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
215: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
216: THEN
217: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PUB',
218: p_procedure_name => 'ASSIGN_SCH_VISIT_SPACES',

Line 221: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

217: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PUB',
218: p_procedure_name => 'ASSIGN_SCH_VISIT_SPACES',
219: p_error_text => SUBSTR(SQLERRM,1,240));
220: END IF;
221: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
222: p_count => x_msg_count,
223: p_data => X_msg_data);
224: IF G_DEBUG='Y' THEN
225:

Line 248: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

244: -- NOTES
245: --
246: PROCEDURE Schedule_Visit (
247: p_api_version IN NUMBER,
248: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
249: p_commit IN VARCHAR2 := Fnd_Api.g_false,
250: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
251: p_module_type IN VARCHAR2 := 'JSP',
252: p_x_schedule_visit_rec IN OUT NOCOPY Schedule_Visit_Rec,

Line 249: p_commit IN VARCHAR2 := Fnd_Api.g_false,

245: --
246: PROCEDURE Schedule_Visit (
247: p_api_version IN NUMBER,
248: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
249: p_commit IN VARCHAR2 := Fnd_Api.g_false,
250: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
251: p_module_type IN VARCHAR2 := 'JSP',
252: p_x_schedule_visit_rec IN OUT NOCOPY Schedule_Visit_Rec,
253: x_return_status OUT NOCOPY VARCHAR2,

Line 250: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

246: PROCEDURE Schedule_Visit (
247: p_api_version IN NUMBER,
248: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
249: p_commit IN VARCHAR2 := Fnd_Api.g_false,
250: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
251: p_module_type IN VARCHAR2 := 'JSP',
252: p_x_schedule_visit_rec IN OUT NOCOPY Schedule_Visit_Rec,
253: x_return_status OUT NOCOPY VARCHAR2,
254: x_msg_count OUT NOCOPY NUMBER,

Line 276: IF Fnd_Api.to_boolean(p_init_msg_list)

272: IF G_DEBUG='Y' THEN
273: Ahl_Debug_Pub.debug( 'enter ahl_ltp_space_assign_pub.Schedule Visit','+SPANT+');
274: END IF;
275: -- Standard call to check for call compatibility.
276: IF Fnd_Api.to_boolean(p_init_msg_list)
277: THEN
278: Fnd_Msg_Pub.initialize;
279: END IF;
280: -- Initialize API return status to success

Line 281: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

277: THEN
278: Fnd_Msg_Pub.initialize;
279: END IF;
280: -- Initialize API return status to success
281: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
282: -- Initialize message list if p_init_msg_list is set to TRUE.
283: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
284: p_api_version,
285: l_api_name,G_PKG_NAME)

Line 283: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,

279: END IF;
280: -- Initialize API return status to success
281: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
282: -- Initialize message list if p_init_msg_list is set to TRUE.
283: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
284: p_api_version,
285: l_api_name,G_PKG_NAME)
286: THEN
287: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

Line 287: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

283: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
284: p_api_version,
285: l_api_name,G_PKG_NAME)
286: THEN
287: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
288: END IF;
289: --------------------Start of API Body-----------------------------------
290: IF P_X_SCHEDULE_VISIT_REC.VISIT_ID IS NOT NULL THEN
291: Ahl_Ltp_Space_Assign_Pvt.Schedule_Visit

Line 309: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

305: l_msg_count := Fnd_Msg_Pub.count_msg;
306:
307: IF l_msg_count > 0 THEN
308: X_msg_count := l_msg_count;
309: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
310: RAISE Fnd_Api.G_EXC_ERROR;
311: END IF;
312:
313: --Standard check for commit

Line 310: RAISE Fnd_Api.G_EXC_ERROR;

306:
307: IF l_msg_count > 0 THEN
308: X_msg_count := l_msg_count;
309: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
310: RAISE Fnd_Api.G_EXC_ERROR;
311: END IF;
312:
313: --Standard check for commit
314: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 314: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

310: RAISE Fnd_Api.G_EXC_ERROR;
311: END IF;
312:
313: --Standard check for commit
314: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
315: COMMIT;
316: END IF;
317: -- Debug info
318: IF G_DEBUG='Y' THEN

Line 327: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

323: Ahl_Debug_Pub.disable_debug;
324: END IF;
325:
326: EXCEPTION
327: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
328: ROLLBACK TO schedule_visit;
329: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
330: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
331: p_count => x_msg_count,

Line 329: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

325:
326: EXCEPTION
327: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
328: ROLLBACK TO schedule_visit;
329: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
330: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
331: p_count => x_msg_count,
332: p_data => x_msg_data);
333: IF G_DEBUG='Y' THEN

Line 330: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

326: EXCEPTION
327: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
328: ROLLBACK TO schedule_visit;
329: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
330: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
331: p_count => x_msg_count,
332: p_data => x_msg_data);
333: IF G_DEBUG='Y' THEN
334:

Line 341: WHEN Fnd_Api.G_EXC_ERROR THEN

337: Ahl_Debug_Pub.debug( 'ahl_ltp_space_assign_pub.Schedule Visit','+SPANT+');
338: -- Check if API is called in debug mode. If yes, disable debug.
339: Ahl_Debug_Pub.disable_debug;
340: END IF;
341: WHEN Fnd_Api.G_EXC_ERROR THEN
342: ROLLBACK TO schedule_visit;
343: X_return_status := Fnd_Api.G_RET_STS_ERROR;
344: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
345: p_count => x_msg_count,

Line 343: X_return_status := Fnd_Api.G_RET_STS_ERROR;

339: Ahl_Debug_Pub.disable_debug;
340: END IF;
341: WHEN Fnd_Api.G_EXC_ERROR THEN
342: ROLLBACK TO schedule_visit;
343: X_return_status := Fnd_Api.G_RET_STS_ERROR;
344: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
345: p_count => x_msg_count,
346: p_data => X_msg_data);
347: IF G_DEBUG='Y' THEN

Line 344: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

340: END IF;
341: WHEN Fnd_Api.G_EXC_ERROR THEN
342: ROLLBACK TO schedule_visit;
343: X_return_status := Fnd_Api.G_RET_STS_ERROR;
344: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
345: p_count => x_msg_count,
346: p_data => X_msg_data);
347: IF G_DEBUG='Y' THEN
348: -- Debug info.

Line 357: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

353: Ahl_Debug_Pub.disable_debug;
354: END IF;
355: WHEN OTHERS THEN
356: ROLLBACK TO schedule_visit;
357: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
358: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
359: THEN
360: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_SPACE_ASSIGN_PUB',
361: p_procedure_name => 'SCHEDULE_VISIT',

Line 364: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

360: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_SPACE_ASSIGN_PUB',
361: p_procedure_name => 'SCHEDULE_VISIT',
362: p_error_text => SUBSTR(SQLERRM,1,240));
363: END IF;
364: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
365: p_count => x_msg_count,
366: p_data => X_msg_data);
367: IF G_DEBUG='Y' THEN
368: -- Debug info.

Line 390: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

386: -- NOTES
387: --
388: PROCEDURE Unschedule_Visit (
389: p_api_version IN NUMBER,
390: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
391: p_commit IN VARCHAR2 := Fnd_Api.g_false,
392: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
393: p_module_type IN VARCHAR2 := 'JSP',
394: p_x_schedule_visit_rec IN OUT NOCOPY Schedule_Visit_Rec,

Line 391: p_commit IN VARCHAR2 := Fnd_Api.g_false,

387: --
388: PROCEDURE Unschedule_Visit (
389: p_api_version IN NUMBER,
390: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
391: p_commit IN VARCHAR2 := Fnd_Api.g_false,
392: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
393: p_module_type IN VARCHAR2 := 'JSP',
394: p_x_schedule_visit_rec IN OUT NOCOPY Schedule_Visit_Rec,
395: x_return_status OUT NOCOPY VARCHAR2,

Line 392: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

388: PROCEDURE Unschedule_Visit (
389: p_api_version IN NUMBER,
390: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
391: p_commit IN VARCHAR2 := Fnd_Api.g_false,
392: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
393: p_module_type IN VARCHAR2 := 'JSP',
394: p_x_schedule_visit_rec IN OUT NOCOPY Schedule_Visit_Rec,
395: x_return_status OUT NOCOPY VARCHAR2,
396: x_msg_count OUT NOCOPY NUMBER,

Line 420: IF Fnd_Api.to_boolean(p_init_msg_list)

416: IF G_DEBUG='Y' THEN
417: Ahl_Debug_Pub.debug( 'enter ahl_ltp_space_assign_pub.Unschedule Visit','+SPANT+');
418: END IF;
419: -- Standard call to check for call compatibility.
420: IF Fnd_Api.to_boolean(p_init_msg_list)
421: THEN
422: Fnd_Msg_Pub.initialize;
423: END IF;
424: -- Initialize API return status to success

Line 425: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

421: THEN
422: Fnd_Msg_Pub.initialize;
423: END IF;
424: -- Initialize API return status to success
425: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
426: -- Initialize message list if p_init_msg_list is set to TRUE.
427: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
428: p_api_version,
429: l_api_name,G_PKG_NAME)

Line 427: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,

423: END IF;
424: -- Initialize API return status to success
425: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
426: -- Initialize message list if p_init_msg_list is set to TRUE.
427: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
428: p_api_version,
429: l_api_name,G_PKG_NAME)
430: THEN
431: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

Line 431: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

427: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
428: p_api_version,
429: l_api_name,G_PKG_NAME)
430: THEN
431: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
432: END IF;
433: --------------------Start of API Body-----------------------------------
434: IF P_X_SCHEDULE_VISIT_REC.VISIT_ID IS NOT NULL THEN
435: Ahl_Ltp_Space_Assign_Pvt.Unschedule_Visit

Line 453: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

449: l_msg_count := Fnd_Msg_Pub.count_msg;
450:
451: IF l_msg_count > 0 THEN
452: X_msg_count := l_msg_count;
453: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
454: RAISE Fnd_Api.G_EXC_ERROR;
455: END IF;
456:
457: --Standard check for commit

Line 454: RAISE Fnd_Api.G_EXC_ERROR;

450:
451: IF l_msg_count > 0 THEN
452: X_msg_count := l_msg_count;
453: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
454: RAISE Fnd_Api.G_EXC_ERROR;
455: END IF;
456:
457: --Standard check for commit
458: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 458: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

454: RAISE Fnd_Api.G_EXC_ERROR;
455: END IF;
456:
457: --Standard check for commit
458: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
459: COMMIT;
460: END IF;
461: -- Debug info
462: IF G_DEBUG='Y' THEN

Line 470: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

466: IF G_DEBUG='Y' THEN
467: Ahl_Debug_Pub.disable_debug;
468: END IF;
469: EXCEPTION
470: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
471: ROLLBACK TO unschedule_visit;
472: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
473: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
474: p_count => x_msg_count,

Line 472: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

468: END IF;
469: EXCEPTION
470: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
471: ROLLBACK TO unschedule_visit;
472: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
473: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
474: p_count => x_msg_count,
475: p_data => x_msg_data);
476: IF G_DEBUG='Y' THEN

Line 473: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

469: EXCEPTION
470: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
471: ROLLBACK TO unschedule_visit;
472: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
473: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
474: p_count => x_msg_count,
475: p_data => x_msg_data);
476: IF G_DEBUG='Y' THEN
477:

Line 484: WHEN Fnd_Api.G_EXC_ERROR THEN

480: Ahl_Debug_Pub.debug( 'ahl_ltp_space_assign_pub.Unschedule Visit','+SPANT+');
481: -- Check if API is called in debug mode. If yes, disable debug.
482: Ahl_Debug_Pub.disable_debug;
483: END IF;
484: WHEN Fnd_Api.G_EXC_ERROR THEN
485: ROLLBACK TO unschedule_visit;
486: X_return_status := Fnd_Api.G_RET_STS_ERROR;
487: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
488: p_count => x_msg_count,

Line 486: X_return_status := Fnd_Api.G_RET_STS_ERROR;

482: Ahl_Debug_Pub.disable_debug;
483: END IF;
484: WHEN Fnd_Api.G_EXC_ERROR THEN
485: ROLLBACK TO unschedule_visit;
486: X_return_status := Fnd_Api.G_RET_STS_ERROR;
487: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
488: p_count => x_msg_count,
489: p_data => X_msg_data);
490: IF G_DEBUG='Y' THEN

Line 487: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

483: END IF;
484: WHEN Fnd_Api.G_EXC_ERROR THEN
485: ROLLBACK TO unschedule_visit;
486: X_return_status := Fnd_Api.G_RET_STS_ERROR;
487: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
488: p_count => x_msg_count,
489: p_data => X_msg_data);
490: IF G_DEBUG='Y' THEN
491: -- Debug info.

Line 500: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

496: Ahl_Debug_Pub.disable_debug;
497: END IF;
498: WHEN OTHERS THEN
499: ROLLBACK TO unschedule_visit;
500: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
501: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
502: THEN
503: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_SPACE_ASSIGN_PUB',
504: p_procedure_name => 'UNSCHEDULE_VISIT',

Line 507: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

503: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_SPACE_ASSIGN_PUB',
504: p_procedure_name => 'UNSCHEDULE_VISIT',
505: p_error_text => SUBSTR(SQLERRM,1,240));
506: END IF;
507: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
508: p_count => x_msg_count,
509: p_data => X_msg_data);
510: IF G_DEBUG='Y' THEN
511: