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.

APPS.AHL_AVF_PRIM_VSTS_PVT dependencies on FND_API

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

48: -- Initial Version 12.1.3
49: -------------------------------------------------------------------
50: PROCEDURE Validate_MR_Operating_Org (
51: p_api_version IN NUMBER,
52: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
53: p_commit IN VARCHAR2 := Fnd_Api.g_false,
54: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
55: p_mr_header_id IN NUMBER,
56: p_operating_org_id IN NUMBER,

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

49: -------------------------------------------------------------------
50: PROCEDURE Validate_MR_Operating_Org (
51: p_api_version IN NUMBER,
52: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
53: p_commit IN VARCHAR2 := Fnd_Api.g_false,
54: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
55: p_mr_header_id IN NUMBER,
56: p_operating_org_id IN NUMBER,
57: x_maintenance_org_id OUT NOCOPY NUMBER,

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

50: PROCEDURE Validate_MR_Operating_Org (
51: p_api_version IN NUMBER,
52: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
53: p_commit IN VARCHAR2 := Fnd_Api.g_false,
54: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
55: p_mr_header_id IN NUMBER,
56: p_operating_org_id IN NUMBER,
57: x_maintenance_org_id OUT NOCOPY NUMBER,
58: x_maintenance_dept_id OUT NOCOPY NUMBER,

Line 79: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

75:
76: PROCEDURE Add_Planned_MRs
77: (
78: p_api_version IN NUMBER := 1.0,
79: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
80: p_commit IN VARCHAR2 := FND_API.G_FALSE,
81: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
82: p_visit_id IN NUMBER := NULL,
83: p_snapshot_id IN NUMBER := NULL,

Line 80: p_commit IN VARCHAR2 := FND_API.G_FALSE,

76: PROCEDURE Add_Planned_MRs
77: (
78: p_api_version IN NUMBER := 1.0,
79: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
80: p_commit IN VARCHAR2 := FND_API.G_FALSE,
81: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
82: p_visit_id IN NUMBER := NULL,
83: p_snapshot_id IN NUMBER := NULL,
84: x_return_status OUT NOCOPY VARCHAR2,

Line 81: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

77: (
78: p_api_version IN NUMBER := 1.0,
79: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
80: p_commit IN VARCHAR2 := FND_API.G_FALSE,
81: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
82: p_visit_id IN NUMBER := NULL,
83: p_snapshot_id IN NUMBER := NULL,
84: x_return_status OUT NOCOPY VARCHAR2,
85: x_msg_count OUT NOCOPY NUMBER,

Line 236: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

232: ' , p_visit_id => ' || p_visit_id ||
233: ' , p_snapshot_id => ' || p_snapshot_id);
234: END IF;
235:
236: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
237: Fnd_Msg_Pub.initialize;
238: END IF;
239:
240: IF NOT Fnd_Api.compatible_api_call (

Line 240: IF NOT Fnd_Api.compatible_api_call (

236: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
237: Fnd_Msg_Pub.initialize;
238: END IF;
239:
240: IF NOT Fnd_Api.compatible_api_call (
241: l_api_version,
242: p_api_version,
243: l_api_name,
244: G_PKG_NAME

Line 246: RAISE Fnd_Api.g_exc_unexpected_error;

242: p_api_version,
243: l_api_name,
244: G_PKG_NAME
245: ) THEN
246: RAISE Fnd_Api.g_exc_unexpected_error;
247: END IF;
248: x_return_status := Fnd_Api.g_ret_sts_success;
249:
250: ----------------------------------------------------------

Line 248: x_return_status := Fnd_Api.g_ret_sts_success;

244: G_PKG_NAME
245: ) THEN
246: RAISE Fnd_Api.g_exc_unexpected_error;
247: END IF;
248: x_return_status := Fnd_Api.g_ret_sts_success;
249:
250: ----------------------------------------------------------
251:
252: -- Checking which parameter is sent.

Line 254: -- IF((p_visit_id IS NOT NULL OR p_visit_id <> FND_API.G_MISS_NUM) AND (p_snapshot_id IS NULL or p_snapshot_id = FND_API.G_MISS_NUM)) THEN

250: ----------------------------------------------------------
251:
252: -- Checking which parameter is sent.
253: -- SATRAJEN :: Bug 16048246 :: 04-01-2013 :: Chenged in order to pass the condition when called from create_primary_visits.
254: -- IF((p_visit_id IS NOT NULL OR p_visit_id <> FND_API.G_MISS_NUM) AND (p_snapshot_id IS NULL or p_snapshot_id = FND_API.G_MISS_NUM)) THEN
255: IF(p_visit_id IS NOT NULL OR p_visit_id <> FND_API.G_MISS_NUM) THEN
256: -- Visit_id is passed
257:
258: OPEN check_validity_visit(p_visit_id);

Line 255: IF(p_visit_id IS NOT NULL OR p_visit_id <> FND_API.G_MISS_NUM) THEN

251:
252: -- Checking which parameter is sent.
253: -- SATRAJEN :: Bug 16048246 :: 04-01-2013 :: Chenged in order to pass the condition when called from create_primary_visits.
254: -- IF((p_visit_id IS NOT NULL OR p_visit_id <> FND_API.G_MISS_NUM) AND (p_snapshot_id IS NULL or p_snapshot_id = FND_API.G_MISS_NUM)) THEN
255: IF(p_visit_id IS NOT NULL OR p_visit_id <> FND_API.G_MISS_NUM) THEN
256: -- Visit_id is passed
257:
258: OPEN check_validity_visit(p_visit_id);
259: FETCH check_validity_visit INTO l_valid_visit_flag;

Line 305: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_init_msg_list--@>'||Fnd_Api.g_false);

301: -- Calling the API which associates.
302:
303: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
304: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_api_version--@>'||L_API_VERSION);
305: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_init_msg_list--@>'||Fnd_Api.g_false);
306: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_commit--@>'||Fnd_Api.g_false);
307: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);
308: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_module_type--@>'||'NULL');
309: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: l_ue_id--@>'||'l_ue_id');

Line 306: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_commit--@>'||Fnd_Api.g_false);

302:
303: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
304: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_api_version--@>'||L_API_VERSION);
305: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_init_msg_list--@>'||Fnd_Api.g_false);
306: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_commit--@>'||Fnd_Api.g_false);
307: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);
308: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_module_type--@>'||'NULL');
309: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: l_ue_id--@>'||'l_ue_id');
310: END IF;

Line 307: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);

303: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
304: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_api_version--@>'||L_API_VERSION);
305: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_init_msg_list--@>'||Fnd_Api.g_false);
306: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_commit--@>'||Fnd_Api.g_false);
307: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);
308: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_module_type--@>'||'NULL');
309: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: l_ue_id--@>'||'l_ue_id');
310: END IF;
311:

Line 319: p_init_msg_list => Fnd_Api.g_false,

315:
316:
317: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
318: p_api_version => L_API_VERSION,
319: p_init_msg_list => Fnd_Api.g_false,
320: p_commit => Fnd_Api.g_false,
321: p_validation_level => Fnd_Api.g_valid_level_full,
322: p_module_type => NULL,
323: p_x_task_tbl => l_task_rec,

Line 320: p_commit => Fnd_Api.g_false,

316:
317: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
318: p_api_version => L_API_VERSION,
319: p_init_msg_list => Fnd_Api.g_false,
320: p_commit => Fnd_Api.g_false,
321: p_validation_level => Fnd_Api.g_valid_level_full,
322: p_module_type => NULL,
323: p_x_task_tbl => l_task_rec,
324: x_return_status => l_return_status,

Line 321: p_validation_level => Fnd_Api.g_valid_level_full,

317: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
318: p_api_version => L_API_VERSION,
319: p_init_msg_list => Fnd_Api.g_false,
320: p_commit => Fnd_Api.g_false,
321: p_validation_level => Fnd_Api.g_valid_level_full,
322: p_module_type => NULL,
323: p_x_task_tbl => l_task_rec,
324: x_return_status => l_return_status,
325: x_msg_count => l_msg_count,

Line 334: IF nvl(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

330: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Create_PUP_Tasks :: x_msg_count--@>'||l_msg_count);
331: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Create_PUP_Tasks :: x_msg_data--@>'||l_msg_data);
332: END IF;
333:
334: IF nvl(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
335: IF (l_log_statement >= l_log_current_level) THEN
336: FND_LOG.string(l_log_statement, L_DEBUG_KEY, ' Error Occured while associating Unit effectivity '||l_ue_id||' to VISIT_ID : ' || l_visit_id || ' with x-return-status:' || l_return_status);
337: END IF;
338: ELSE

Line 371: RAISE Fnd_Api.G_EXC_ERROR;

367: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Invalid Visit Id : ' || p_visit_id);
368: END IF;
369: Fnd_Message.SET_NAME('AHL','AHL_VISIT_ID_INVALID');
370: Fnd_Msg_Pub.ADD;
371: RAISE Fnd_Api.G_EXC_ERROR;
372: END IF;
373: ELSIF((p_snapshot_id IS NOT NULL OR p_snapshot_id <> FND_API.G_MISS_NUM) AND (p_visit_id IS NULL or p_visit_id = FND_API.G_MISS_NUM)) THEN
374: -- Snapshot_id is passed
375:

Line 373: ELSIF((p_snapshot_id IS NOT NULL OR p_snapshot_id <> FND_API.G_MISS_NUM) AND (p_visit_id IS NULL or p_visit_id = FND_API.G_MISS_NUM)) THEN

369: Fnd_Message.SET_NAME('AHL','AHL_VISIT_ID_INVALID');
370: Fnd_Msg_Pub.ADD;
371: RAISE Fnd_Api.G_EXC_ERROR;
372: END IF;
373: ELSIF((p_snapshot_id IS NOT NULL OR p_snapshot_id <> FND_API.G_MISS_NUM) AND (p_visit_id IS NULL or p_visit_id = FND_API.G_MISS_NUM)) THEN
374: -- Snapshot_id is passed
375:
376: OPEN check_validity_snapshot(p_snapshot_id);
377: FETCH check_validity_snapshot INTO l_valid_snapshot_flag;

Line 439: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_init_msg_list--@>'||Fnd_Api.g_false);

435: --assign l_ue_id to l_visit_id
436:
437: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
438: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_api_version--@>'||L_API_VERSION);
439: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_init_msg_list--@>'||Fnd_Api.g_false);
440: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_commit--@>'||Fnd_Api.g_false);
441: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);
442: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_module_type--@>'||'NULL');
443: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: visit_id--@>'||'l_visit_id');

Line 440: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_commit--@>'||Fnd_Api.g_false);

436:
437: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
438: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_api_version--@>'||L_API_VERSION);
439: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_init_msg_list--@>'||Fnd_Api.g_false);
440: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_commit--@>'||Fnd_Api.g_false);
441: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);
442: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_module_type--@>'||'NULL');
443: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: visit_id--@>'||'l_visit_id');
444: END IF;

Line 441: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);

437: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
438: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_api_version--@>'||L_API_VERSION);
439: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_init_msg_list--@>'||Fnd_Api.g_false);
440: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_commit--@>'||Fnd_Api.g_false);
441: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);
442: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: p_module_type--@>'||'NULL');
443: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Create_PUP_Tasks :: visit_id--@>'||'l_visit_id');
444: END IF;
445:

Line 453: p_init_msg_list => Fnd_Api.g_false,

449:
450:
451: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
452: p_api_version => L_API_VERSION,
453: p_init_msg_list => Fnd_Api.g_false,
454: p_commit => Fnd_Api.g_false,
455: p_validation_level => Fnd_Api.g_valid_level_full,
456: p_module_type => NULL,
457: p_x_task_tbl => l_task_rec,

Line 454: p_commit => Fnd_Api.g_false,

450:
451: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
452: p_api_version => L_API_VERSION,
453: p_init_msg_list => Fnd_Api.g_false,
454: p_commit => Fnd_Api.g_false,
455: p_validation_level => Fnd_Api.g_valid_level_full,
456: p_module_type => NULL,
457: p_x_task_tbl => l_task_rec,
458: x_return_status => l_return_status,

Line 455: p_validation_level => Fnd_Api.g_valid_level_full,

451: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
452: p_api_version => L_API_VERSION,
453: p_init_msg_list => Fnd_Api.g_false,
454: p_commit => Fnd_Api.g_false,
455: p_validation_level => Fnd_Api.g_valid_level_full,
456: p_module_type => NULL,
457: p_x_task_tbl => l_task_rec,
458: x_return_status => l_return_status,
459: x_msg_count => l_msg_count,

Line 468: IF nvl(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

464: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Create_PUP_Tasks :: x_msg_count--@>'||l_msg_count);
465: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Create_PUP_Tasks :: x_msg_data--@>'||l_msg_data);
466: END IF;
467:
468: IF nvl(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
469: IF (l_log_statement >= l_log_current_level) THEN
470: FND_LOG.string(l_log_statement, L_DEBUG_KEY, ' Error Occured while associating Unit effectivity '||l_ue_id||' to VISIT_ID : ' || l_visit_id || ' with x-return-status:' || l_return_status);
471: END IF;
472: ELSE

Line 500: RAISE Fnd_Api.G_EXC_ERROR;

496: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Invalid Snapshot Id : ' || p_snapshot_id);
497: END IF;
498: Fnd_Message.SET_NAME('AHL','AHL_AVF_INVALID_SNAPSHOT');
499: Fnd_Msg_Pub.ADD;
500: RAISE Fnd_Api.G_EXC_ERROR;
501: END IF;
502: ELSE
503: -- The input flag is not valid. Need to raise exception
504: IF (l_log_statement >= l_log_current_level) THEN

Line 509: RAISE Fnd_Api.G_EXC_ERROR;

505: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Invalid Paramters ');
506: END IF;
507: Fnd_Message.SET_NAME('AHL','AHL_PAGE_PARAMETERS_INVALID');
508: Fnd_Msg_Pub.ADD;
509: RAISE Fnd_Api.G_EXC_ERROR;
510: END IF; -- Valid Input parameters check ends
511:
512: -------------------- finish --------------------------
513: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 514: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Add_Planned_MRs :: p_encoded--@>'||Fnd_Api.g_false);

510: END IF; -- Valid Input parameters check ends
511:
512: -------------------- finish --------------------------
513: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
514: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Add_Planned_MRs :: p_encoded--@>'||Fnd_Api.g_false);
515: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Add_Planned_MRs :: p_count--@>'||x_msg_count);
516: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Add_Planned_MRs :: p_data--@>'||x_msg_data);
517: END IF;
518: Fnd_Msg_Pub.count_and_get (

Line 519: p_encoded => Fnd_Api.g_false,

515: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Add_Planned_MRs :: p_count--@>'||x_msg_count);
516: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Add_Planned_MRs :: p_data--@>'||x_msg_data);
517: END IF;
518: Fnd_Msg_Pub.count_and_get (
519: p_encoded => Fnd_Api.g_false,
520: p_count => x_msg_count,
521: p_data => x_msg_data
522: );
523:

Line 533: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

529: END IF;
530:
531: -- Proceed to commit if status is 'S' or if there were only validation errors
532: --Standard check for commit
533: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
534: COMMIT;
535: END IF;
536: ----- EXCEPTIONS--------------------------------------
537: EXCEPTION

Line 538: WHEN Fnd_Api.G_EXC_ERROR THEN

534: COMMIT;
535: END IF;
536: ----- EXCEPTIONS--------------------------------------
537: EXCEPTION
538: WHEN Fnd_Api.G_EXC_ERROR THEN
539: x_return_status := Fnd_Api.G_RET_STS_ERROR;
540: ROLLBACK TO Save_Add_MRs;
541: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
542: p_data => x_msg_data,

Line 539: x_return_status := Fnd_Api.G_RET_STS_ERROR;

535: END IF;
536: ----- EXCEPTIONS--------------------------------------
537: EXCEPTION
538: WHEN Fnd_Api.G_EXC_ERROR THEN
539: x_return_status := Fnd_Api.G_RET_STS_ERROR;
540: ROLLBACK TO Save_Add_MRs;
541: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
542: p_data => x_msg_data,
543: p_encoded => Fnd_Api.g_false);

Line 543: p_encoded => Fnd_Api.g_false);

539: x_return_status := Fnd_Api.G_RET_STS_ERROR;
540: ROLLBACK TO Save_Add_MRs;
541: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
542: p_data => x_msg_data,
543: p_encoded => Fnd_Api.g_false);
544:
545: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
546: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
547: ROLLBACK TO Save_Add_MRs;

Line 545: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

541: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
542: p_data => x_msg_data,
543: p_encoded => Fnd_Api.g_false);
544:
545: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
546: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
547: ROLLBACK TO Save_Add_MRs;
548: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
549: p_data => x_msg_data,

Line 546: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

542: p_data => x_msg_data,
543: p_encoded => Fnd_Api.g_false);
544:
545: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
546: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
547: ROLLBACK TO Save_Add_MRs;
548: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
549: p_data => x_msg_data,
550: p_encoded => Fnd_Api.g_false);

Line 550: p_encoded => Fnd_Api.g_false);

546: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
547: ROLLBACK TO Save_Add_MRs;
548: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
549: p_data => x_msg_data,
550: p_encoded => Fnd_Api.g_false);
551:
552: WHEN OTHERS THEN
553: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
554: ROLLBACK TO Save_Add_MRs;

Line 553: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

549: p_data => x_msg_data,
550: p_encoded => Fnd_Api.g_false);
551:
552: WHEN OTHERS THEN
553: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
554: ROLLBACK TO Save_Add_MRs;
555: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
556: p_procedure_name => 'Add_Planned_MRs',
557: p_error_text => SQLERRM);

Line 560: p_encoded => Fnd_Api.g_false);

556: p_procedure_name => 'Add_Planned_MRs',
557: p_error_text => SQLERRM);
558: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
559: p_data => x_msg_data,
560: p_encoded => Fnd_Api.g_false);
561:
562: END Add_Planned_MRs; -- End of begin/procedure.
563:
564: -----------------------------------------------------------------------------------------------

Line 578: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

574:
575: PROCEDURE Cancel_Visits
576: (
577: p_api_version IN NUMBER := 1.0,
578: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
579: p_commit IN VARCHAR2 := FND_API.G_FALSE,
580: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
581: p_snapshot_id IN NUMBER,
582: x_return_status OUT NOCOPY VARCHAR2,

Line 579: p_commit IN VARCHAR2 := FND_API.G_FALSE,

575: PROCEDURE Cancel_Visits
576: (
577: p_api_version IN NUMBER := 1.0,
578: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
579: p_commit IN VARCHAR2 := FND_API.G_FALSE,
580: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
581: p_snapshot_id IN NUMBER,
582: x_return_status OUT NOCOPY VARCHAR2,
583: x_msg_count OUT NOCOPY NUMBER,

Line 580: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

576: (
577: p_api_version IN NUMBER := 1.0,
578: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
579: p_commit IN VARCHAR2 := FND_API.G_FALSE,
580: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
581: p_snapshot_id IN NUMBER,
582: x_return_status OUT NOCOPY VARCHAR2,
583: x_msg_count OUT NOCOPY NUMBER,
584: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 647: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

643: ' , p_validation_level => ' || p_validation_level ||
644: ' , p_snapshot_id => ' || p_snapshot_id);
645: END IF;
646:
647: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
648: Fnd_Msg_Pub.initialize;
649: END IF;
650:
651: IF NOT Fnd_Api.compatible_api_call (

Line 651: IF NOT Fnd_Api.compatible_api_call (

647: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
648: Fnd_Msg_Pub.initialize;
649: END IF;
650:
651: IF NOT Fnd_Api.compatible_api_call (
652: l_api_version,
653: p_api_version,
654: l_api_name,
655: G_PKG_NAME

Line 657: RAISE Fnd_Api.g_exc_unexpected_error;

653: p_api_version,
654: l_api_name,
655: G_PKG_NAME
656: ) THEN
657: RAISE Fnd_Api.g_exc_unexpected_error;
658: END IF;
659: x_return_status := Fnd_Api.g_ret_sts_success;
660:
661: ----------------------------------------------------------

Line 659: x_return_status := Fnd_Api.g_ret_sts_success;

655: G_PKG_NAME
656: ) THEN
657: RAISE Fnd_Api.g_exc_unexpected_error;
658: END IF;
659: x_return_status := Fnd_Api.g_ret_sts_success;
660:
661: ----------------------------------------------------------
662: IF (l_log_procedure >= l_log_current_level) THEN
663: fnd_log.string(l_log_procedure,

Line 669: IF(p_snapshot_id IS NOT NULL OR p_snapshot_id <> FND_API.G_MISS_NUM) THEN

665: 'At the start of PL SQL procedure.');
666: END IF;
667:
668: -- Checking whether the parameter is valid or not.
669: IF(p_snapshot_id IS NOT NULL OR p_snapshot_id <> FND_API.G_MISS_NUM) THEN
670:
671: -- Check the Validity of the snapshot Id in the table.
672: OPEN check_validity(p_snapshot_id);
673: FETCH check_validity INTO l_valid_flag;

Line 695: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_init_msg_list--@>'||Fnd_Api.g_false);

691: -- Calling the procedure to cancel the visit.
692:
693: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
694: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_api_version--@>'||L_API_VERSION);
695: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_init_msg_list--@>'||Fnd_Api.g_false);
696: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_commit--@>'||Fnd_Api.g_false);
697: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);
698: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_visit_id--@>'||l_visit_id);
699: END IF;

Line 696: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_commit--@>'||Fnd_Api.g_false);

692:
693: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
694: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_api_version--@>'||L_API_VERSION);
695: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_init_msg_list--@>'||Fnd_Api.g_false);
696: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_commit--@>'||Fnd_Api.g_false);
697: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);
698: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_visit_id--@>'||l_visit_id);
699: END IF;
700:

Line 697: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);

693: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
694: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_api_version--@>'||L_API_VERSION);
695: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_init_msg_list--@>'||Fnd_Api.g_false);
696: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_commit--@>'||Fnd_Api.g_false);
697: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_validation_level--@>'||Fnd_Api.g_valid_level_full);
698: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Calling Delete_visit :: p_visit_id--@>'||l_visit_id);
699: END IF;
700:
701: l_return_status := NULL;

Line 708: p_init_msg_list => Fnd_Api.g_false,

704:
705:
706: AHL_VWP_VISITS_PVT.Delete_Visit(
707: p_api_version => L_API_VERSION,
708: p_init_msg_list => Fnd_Api.g_false,
709: p_commit => Fnd_Api.g_false,
710: p_validation_level => Fnd_Api.g_valid_level_full,
711: p_visit_id => l_visit_id,
712: x_return_status => l_return_status,

Line 709: p_commit => Fnd_Api.g_false,

705:
706: AHL_VWP_VISITS_PVT.Delete_Visit(
707: p_api_version => L_API_VERSION,
708: p_init_msg_list => Fnd_Api.g_false,
709: p_commit => Fnd_Api.g_false,
710: p_validation_level => Fnd_Api.g_valid_level_full,
711: p_visit_id => l_visit_id,
712: x_return_status => l_return_status,
713: x_msg_count => l_msg_count,

Line 710: p_validation_level => Fnd_Api.g_valid_level_full,

706: AHL_VWP_VISITS_PVT.Delete_Visit(
707: p_api_version => L_API_VERSION,
708: p_init_msg_list => Fnd_Api.g_false,
709: p_commit => Fnd_Api.g_false,
710: p_validation_level => Fnd_Api.g_valid_level_full,
711: p_visit_id => l_visit_id,
712: x_return_status => l_return_status,
713: x_msg_count => l_msg_count,
714: x_msg_data => l_msg_data);

Line 723: IF nvl(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

719: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Delete_visit :: x_msg_count--@>'||l_msg_count);
720: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Delete_visit :: x_msg_data--@>'||l_msg_data);
721: END IF;
722:
723: IF nvl(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
724: IF (l_log_statement >= l_log_current_level) THEN
725: FND_LOG.string(l_log_statement, L_DEBUG_KEY, ' Error Occured while cancelling VISIT_ID : ' || l_visit_id || ' with x-return-status:' || l_return_status);
726: END IF;
727: ELSE

Line 741: RAISE Fnd_Api.G_EXC_ERROR;

737: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Invalid Snapshot Id : ' || p_snapshot_id);
738: END IF;
739: Fnd_Message.SET_NAME('AHL','AHL_AVF_INVALID_SNAPSHOT');
740: Fnd_Msg_Pub.ADD;
741: RAISE Fnd_Api.G_EXC_ERROR;
742: END IF;
743:
744: ELSE
745: IF (l_log_statement >= l_log_current_level) THEN

Line 750: RAISE Fnd_Api.G_EXC_ERROR;

746: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Null Paramter ');
747: END IF;
748: Fnd_Message.SET_NAME('AHL','AHL_PAGE_PARAMETERS_INVALID');
749: Fnd_Msg_Pub.ADD;
750: RAISE Fnd_Api.G_EXC_ERROR;
751: END IF;
752: -------------------- finish --------------------------
753: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
754: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_encoded--@>'||Fnd_Api.g_false);

Line 754: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_encoded--@>'||Fnd_Api.g_false);

750: RAISE Fnd_Api.G_EXC_ERROR;
751: END IF;
752: -------------------- finish --------------------------
753: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
754: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_encoded--@>'||Fnd_Api.g_false);
755: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_count--@>'||x_msg_count);
756: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_data--@>'||x_msg_data);
757: END IF;
758: Fnd_Msg_Pub.count_and_get (

Line 759: p_encoded => Fnd_Api.g_false,

755: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_count--@>'||x_msg_count);
756: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_data--@>'||x_msg_data);
757: END IF;
758: Fnd_Msg_Pub.count_and_get (
759: p_encoded => Fnd_Api.g_false,
760: p_count => x_msg_count,
761: p_data => x_msg_data
762: );
763:

Line 771: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

767: L_DEBUG_KEY ||'.end',
768: 'At the end of PL SQL Procedure.');
769: END IF;
770:
771: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
772: COMMIT;
773: END IF;
774: ----- EXCEPTIONS--------------------------------------
775:

Line 777: WHEN Fnd_Api.G_EXC_ERROR THEN

773: END IF;
774: ----- EXCEPTIONS--------------------------------------
775:
776: EXCEPTION
777: WHEN Fnd_Api.G_EXC_ERROR THEN
778: x_return_status := Fnd_Api.G_RET_STS_ERROR;
779: ROLLBACK TO Save_Cancel_visits;
780: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
781: p_data => x_msg_data,

Line 778: x_return_status := Fnd_Api.G_RET_STS_ERROR;

774: ----- EXCEPTIONS--------------------------------------
775:
776: EXCEPTION
777: WHEN Fnd_Api.G_EXC_ERROR THEN
778: x_return_status := Fnd_Api.G_RET_STS_ERROR;
779: ROLLBACK TO Save_Cancel_visits;
780: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
781: p_data => x_msg_data,
782: p_encoded => Fnd_Api.g_false);

Line 782: p_encoded => Fnd_Api.g_false);

778: x_return_status := Fnd_Api.G_RET_STS_ERROR;
779: ROLLBACK TO Save_Cancel_visits;
780: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
781: p_data => x_msg_data,
782: p_encoded => Fnd_Api.g_false);
783:
784: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
785: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
786: ROLLBACK TO Save_Cancel_visits;

Line 784: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

780: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
781: p_data => x_msg_data,
782: p_encoded => Fnd_Api.g_false);
783:
784: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
785: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
786: ROLLBACK TO Save_Cancel_visits;
787: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
788: p_data => x_msg_data,

Line 785: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

781: p_data => x_msg_data,
782: p_encoded => Fnd_Api.g_false);
783:
784: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
785: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
786: ROLLBACK TO Save_Cancel_visits;
787: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
788: p_data => x_msg_data,
789: p_encoded => Fnd_Api.g_false);

Line 789: p_encoded => Fnd_Api.g_false);

785: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
786: ROLLBACK TO Save_Cancel_visits;
787: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
788: p_data => x_msg_data,
789: p_encoded => Fnd_Api.g_false);
790:
791: WHEN OTHERS THEN
792: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
793: ROLLBACK TO Save_Cancel_visits;

Line 792: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

788: p_data => x_msg_data,
789: p_encoded => Fnd_Api.g_false);
790:
791: WHEN OTHERS THEN
792: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
793: ROLLBACK TO Save_Cancel_visits;
794: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
795: p_procedure_name => 'Cancel_Visits',
796: p_error_text => SQLERRM);

Line 799: p_encoded => Fnd_Api.g_false);

795: p_procedure_name => 'Cancel_Visits',
796: p_error_text => SQLERRM);
797: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
798: p_data => x_msg_data,
799: p_encoded => Fnd_Api.g_false);
800:
801: END Cancel_Visits; -- End of begin/procedure.
802:
803: -------------------------------------------------------------------------------------------------------------------------

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

824: -- Initial Version 12.1.3
825: -------------------------------------------------------------------
826: PROCEDURE Validate_MR_Operating_Org (
827: p_api_version IN NUMBER,
828: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
829: p_commit IN VARCHAR2 := Fnd_Api.g_false,
830: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
831: p_mr_header_id IN NUMBER,
832: p_operating_org_id IN NUMBER,

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

825: -------------------------------------------------------------------
826: PROCEDURE Validate_MR_Operating_Org (
827: p_api_version IN NUMBER,
828: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
829: p_commit IN VARCHAR2 := Fnd_Api.g_false,
830: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
831: p_mr_header_id IN NUMBER,
832: p_operating_org_id IN NUMBER,
833: x_maintenance_org_id OUT NOCOPY NUMBER,

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

826: PROCEDURE Validate_MR_Operating_Org (
827: p_api_version IN NUMBER,
828: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
829: p_commit IN VARCHAR2 := Fnd_Api.g_false,
830: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
831: p_mr_header_id IN NUMBER,
832: p_operating_org_id IN NUMBER,
833: x_maintenance_org_id OUT NOCOPY NUMBER,
834: x_maintenance_dept_id OUT NOCOPY NUMBER,

Line 887: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

883: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
884: fnd_log.string(fnd_log.level_procedure,L_DEBUG||'.begin','At the start of PLSQL procedure');
885: END IF;
886:
887: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
888: Fnd_Msg_Pub.initialize;
889: END IF;
890:
891: IF NOT Fnd_Api.compatible_api_call (

Line 891: IF NOT Fnd_Api.compatible_api_call (

887: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
888: Fnd_Msg_Pub.initialize;
889: END IF;
890:
891: IF NOT Fnd_Api.compatible_api_call (
892: l_api_version,
893: p_api_version,
894: l_api_name,
895: G_PKG_NAME

Line 897: RAISE Fnd_Api.g_exc_unexpected_error;

893: p_api_version,
894: l_api_name,
895: G_PKG_NAME
896: ) THEN
897: RAISE Fnd_Api.g_exc_unexpected_error;
898: END IF;
899: x_return_status := Fnd_Api.g_ret_sts_success;
900:
901: ---------------------- Validate MR Header ID ------------------------

Line 899: x_return_status := Fnd_Api.g_ret_sts_success;

895: G_PKG_NAME
896: ) THEN
897: RAISE Fnd_Api.g_exc_unexpected_error;
898: END IF;
899: x_return_status := Fnd_Api.g_ret_sts_success;
900:
901: ---------------------- Validate MR Header ID ------------------------
902: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
903: fnd_log.string(fnd_log.level_statement,L_DEBUG,'Validating MR Header ID');

Line 916: RAISE Fnd_Api.G_EXC_ERROR;

912: IF l_mr_header_id IS NULL THEN
913:
914: Fnd_Message.SET_NAME('AHL','AHL_FMP_INVALID_MR');
915: Fnd_Msg_Pub.ADD;
916: RAISE Fnd_Api.G_EXC_ERROR;
917:
918: END IF;
919:
920: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 951: RAISE Fnd_Api.G_EXC_ERROR;

947:
948: IF NVL(l_return_status,'x') <> 'S' THEN
949: Fnd_Message.SET_NAME('AHL','AHL_VWP_ORG_NOT_EXISTS');
950: Fnd_Msg_Pub.ADD;
951: RAISE Fnd_Api.G_EXC_ERROR;
952: END IF;
953:
954: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
955: fnd_log.string(fnd_log.level_statement,L_DEBUG,'Validated Operating Organization');

Line 981: x_return_status := Fnd_Api.g_ret_sts_error;

977: IF x_maintenance_org_id is NULL or x_maintenance_dept_id is NULL THEN
978:
979: Fnd_Message.SET_NAME('AHL','AHL_OPER_NO_MAINTENANCE_DETS');
980: Fnd_Msg_Pub.ADD;
981: x_return_status := Fnd_Api.g_ret_sts_error;
982:
983: END IF;
984: */
985:

Line 988: p_encoded => Fnd_Api.g_false,

984: */
985:
986: -------------------- finish --------------------------
987: Fnd_Msg_Pub.count_and_get (
988: p_encoded => Fnd_Api.g_false,
989: p_count => x_msg_count,
990: p_data => x_msg_data
991: );
992:

Line 998: WHEN Fnd_Api.g_exc_error THEN

994: fnd_log.string(fnd_log.level_procedure,L_DEBUG||'.end','At the end of PLSQL procedure');
995: END IF;
996:
997: EXCEPTION
998: WHEN Fnd_Api.g_exc_error THEN
999: x_return_status := Fnd_Api.g_ret_sts_error;
1000: Fnd_Msg_Pub.count_and_get (
1001: p_encoded => Fnd_Api.g_false,
1002: p_count => x_msg_count,

Line 999: x_return_status := Fnd_Api.g_ret_sts_error;

995: END IF;
996:
997: EXCEPTION
998: WHEN Fnd_Api.g_exc_error THEN
999: x_return_status := Fnd_Api.g_ret_sts_error;
1000: Fnd_Msg_Pub.count_and_get (
1001: p_encoded => Fnd_Api.g_false,
1002: p_count => x_msg_count,
1003: p_data => x_msg_data

Line 1001: p_encoded => Fnd_Api.g_false,

997: EXCEPTION
998: WHEN Fnd_Api.g_exc_error THEN
999: x_return_status := Fnd_Api.g_ret_sts_error;
1000: Fnd_Msg_Pub.count_and_get (
1001: p_encoded => Fnd_Api.g_false,
1002: p_count => x_msg_count,
1003: p_data => x_msg_data
1004: );
1005: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 1005: WHEN Fnd_Api.g_exc_unexpected_error THEN

1001: p_encoded => Fnd_Api.g_false,
1002: p_count => x_msg_count,
1003: p_data => x_msg_data
1004: );
1005: WHEN Fnd_Api.g_exc_unexpected_error THEN
1006: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1007: Fnd_Msg_Pub.count_and_get (
1008: p_encoded => Fnd_Api.g_false,
1009: p_count => x_msg_count,

Line 1006: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1002: p_count => x_msg_count,
1003: p_data => x_msg_data
1004: );
1005: WHEN Fnd_Api.g_exc_unexpected_error THEN
1006: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1007: Fnd_Msg_Pub.count_and_get (
1008: p_encoded => Fnd_Api.g_false,
1009: p_count => x_msg_count,
1010: p_data => x_msg_data

Line 1008: p_encoded => Fnd_Api.g_false,

1004: );
1005: WHEN Fnd_Api.g_exc_unexpected_error THEN
1006: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1007: Fnd_Msg_Pub.count_and_get (
1008: p_encoded => Fnd_Api.g_false,
1009: p_count => x_msg_count,
1010: p_data => x_msg_data
1011: );
1012: WHEN OTHERS THEN

Line 1013: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

1009: p_count => x_msg_count,
1010: p_data => x_msg_data
1011: );
1012: WHEN OTHERS THEN
1013: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
1014: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
1015: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1016: END IF;
1017: Fnd_Msg_Pub.count_and_get (

Line 1018: p_encoded => Fnd_Api.g_false,

1014: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
1015: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1016: END IF;
1017: Fnd_Msg_Pub.count_and_get (
1018: p_encoded => Fnd_Api.g_false,
1019: p_count => x_msg_count,
1020: p_data => x_msg_data
1021: );
1022: END Validate_MR_Operating_Org;

Line 1033: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

1029: -- Parameters :
1030: --
1031: -- Standard IN Parameters :
1032: -- p_api_version IN NUMBER Required
1033: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1034: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1035: --
1036: -- Standard OUT Parameters :
1037: -- x_return_status OUT VARCHAR2 Required

Line 1034: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

1030: --
1031: -- Standard IN Parameters :
1032: -- p_api_version IN NUMBER Required
1033: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1034: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1035: --
1036: -- Standard OUT Parameters :
1037: -- x_return_status OUT VARCHAR2 Required
1038: -- x_msg_count OUT NUMBER Required

Line 1046: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1042: -- p_snapshot_id IN NUMBER Required
1043: --------------------------------------------------------------------------------------------------------------------
1044: PROCEDURE Create_Primary_Visits (
1045: p_api_version IN NUMBER := 1.0,
1046: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1047: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1048: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1049: p_snapshot_id IN NUMBER,
1050: p_add_plan_flag IN VARCHAR2 := 'N',

Line 1047: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1043: --------------------------------------------------------------------------------------------------------------------
1044: PROCEDURE Create_Primary_Visits (
1045: p_api_version IN NUMBER := 1.0,
1046: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1047: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1048: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1049: p_snapshot_id IN NUMBER,
1050: p_add_plan_flag IN VARCHAR2 := 'N',
1051: x_return_status OUT NOCOPY VARCHAR2,

Line 1048: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1044: PROCEDURE Create_Primary_Visits (
1045: p_api_version IN NUMBER := 1.0,
1046: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1047: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1048: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1049: p_snapshot_id IN NUMBER,
1050: p_add_plan_flag IN VARCHAR2 := 'N',
1051: x_return_status OUT NOCOPY VARCHAR2,
1052: x_msg_count OUT NOCOPY NUMBER,

Line 1190: IF FND_API.To_Boolean( p_init_msg_list) THEN

1186: SAVEPOINT Create_Primary_Visits_pvt;
1187:
1188: -- Initialize message list if p_init_msg_list is set to TRUE
1189:
1190: IF FND_API.To_Boolean( p_init_msg_list) THEN
1191: FND_MSG_PUB.Initialize;
1192: END IF;
1193:
1194: -- Initialize API return status to success

Line 1195: x_return_status := FND_API.G_RET_STS_SUCCESS;

1191: FND_MSG_PUB.Initialize;
1192: END IF;
1193:
1194: -- Initialize API return status to success
1195: x_return_status := FND_API.G_RET_STS_SUCCESS;
1196:
1197: -- Standard call to check for call compatibility.
1198: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
1199: p_api_version,

Line 1198: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,

1194: -- Initialize API return status to success
1195: x_return_status := FND_API.G_RET_STS_SUCCESS;
1196:
1197: -- Standard call to check for call compatibility.
1198: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
1199: p_api_version,
1200: l_api_name,G_PKG_NAME)
1201: THEN
1202: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

Line 1202: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1198: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
1199: p_api_version,
1200: l_api_name,G_PKG_NAME)
1201: THEN
1202: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1203: END IF;
1204:
1205: -- make sure that snapshot id is present in the input and is valid
1206: IF(p_snapshot_id IS NULL OR p_snapshot_id = FND_API.G_MISS_NUM) THEN

Line 1206: IF(p_snapshot_id IS NULL OR p_snapshot_id = FND_API.G_MISS_NUM) THEN

1202: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1203: END IF;
1204:
1205: -- make sure that snapshot id is present in the input and is valid
1206: IF(p_snapshot_id IS NULL OR p_snapshot_id = FND_API.G_MISS_NUM) THEN
1207: FND_MESSAGE.Set_Name('AHL','AHL_AVF_SNPSHT_INPUT_MISS');
1208: FND_MSG_PUB.ADD;
1209:
1210: IF (fnd_log.level_exception >= l_log_current_level)THEN

Line 1218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1214: L_DEBUG_KEY,
1215: 'Snapshot id is mandatory but found null in input '
1216: );
1217: END IF;
1218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1219:
1220: ELSE
1221: OPEN get_dates (p_snapshot_id);
1222: FETCH get_dates INTO dates_rec;

Line 1236: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1232: L_DEBUG_KEY,
1233: 'Snapshot id is invalid '
1234: );
1235: END IF;
1236: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1237: END IF;
1238: CLOSE get_dates;
1239: END IF;
1240:

Line 1287: p_init_msg_list => Fnd_Api.g_false,

1283: 'Before calling Validate_MR_Operating_Org, mr_header_id= '||l_primary_ue_rec.mr_header_id||', operating_org_id= '||l_operating_org_id);
1284: END IF;
1285: Validate_MR_Operating_Org (
1286: p_api_version => l_api_version,
1287: p_init_msg_list => Fnd_Api.g_false,
1288: p_commit => Fnd_Api.g_false,
1289: p_validation_level => p_validation_level,
1290: p_mr_header_id => l_primary_ue_rec.mr_header_id,
1291: p_operating_org_id => l_operating_org_id,

Line 1288: p_commit => Fnd_Api.g_false,

1284: END IF;
1285: Validate_MR_Operating_Org (
1286: p_api_version => l_api_version,
1287: p_init_msg_list => Fnd_Api.g_false,
1288: p_commit => Fnd_Api.g_false,
1289: p_validation_level => p_validation_level,
1290: p_mr_header_id => l_primary_ue_rec.mr_header_id,
1291: p_operating_org_id => l_operating_org_id,
1292: x_maintenance_org_id => l_maintenance_org_id,

Line 1304: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1300: L_DEBUG_KEY,
1301: 'After calling Validate_MR_Operating_Org l_return_status= '||l_return_status);
1302: END IF;
1303:
1304: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1305: x_msg_count := FND_MSG_PUB.count_msg;
1306: IF (l_log_statement >= l_log_current_level) THEN
1307: fnd_log.string(l_log_statement,
1308: L_DEBUG_KEY,

Line 1311: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1307: fnd_log.string(l_log_statement,
1308: L_DEBUG_KEY,
1309: 'Errors from Validate_MR_Operating_Org. Message count: ' || x_msg_count);
1310: END IF;
1311: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1312: RAISE FND_API.G_EXC_ERROR;
1313: ELSE
1314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1315: END IF;

Line 1312: RAISE FND_API.G_EXC_ERROR;

1308: L_DEBUG_KEY,
1309: 'Errors from Validate_MR_Operating_Org. Message count: ' || x_msg_count);
1310: END IF;
1311: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1312: RAISE FND_API.G_EXC_ERROR;
1313: ELSE
1314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1315: END IF;
1316: END IF; -- Return Status is not Success

Line 1314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1310: END IF;
1311: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1312: RAISE FND_API.G_EXC_ERROR;
1313: ELSE
1314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1315: END IF;
1316: END IF; -- Return Status is not Success
1317:
1318: -- PRAKKUM :: Bug 13589168 :: 01/16/2012 :: START

Line 1400: p_init_msg_list => Fnd_Api.g_false,

1396: 'Before calling AHL_VWP_VISITS_PVT.Create_Visit');
1397: END IF;
1398: AHL_VWP_VISITS_PVT.Create_Visit (
1399: p_api_version => l_api_version,
1400: p_init_msg_list => Fnd_Api.g_false,
1401: p_commit => Fnd_Api.g_false,
1402: p_validation_level => p_validation_level,
1403: p_module_type => 'API',
1404: p_x_visit_rec => l_visit_rec,

Line 1401: p_commit => Fnd_Api.g_false,

1397: END IF;
1398: AHL_VWP_VISITS_PVT.Create_Visit (
1399: p_api_version => l_api_version,
1400: p_init_msg_list => Fnd_Api.g_false,
1401: p_commit => Fnd_Api.g_false,
1402: p_validation_level => p_validation_level,
1403: p_module_type => 'API',
1404: p_x_visit_rec => l_visit_rec,
1405: x_return_status => l_return_status,

Line 1416: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1412: 'After calling Create_Visit l_return_status= '||l_return_status
1413: ||', visit id: '||l_visit_rec.visit_id);
1414: END IF;
1415:
1416: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1417: x_msg_count := FND_MSG_PUB.count_msg;
1418: IF (l_log_statement >= l_log_current_level) THEN
1419: fnd_log.string(l_log_statement,
1420: L_DEBUG_KEY,

Line 1423: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1419: fnd_log.string(l_log_statement,
1420: L_DEBUG_KEY,
1421: 'Errors from Create_Visit. Message count: ' || x_msg_count);
1422: END IF;
1423: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1424: RAISE FND_API.G_EXC_ERROR;
1425: ELSE
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;

Line 1424: RAISE FND_API.G_EXC_ERROR;

1420: L_DEBUG_KEY,
1421: 'Errors from Create_Visit. Message count: ' || x_msg_count);
1422: END IF;
1423: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1424: RAISE FND_API.G_EXC_ERROR;
1425: ELSE
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;
1428: -- Added for logging the visit numbers :: SATRAJEN

Line 1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1422: END IF;
1423: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1424: RAISE FND_API.G_EXC_ERROR;
1425: ELSE
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;
1428: -- Added for logging the visit numbers :: SATRAJEN
1429: ELSE
1430: l_visit_number := NULL;

Line 1452: p_init_msg_list => Fnd_Api.g_false,

1448: l_task_rec(1).unit_effectivity_id := l_primary_ue_rec.unit_effectivity_id;
1449: l_task_rec(1).task_type_code := 'PLANNED';
1450: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
1451: p_api_version => L_API_VERSION,
1452: p_init_msg_list => Fnd_Api.g_false,
1453: p_commit => Fnd_Api.g_false,
1454: p_validation_level => Fnd_Api.g_valid_level_full,
1455: p_module_type => 'API',
1456: p_x_task_tbl => l_task_rec,

Line 1453: p_commit => Fnd_Api.g_false,

1449: l_task_rec(1).task_type_code := 'PLANNED';
1450: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
1451: p_api_version => L_API_VERSION,
1452: p_init_msg_list => Fnd_Api.g_false,
1453: p_commit => Fnd_Api.g_false,
1454: p_validation_level => Fnd_Api.g_valid_level_full,
1455: p_module_type => 'API',
1456: p_x_task_tbl => l_task_rec,
1457: x_return_status => l_return_status,

Line 1454: p_validation_level => Fnd_Api.g_valid_level_full,

1450: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
1451: p_api_version => L_API_VERSION,
1452: p_init_msg_list => Fnd_Api.g_false,
1453: p_commit => Fnd_Api.g_false,
1454: p_validation_level => Fnd_Api.g_valid_level_full,
1455: p_module_type => 'API',
1456: p_x_task_tbl => l_task_rec,
1457: x_return_status => l_return_status,
1458: x_msg_count => l_msg_count,

Line 1466: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1462: L_DEBUG_KEY,
1463: 'After calling AHL_VWP_TASKS_PVT.Create_PUP_Tasks l_return_status= '||l_return_status);
1464: END IF;
1465:
1466: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1467: x_msg_count := FND_MSG_PUB.count_msg;
1468: IF (l_log_statement >= l_log_current_level) THEN
1469: fnd_log.string(l_log_statement,
1470: L_DEBUG_KEY,

Line 1473: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1469: fnd_log.string(l_log_statement,
1470: L_DEBUG_KEY,
1471: 'Errors from Create_PUP_Tasks. Message count: ' || x_msg_count);
1472: END IF;
1473: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1474: RAISE FND_API.G_EXC_ERROR;
1475: ELSE
1476: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1477: END IF;

Line 1474: RAISE FND_API.G_EXC_ERROR;

1470: L_DEBUG_KEY,
1471: 'Errors from Create_PUP_Tasks. Message count: ' || x_msg_count);
1472: END IF;
1473: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1474: RAISE FND_API.G_EXC_ERROR;
1475: ELSE
1476: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1477: END IF;
1478: END IF; -- Return Status is not Success

Line 1476: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1472: END IF;
1473: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1474: RAISE FND_API.G_EXC_ERROR;
1475: ELSE
1476: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1477: END IF;
1478: END IF; -- Return Status is not Success
1479: -- Start of change SATRAJEN :: Bug 16048246 : To call Add_Planned_MRs when ever a Primary visit gets created.:: 28-12-2012
1480: -- Calling ADD_PLANNED_MRs to associate UEs.

Line 1484: p_init_msg_list => FND_API.G_FALSE,

1480: -- Calling ADD_PLANNED_MRs to associate UEs.
1481: IF p_add_plan_flag = 'Y' THEN
1482: Add_Planned_MRs (
1483: p_api_version => 1.0,
1484: p_init_msg_list => FND_API.G_FALSE,
1485: p_commit => FND_API.G_FALSE,
1486: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1487: p_visit_id => l_visit_rec.visit_id,
1488: p_snapshot_id => p_snapshot_id,

Line 1485: p_commit => FND_API.G_FALSE,

1481: IF p_add_plan_flag = 'Y' THEN
1482: Add_Planned_MRs (
1483: p_api_version => 1.0,
1484: p_init_msg_list => FND_API.G_FALSE,
1485: p_commit => FND_API.G_FALSE,
1486: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1487: p_visit_id => l_visit_rec.visit_id,
1488: p_snapshot_id => p_snapshot_id,
1489: x_return_status => l_return_status,

Line 1486: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1482: Add_Planned_MRs (
1483: p_api_version => 1.0,
1484: p_init_msg_list => FND_API.G_FALSE,
1485: p_commit => FND_API.G_FALSE,
1486: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1487: p_visit_id => l_visit_rec.visit_id,
1488: p_snapshot_id => p_snapshot_id,
1489: x_return_status => l_return_status,
1490: x_msg_count => l_msg_count,

Line 1499: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS AND l_return_status <> 'V') THEN

1495: L_DEBUG_KEY,
1496: 'After calling Add_Planned_MRs l_return_status= '||l_return_status);
1497: END IF;
1498: -- l_return_status = 'V' then number of UEs for the visit is 0.
1499: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS AND l_return_status <> 'V') THEN
1500: x_msg_count := FND_MSG_PUB.count_msg;
1501: IF (l_log_statement >= l_log_current_level) THEN
1502: fnd_log.string(l_log_statement,
1503: L_DEBUG_KEY,

Line 1506: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1502: fnd_log.string(l_log_statement,
1503: L_DEBUG_KEY,
1504: 'Errors from Add_Planned_MRs. Message count: ' || x_msg_count);
1505: END IF;
1506: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1507: RAISE FND_API.G_EXC_ERROR;
1508: ELSE
1509: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1510: END IF;

Line 1507: RAISE FND_API.G_EXC_ERROR;

1503: L_DEBUG_KEY,
1504: 'Errors from Add_Planned_MRs. Message count: ' || x_msg_count);
1505: END IF;
1506: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1507: RAISE FND_API.G_EXC_ERROR;
1508: ELSE
1509: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1510: END IF;
1511: ELSE

Line 1509: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1505: END IF;
1506: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1507: RAISE FND_API.G_EXC_ERROR;
1508: ELSE
1509: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1510: END IF;
1511: ELSE
1512: l_requery_flag := 'Y';
1513: END IF; -- Return Status is not Success

Line 1560: p_init_msg_list => Fnd_Api.g_false,

1556: 'Before calling Validate_MR_Operating_Org, mr_header_id= '||l_primary_ue_rec.mr_header_id||', operating_org_id= '||l_operating_org_id);
1557: END IF;
1558: Validate_MR_Operating_Org (
1559: p_api_version => l_api_version,
1560: p_init_msg_list => Fnd_Api.g_false,
1561: p_commit => Fnd_Api.g_false,
1562: p_validation_level => p_validation_level,
1563: p_mr_header_id => l_primary_ue_rec.mr_header_id,
1564: p_operating_org_id => l_operating_org_id,

Line 1561: p_commit => Fnd_Api.g_false,

1557: END IF;
1558: Validate_MR_Operating_Org (
1559: p_api_version => l_api_version,
1560: p_init_msg_list => Fnd_Api.g_false,
1561: p_commit => Fnd_Api.g_false,
1562: p_validation_level => p_validation_level,
1563: p_mr_header_id => l_primary_ue_rec.mr_header_id,
1564: p_operating_org_id => l_operating_org_id,
1565: x_maintenance_org_id => l_maintenance_org_id,

Line 1577: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1573: L_DEBUG_KEY,
1574: 'After calling Validate_MR_Operating_Org l_return_status= '||l_return_status);
1575: END IF;
1576:
1577: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1578: x_msg_count := FND_MSG_PUB.count_msg;
1579: IF (l_log_statement >= l_log_current_level) THEN
1580: fnd_log.string(l_log_statement,
1581: L_DEBUG_KEY,

Line 1584: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1580: fnd_log.string(l_log_statement,
1581: L_DEBUG_KEY,
1582: 'Errors from Validate_MR_Operating_Org. Message count: ' || x_msg_count);
1583: END IF;
1584: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1585: RAISE FND_API.G_EXC_ERROR;
1586: ELSE
1587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1588: END IF;

Line 1585: RAISE FND_API.G_EXC_ERROR;

1581: L_DEBUG_KEY,
1582: 'Errors from Validate_MR_Operating_Org. Message count: ' || x_msg_count);
1583: END IF;
1584: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1585: RAISE FND_API.G_EXC_ERROR;
1586: ELSE
1587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1588: END IF;
1589: END IF; -- Return Status is not Success

Line 1587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1583: END IF;
1584: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1585: RAISE FND_API.G_EXC_ERROR;
1586: ELSE
1587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1588: END IF;
1589: END IF; -- Return Status is not Success
1590:
1591: -- PRAKKUM :: Bug 13589168 :: 01/16/2012 :: START

Line 1671: p_init_msg_list => Fnd_Api.g_false,

1667: 'Before calling AHL_VWP_VISITS_PVT.Create_Visit');
1668: END IF;
1669: AHL_VWP_VISITS_PVT.Create_Visit (
1670: p_api_version => l_api_version,
1671: p_init_msg_list => Fnd_Api.g_false,
1672: p_commit => Fnd_Api.g_false,
1673: p_validation_level => p_validation_level,
1674: p_module_type => 'API',
1675: p_x_visit_rec => l_visit_rec,

Line 1672: p_commit => Fnd_Api.g_false,

1668: END IF;
1669: AHL_VWP_VISITS_PVT.Create_Visit (
1670: p_api_version => l_api_version,
1671: p_init_msg_list => Fnd_Api.g_false,
1672: p_commit => Fnd_Api.g_false,
1673: p_validation_level => p_validation_level,
1674: p_module_type => 'API',
1675: p_x_visit_rec => l_visit_rec,
1676: x_return_status => l_return_status,

Line 1687: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1683: 'After calling Create_Visit l_return_status= '||l_return_status
1684: ||', visit id: '||l_visit_rec.visit_id);
1685: END IF;
1686:
1687: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1688: x_msg_count := FND_MSG_PUB.count_msg;
1689: IF (l_log_statement >= l_log_current_level) THEN
1690: fnd_log.string(l_log_statement,
1691: L_DEBUG_KEY,

Line 1694: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1690: fnd_log.string(l_log_statement,
1691: L_DEBUG_KEY,
1692: 'Errors from Create_Visit. Message count: ' || x_msg_count);
1693: END IF;
1694: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1695: RAISE FND_API.G_EXC_ERROR;
1696: ELSE
1697: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1698: END IF;

Line 1695: RAISE FND_API.G_EXC_ERROR;

1691: L_DEBUG_KEY,
1692: 'Errors from Create_Visit. Message count: ' || x_msg_count);
1693: END IF;
1694: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1695: RAISE FND_API.G_EXC_ERROR;
1696: ELSE
1697: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1698: END IF;
1699: -- Added for logging the visit numbers :: SATRAJEN

Line 1697: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1693: END IF;
1694: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1695: RAISE FND_API.G_EXC_ERROR;
1696: ELSE
1697: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1698: END IF;
1699: -- Added for logging the visit numbers :: SATRAJEN
1700: ELSE
1701: l_visit_number := NULL;

Line 1722: p_init_msg_list => Fnd_Api.g_false,

1718: l_task_rec(1).unit_effectivity_id := l_primary_ue_rec.unit_effectivity_id;
1719: l_task_rec(1).task_type_code := 'PLANNED';
1720: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
1721: p_api_version => L_API_VERSION,
1722: p_init_msg_list => Fnd_Api.g_false,
1723: p_commit => Fnd_Api.g_false,
1724: p_validation_level => Fnd_Api.g_valid_level_full,
1725: p_module_type => 'API',
1726: p_x_task_tbl => l_task_rec,

Line 1723: p_commit => Fnd_Api.g_false,

1719: l_task_rec(1).task_type_code := 'PLANNED';
1720: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
1721: p_api_version => L_API_VERSION,
1722: p_init_msg_list => Fnd_Api.g_false,
1723: p_commit => Fnd_Api.g_false,
1724: p_validation_level => Fnd_Api.g_valid_level_full,
1725: p_module_type => 'API',
1726: p_x_task_tbl => l_task_rec,
1727: x_return_status => l_return_status,

Line 1724: p_validation_level => Fnd_Api.g_valid_level_full,

1720: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(
1721: p_api_version => L_API_VERSION,
1722: p_init_msg_list => Fnd_Api.g_false,
1723: p_commit => Fnd_Api.g_false,
1724: p_validation_level => Fnd_Api.g_valid_level_full,
1725: p_module_type => 'API',
1726: p_x_task_tbl => l_task_rec,
1727: x_return_status => l_return_status,
1728: x_msg_count => l_msg_count,

Line 1736: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1732: L_DEBUG_KEY,
1733: 'After calling AHL_VWP_TASKS_PVT.Create_PUP_Tasks l_return_status= '||l_return_status);
1734: END IF;
1735:
1736: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1737: x_msg_count := FND_MSG_PUB.count_msg;
1738: IF (l_log_statement >= l_log_current_level) THEN
1739: fnd_log.string(l_log_statement,
1740: L_DEBUG_KEY,

Line 1743: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1739: fnd_log.string(l_log_statement,
1740: L_DEBUG_KEY,
1741: 'Errors from Create_PUP_Tasks. Message count: ' || x_msg_count);
1742: END IF;
1743: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1744: RAISE FND_API.G_EXC_ERROR;
1745: ELSE
1746: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1747: END IF;

Line 1744: RAISE FND_API.G_EXC_ERROR;

1740: L_DEBUG_KEY,
1741: 'Errors from Create_PUP_Tasks. Message count: ' || x_msg_count);
1742: END IF;
1743: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1744: RAISE FND_API.G_EXC_ERROR;
1745: ELSE
1746: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1747: END IF;
1748: END IF; -- Return Status is not Success

Line 1746: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1742: END IF;
1743: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1744: RAISE FND_API.G_EXC_ERROR;
1745: ELSE
1746: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1747: END IF;
1748: END IF; -- Return Status is not Success
1749: -- Start of change SATRAJEN :: Bug 16048246 : To call Add_Planned_MRs when ever a Primary visit gets created.:: 28-12-2012
1750: -- Calling ADD_PLANNED_MRs to associate UEs.

Line 1754: p_init_msg_list => FND_API.G_FALSE,

1750: -- Calling ADD_PLANNED_MRs to associate UEs.
1751: IF p_add_plan_flag = 'Y' THEN
1752: Add_Planned_MRs (
1753: p_api_version => 1.0,
1754: p_init_msg_list => FND_API.G_FALSE,
1755: p_commit => FND_API.G_FALSE,
1756: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1757: p_visit_id => l_visit_rec.visit_id,
1758: p_snapshot_id => p_snapshot_id,

Line 1755: p_commit => FND_API.G_FALSE,

1751: IF p_add_plan_flag = 'Y' THEN
1752: Add_Planned_MRs (
1753: p_api_version => 1.0,
1754: p_init_msg_list => FND_API.G_FALSE,
1755: p_commit => FND_API.G_FALSE,
1756: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1757: p_visit_id => l_visit_rec.visit_id,
1758: p_snapshot_id => p_snapshot_id,
1759: x_return_status => l_return_status,

Line 1756: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1752: Add_Planned_MRs (
1753: p_api_version => 1.0,
1754: p_init_msg_list => FND_API.G_FALSE,
1755: p_commit => FND_API.G_FALSE,
1756: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1757: p_visit_id => l_visit_rec.visit_id,
1758: p_snapshot_id => p_snapshot_id,
1759: x_return_status => l_return_status,
1760: x_msg_count => l_msg_count,

Line 1769: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS AND l_return_status <> 'V') THEN

1765: L_DEBUG_KEY,
1766: 'After calling Add_Planned_MRs l_return_status= '||l_return_status);
1767: END IF;
1768: -- l_return_status = 'V' then number of UEs for the visit is 0.
1769: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS AND l_return_status <> 'V') THEN
1770: x_msg_count := FND_MSG_PUB.count_msg;
1771: IF (l_log_statement >= l_log_current_level) THEN
1772: fnd_log.string(l_log_statement,
1773: L_DEBUG_KEY,

Line 1776: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1772: fnd_log.string(l_log_statement,
1773: L_DEBUG_KEY,
1774: 'Errors from Add_Planned_MRs. Message count: ' || x_msg_count);
1775: END IF;
1776: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1777: RAISE FND_API.G_EXC_ERROR;
1778: ELSE
1779: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1780: END IF;

Line 1777: RAISE FND_API.G_EXC_ERROR;

1773: L_DEBUG_KEY,
1774: 'Errors from Add_Planned_MRs. Message count: ' || x_msg_count);
1775: END IF;
1776: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1777: RAISE FND_API.G_EXC_ERROR;
1778: ELSE
1779: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1780: END IF;
1781: ELSE

Line 1779: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1775: END IF;
1776: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1777: RAISE FND_API.G_EXC_ERROR;
1778: ELSE
1779: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1780: END IF;
1781: ELSE
1782: l_requery_flag := 'Y';
1783: END IF; -- Return Status is not Success

Line 1804: IF Fnd_Api.To_Boolean (p_commit) THEN

1800: ---------------------------End of Body-------------------------------------
1801: -- END of API body.
1802: -- Standard check of p_commit.
1803:
1804: IF Fnd_Api.To_Boolean (p_commit) THEN
1805: COMMIT WORK;
1806: END IF;
1807:
1808: Fnd_Msg_Pub.count_and_get(

Line 1809: p_encoded => Fnd_Api.g_false,

1805: COMMIT WORK;
1806: END IF;
1807:
1808: Fnd_Msg_Pub.count_and_get(
1809: p_encoded => Fnd_Api.g_false,
1810: p_count => x_msg_count,
1811: p_data => x_msg_data
1812: );
1813:

Line 1825: WHEN FND_API.G_EXC_ERROR THEN

1821: END IF;
1822:
1823: EXCEPTION
1824:
1825: WHEN FND_API.G_EXC_ERROR THEN
1826:
1827: x_return_status := FND_API.G_RET_STS_ERROR;
1828: ROLLBACK TO Create_Primary_Visits_pvt;
1829: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 1827: x_return_status := FND_API.G_RET_STS_ERROR;

1823: EXCEPTION
1824:
1825: WHEN FND_API.G_EXC_ERROR THEN
1826:
1827: x_return_status := FND_API.G_RET_STS_ERROR;
1828: ROLLBACK TO Create_Primary_Visits_pvt;
1829: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1830: p_data => x_msg_data,
1831: p_encoded => fnd_api.g_false);

Line 1831: p_encoded => fnd_api.g_false);

1827: x_return_status := FND_API.G_RET_STS_ERROR;
1828: ROLLBACK TO Create_Primary_Visits_pvt;
1829: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1830: p_data => x_msg_data,
1831: p_encoded => fnd_api.g_false);
1832:
1833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1835: ROLLBACK TO Create_Primary_Visits_pvt;

Line 1833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1829: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1830: p_data => x_msg_data,
1831: p_encoded => fnd_api.g_false);
1832:
1833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1835: ROLLBACK TO Create_Primary_Visits_pvt;
1836: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1837: p_data => x_msg_data,

Line 1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1830: p_data => x_msg_data,
1831: p_encoded => fnd_api.g_false);
1832:
1833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1835: ROLLBACK TO Create_Primary_Visits_pvt;
1836: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1837: p_data => x_msg_data,
1838: p_encoded => fnd_api.g_false);

Line 1838: p_encoded => fnd_api.g_false);

1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1835: ROLLBACK TO Create_Primary_Visits_pvt;
1836: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1837: p_data => x_msg_data,
1838: p_encoded => fnd_api.g_false);
1839:
1840: WHEN OTHERS THEN
1841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1842: ROLLBACK TO Create_Primary_Visits_pvt;

Line 1841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1837: p_data => x_msg_data,
1838: p_encoded => fnd_api.g_false);
1839:
1840: WHEN OTHERS THEN
1841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1842: ROLLBACK TO Create_Primary_Visits_pvt;
1843:
1844: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1845: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

Line 1852: p_encoded => fnd_api.g_false);

1848: END IF;
1849:
1850: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1851: p_data => x_msg_data,
1852: p_encoded => fnd_api.g_false);
1853: END Create_Primary_Visits;
1854:
1855: --------------------------------------------------------------------
1856: -- PROCEDURE

Line 1899: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1895: -- 1. Initialize error message stack by default
1896: FND_MSG_PUB.Initialize;
1897:
1898: -- Standard call to check for call compatibility
1899: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1900: retcode := 2;
1901: errbuf := FND_MSG_PUB.Get;
1902: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1903: END IF;

Line 1902: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1898: -- Standard call to check for call compatibility
1899: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1900: retcode := 2;
1901: errbuf := FND_MSG_PUB.Get;
1902: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1903: END IF;
1904:
1905: -- 2. Dump all input parameters
1906: fnd_file.put_line(fnd_file.log, '*************API input parameters**************');

Line 1926: p_init_msg_list => FND_API.G_FALSE,

1922: IF NVL(l_cancel_visit_flag,'N') = 'Y' THEN
1923: fnd_file.put_line(fnd_file.log, 'before calling Cancel_Visits');
1924: Cancel_Visits (
1925: p_api_version => 1.0,
1926: p_init_msg_list => FND_API.G_FALSE,
1927: p_commit => FND_API.G_FALSE,
1928: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1929: p_snapshot_id => p_snapshot_id,
1930: x_return_status => l_return_status,

Line 1927: p_commit => FND_API.G_FALSE,

1923: fnd_file.put_line(fnd_file.log, 'before calling Cancel_Visits');
1924: Cancel_Visits (
1925: p_api_version => 1.0,
1926: p_init_msg_list => FND_API.G_FALSE,
1927: p_commit => FND_API.G_FALSE,
1928: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1929: p_snapshot_id => p_snapshot_id,
1930: x_return_status => l_return_status,
1931: x_msg_count => l_msg_count,

Line 1928: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1924: Cancel_Visits (
1925: p_api_version => 1.0,
1926: p_init_msg_list => FND_API.G_FALSE,
1927: p_commit => FND_API.G_FALSE,
1928: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1929: p_snapshot_id => p_snapshot_id,
1930: x_return_status => l_return_status,
1931: x_msg_count => l_msg_count,
1932: x_msg_data => l_msg_data

Line 1938: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1934:
1935: l_msg_count := FND_MSG_PUB.Count_Msg;
1936: IF (l_msg_count > 0) THEN
1937: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Cancel_Visits..');
1938: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1939: RAISE FND_API.G_EXC_ERROR;
1940: ELSE
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: END IF;

Line 1939: RAISE FND_API.G_EXC_ERROR;

1935: l_msg_count := FND_MSG_PUB.Count_Msg;
1936: IF (l_msg_count > 0) THEN
1937: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Cancel_Visits..');
1938: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1939: RAISE FND_API.G_EXC_ERROR;
1940: ELSE
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: END IF;
1943: ELSE

Line 1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1937: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Cancel_Visits..');
1938: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1939: RAISE FND_API.G_EXC_ERROR;
1940: ELSE
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: END IF;
1943: ELSE
1944: COMMIT WORK;
1945: END IF;

Line 1954: p_init_msg_list => FND_API.G_FALSE,

1950: IF NVL(l_create_visit_flag,'N') = 'Y' THEN
1951: fnd_file.put_line(fnd_file.log, 'before calling Create_Primary_Visits');
1952: Create_Primary_Visits (
1953: p_api_version => 1.0,
1954: p_init_msg_list => FND_API.G_FALSE,
1955: p_commit => FND_API.G_FALSE,
1956: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1957: p_snapshot_id => p_snapshot_id,
1958: p_add_plan_flag => NVL(l_add_planned_reqs_flag,'N'),

Line 1955: p_commit => FND_API.G_FALSE,

1951: fnd_file.put_line(fnd_file.log, 'before calling Create_Primary_Visits');
1952: Create_Primary_Visits (
1953: p_api_version => 1.0,
1954: p_init_msg_list => FND_API.G_FALSE,
1955: p_commit => FND_API.G_FALSE,
1956: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1957: p_snapshot_id => p_snapshot_id,
1958: p_add_plan_flag => NVL(l_add_planned_reqs_flag,'N'),
1959: x_return_status => l_return_status,

Line 1956: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1952: Create_Primary_Visits (
1953: p_api_version => 1.0,
1954: p_init_msg_list => FND_API.G_FALSE,
1955: p_commit => FND_API.G_FALSE,
1956: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1957: p_snapshot_id => p_snapshot_id,
1958: p_add_plan_flag => NVL(l_add_planned_reqs_flag,'N'),
1959: x_return_status => l_return_status,
1960: x_msg_count => l_msg_count,

Line 1967: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1963:
1964: l_msg_count := FND_MSG_PUB.Count_Msg;
1965: IF (l_msg_count > 0) THEN
1966: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Create_Primary_Visits..');
1967: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1968: RAISE FND_API.G_EXC_ERROR;
1969: ELSE
1970: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1971: END IF;

Line 1968: RAISE FND_API.G_EXC_ERROR;

1964: l_msg_count := FND_MSG_PUB.Count_Msg;
1965: IF (l_msg_count > 0) THEN
1966: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Create_Primary_Visits..');
1967: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1968: RAISE FND_API.G_EXC_ERROR;
1969: ELSE
1970: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1971: END IF;
1972: ELSE

Line 1970: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1966: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Create_Primary_Visits..');
1967: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1968: RAISE FND_API.G_EXC_ERROR;
1969: ELSE
1970: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1971: END IF;
1972: ELSE
1973: COMMIT WORK;
1974: END IF;

Line 1983: p_init_msg_list => FND_API.G_FALSE,

1979: IF ((NVL(l_add_planned_reqs_flag,'N') = 'Y') AND (NVL(l_create_visit_flag,'N') = 'N')) THEN
1980: fnd_file.put_line(fnd_file.log, 'before calling Add_Planned_MRs');
1981: Add_Planned_MRs (
1982: p_api_version => 1.0,
1983: p_init_msg_list => FND_API.G_FALSE,
1984: p_commit => FND_API.G_FALSE,
1985: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1986: p_snapshot_id => p_snapshot_id,
1987: x_return_status => l_return_status,

Line 1984: p_commit => FND_API.G_FALSE,

1980: fnd_file.put_line(fnd_file.log, 'before calling Add_Planned_MRs');
1981: Add_Planned_MRs (
1982: p_api_version => 1.0,
1983: p_init_msg_list => FND_API.G_FALSE,
1984: p_commit => FND_API.G_FALSE,
1985: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1986: p_snapshot_id => p_snapshot_id,
1987: x_return_status => l_return_status,
1988: x_msg_count => l_msg_count,

Line 1985: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1981: Add_Planned_MRs (
1982: p_api_version => 1.0,
1983: p_init_msg_list => FND_API.G_FALSE,
1984: p_commit => FND_API.G_FALSE,
1985: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1986: p_snapshot_id => p_snapshot_id,
1987: x_return_status => l_return_status,
1988: x_msg_count => l_msg_count,
1989: x_msg_data => l_msg_data

Line 1995: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1991:
1992: l_msg_count := FND_MSG_PUB.Count_Msg;
1993: IF (l_msg_count > 0) THEN
1994: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Add_Planned_MRs..');
1995: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1996: RAISE FND_API.G_EXC_ERROR;
1997: ELSE
1998: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1999: END IF;

Line 1996: RAISE FND_API.G_EXC_ERROR;

1992: l_msg_count := FND_MSG_PUB.Count_Msg;
1993: IF (l_msg_count > 0) THEN
1994: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Add_Planned_MRs..');
1995: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1996: RAISE FND_API.G_EXC_ERROR;
1997: ELSE
1998: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1999: END IF;
2000: ELSE

Line 1998: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1994: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Add_Planned_MRs..');
1995: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1996: RAISE FND_API.G_EXC_ERROR;
1997: ELSE
1998: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1999: END IF;
2000: ELSE
2001: COMMIT WORK;
2002: END IF;

Line 2006: WHEN FND_API.G_EXC_ERROR THEN

2002: END IF;
2003: END IF;
2004:
2005: EXCEPTION
2006: WHEN FND_API.G_EXC_ERROR THEN
2007: ROLLBACK TO Process_Primary_visits;
2008: retcode := 2;
2009: FOR i IN 1..l_msg_count
2010: LOOP

Line 2012: p_encoded => FND_API.G_FALSE,

2008: retcode := 2;
2009: FOR i IN 1..l_msg_count
2010: LOOP
2011: fnd_msg_pub.get( p_msg_index => i,
2012: p_encoded => FND_API.G_FALSE,
2013: p_data => l_err_msg,
2014: p_msg_index_out => l_msg_index_out);
2015:
2016: fnd_file.put_line(FND_FILE.LOG, 'Err message-'||l_msg_index_out||':' || l_err_msg);

Line 2020: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2016: fnd_file.put_line(FND_FILE.LOG, 'Err message-'||l_msg_index_out||':' || l_err_msg);
2017: END LOOP;
2018:
2019:
2020: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2021: ROLLBACK TO Process_Primary_visits;
2022: retcode := 2;
2023: l_msg_count := Fnd_Msg_Pub.count_msg;
2024: FOR i IN 1..l_msg_count

Line 2027: p_encoded => FND_API.G_FALSE,

2023: l_msg_count := Fnd_Msg_Pub.count_msg;
2024: FOR i IN 1..l_msg_count
2025: LOOP
2026: fnd_msg_pub.get( p_msg_index => i,
2027: p_encoded => FND_API.G_FALSE,
2028: p_data => l_err_msg,
2029: p_msg_index_out => l_msg_index_out);
2030:
2031: fnd_file.put_line(FND_FILE.LOG, 'Err message-'||l_msg_index_out||':' || l_err_msg);

Line 2047: p_encoded => FND_API.G_FALSE,

2043: l_msg_count := Fnd_Msg_Pub.count_msg;
2044: FOR i IN 1..l_msg_count
2045: LOOP
2046: fnd_msg_pub.get( p_msg_index => i,
2047: p_encoded => FND_API.G_FALSE,
2048: p_data => l_err_msg,
2049: p_msg_index_out => l_msg_index_out);
2050:
2051: fnd_file.put_line(FND_FILE.LOG, 'Err message-'||l_msg_index_out||':' || l_err_msg);