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.

[Home] [Help]

APPS.AHL_COMPLEX_MX_RWSC_PVT dependencies on FND_API

Line 53: -- Always call this method with p_commit value : FND_API.G_FALSE

49: -- Procedure name : Get_visit_ir_uc_details
50: -- Type : Public
51: -- Function : This procedure will update the temparory table to show data in hGrid.
52: -- Since this table is global temporary with ON COMMIT DELETE ROWS,
53: -- Always call this method with p_commit value : FND_API.G_FALSE
54: -- Pre-reqs :
55: -- Parameters :
56: --
57: -- Get_visit_ir_uc_details Parameters

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

63: -------------------------------------------------------------------------------------------------------
64: PROCEDURE Get_visit_ir_uc_details
65: (
66: p_api_version IN NUMBER := 1.0,
67: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
68: p_commit IN VARCHAR2 := FND_API.G_FALSE,
69: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
70: p_default IN VARCHAR2 := FND_API.G_FALSE,
71: p_module_type IN VARCHAR2 := NULL,

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

64: PROCEDURE Get_visit_ir_uc_details
65: (
66: p_api_version IN NUMBER := 1.0,
67: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
68: p_commit IN VARCHAR2 := FND_API.G_FALSE,
69: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
70: p_default IN VARCHAR2 := FND_API.G_FALSE,
71: p_module_type IN VARCHAR2 := NULL,
72: p_unit_header_id IN NUMBER,

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

65: (
66: p_api_version IN NUMBER := 1.0,
67: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
68: p_commit IN VARCHAR2 := FND_API.G_FALSE,
69: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
70: p_default IN VARCHAR2 := FND_API.G_FALSE,
71: p_module_type IN VARCHAR2 := NULL,
72: p_unit_header_id IN NUMBER,
73: p_item_instance_id IN NUMBER,

Line 70: p_default IN VARCHAR2 := FND_API.G_FALSE,

66: p_api_version IN NUMBER := 1.0,
67: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
68: p_commit IN VARCHAR2 := FND_API.G_FALSE,
69: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
70: p_default IN VARCHAR2 := FND_API.G_FALSE,
71: p_module_type IN VARCHAR2 := NULL,
72: p_unit_header_id IN NUMBER,
73: p_item_instance_id IN NUMBER,
74: p_visit_id IN NUMBER,

Line 99: x_return_status := FND_API.G_RET_STS_SUCCESS;

95: l_count_visit NUMBER;
96:
97: BEGIN
98: --Initialize API return status to success
99: x_return_status := FND_API.G_RET_STS_SUCCESS;
100:
101: --Standard call to check for call compatibility.
102: IF NOT FND_API.compatible_api_call(
103: l_api_version,

Line 102: IF NOT FND_API.compatible_api_call(

98: --Initialize API return status to success
99: x_return_status := FND_API.G_RET_STS_SUCCESS;
100:
101: --Standard call to check for call compatibility.
102: IF NOT FND_API.compatible_api_call(
103: l_api_version,
104: p_api_version,
105: l_api_name,
106: G_PKG_NAME)

Line 108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

104: p_api_version,
105: l_api_name,
106: G_PKG_NAME)
107: THEN
108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
109: END IF;
110:
111: --Initialize message list if p_init_msg_list is set to TRUE.
112: IF FND_API.to_boolean( p_init_msg_list ) THEN

Line 112: IF FND_API.to_boolean( p_init_msg_list ) THEN

108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
109: END IF;
110:
111: --Initialize message list if p_init_msg_list is set to TRUE.
112: IF FND_API.to_boolean( p_init_msg_list ) THEN
113: FND_MSG_PUB.initialize;
114: END IF;
115:
116: -- This table stores details of only one visit temporarily.

Line 305: IF(p_commit = FND_API.G_TRUE) THEN

301: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name,
302: 'Records in Table are ' || l_count);
303: END IF;
304:
305: IF(p_commit = FND_API.G_TRUE) THEN
306: COMMIT WORK;
307: END IF;
308:
309: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception

Line 312: RAISE FND_API.G_EXC_ERROR;

308:
309: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
310: x_msg_count := FND_MSG_PUB.count_msg;
311: IF x_msg_count > 0 THEN
312: RAISE FND_API.G_EXC_ERROR;
313: END IF;
314:
315: -- Count and Get messages (optional)
316: FND_MSG_PUB.count_and_get(

Line 317: p_encoded => FND_API.G_FALSE,

313: END IF;
314:
315: -- Count and Get messages (optional)
316: FND_MSG_PUB.count_and_get(
317: p_encoded => FND_API.G_FALSE,
318: p_count => x_msg_count,
319: p_data => x_msg_data);
320:
321: EXCEPTION

Line 322: WHEN FND_API.G_EXC_ERROR THEN

318: p_count => x_msg_count,
319: p_data => x_msg_data);
320:
321: EXCEPTION
322: WHEN FND_API.G_EXC_ERROR THEN
323: x_return_status := FND_API.G_RET_STS_ERROR ;
324: FND_MSG_PUB.count_and_get(
325: p_encoded => FND_API.G_FALSE,
326: p_count => x_msg_count,

Line 323: x_return_status := FND_API.G_RET_STS_ERROR ;

319: p_data => x_msg_data);
320:
321: EXCEPTION
322: WHEN FND_API.G_EXC_ERROR THEN
323: x_return_status := FND_API.G_RET_STS_ERROR ;
324: FND_MSG_PUB.count_and_get(
325: p_encoded => FND_API.G_FALSE,
326: p_count => x_msg_count,
327: p_data => x_msg_data);

Line 325: p_encoded => FND_API.G_FALSE,

321: EXCEPTION
322: WHEN FND_API.G_EXC_ERROR THEN
323: x_return_status := FND_API.G_RET_STS_ERROR ;
324: FND_MSG_PUB.count_and_get(
325: p_encoded => FND_API.G_FALSE,
326: p_count => x_msg_count,
327: p_data => x_msg_data);
328:
329: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 329: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

325: p_encoded => FND_API.G_FALSE,
326: p_count => x_msg_count,
327: p_data => x_msg_data);
328:
329: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
331: FND_MSG_PUB.count_and_get(
332: p_encoded => FND_API.G_FALSE,
333: p_count => x_msg_count,

Line 330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

326: p_count => x_msg_count,
327: p_data => x_msg_data);
328:
329: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
331: FND_MSG_PUB.count_and_get(
332: p_encoded => FND_API.G_FALSE,
333: p_count => x_msg_count,
334: p_data => x_msg_data);

Line 332: p_encoded => FND_API.G_FALSE,

328:
329: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
331: FND_MSG_PUB.count_and_get(
332: p_encoded => FND_API.G_FALSE,
333: p_count => x_msg_count,
334: p_data => x_msg_data);
335:
336: WHEN OTHERS THEN

Line 337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

333: p_count => x_msg_count,
334: p_data => x_msg_data);
335:
336: WHEN OTHERS THEN
337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
338: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
339: THEN
340: FND_MSG_PUB.add_exc_msg(
341: p_pkg_name => G_PKG_NAME,

Line 346: p_encoded => FND_API.G_FALSE,

342: p_procedure_name => l_api_name,
343: p_error_text => SUBSTRB(SQLERRM,1,240));
344: END IF;
345: FND_MSG_PUB.count_and_get(
346: p_encoded => FND_API.G_FALSE,
347: p_count => x_msg_count,
348: p_data => x_msg_data);
349: END Get_visit_ir_uc_details;
350:

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

364: -------------------------------------------------------------------------------------------------------
365: PROCEDURE Process_instance_routings
366: (
367: p_api_version IN NUMBER := 1.0,
368: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
369: p_commit IN VARCHAR2 := FND_API.G_FALSE,
370: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
371: p_default IN VARCHAR2 := FND_API.G_FALSE,
372: p_module_type IN VARCHAR2 := NULL,

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

365: PROCEDURE Process_instance_routings
366: (
367: p_api_version IN NUMBER := 1.0,
368: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
369: p_commit IN VARCHAR2 := FND_API.G_FALSE,
370: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
371: p_default IN VARCHAR2 := FND_API.G_FALSE,
372: p_module_type IN VARCHAR2 := NULL,
373: p_x_instance_routings_tbl IN OUT NOCOPY instance_routings_tbl_type,

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

366: (
367: p_api_version IN NUMBER := 1.0,
368: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
369: p_commit IN VARCHAR2 := FND_API.G_FALSE,
370: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
371: p_default IN VARCHAR2 := FND_API.G_FALSE,
372: p_module_type IN VARCHAR2 := NULL,
373: p_x_instance_routings_tbl IN OUT NOCOPY instance_routings_tbl_type,
374: x_return_status OUT NOCOPY VARCHAR2,

Line 371: p_default IN VARCHAR2 := FND_API.G_FALSE,

367: p_api_version IN NUMBER := 1.0,
368: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
369: p_commit IN VARCHAR2 := FND_API.G_FALSE,
370: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
371: p_default IN VARCHAR2 := FND_API.G_FALSE,
372: p_module_type IN VARCHAR2 := NULL,
373: p_x_instance_routings_tbl IN OUT NOCOPY instance_routings_tbl_type,
374: x_return_status OUT NOCOPY VARCHAR2,
375: x_msg_count OUT NOCOPY NUMBER,

Line 391: x_return_status := FND_API.G_RET_STS_SUCCESS;

387:
388: SAVEPOINT Process_instance_routings;
389:
390: --Initialize API return status to success
391: x_return_status := FND_API.G_RET_STS_SUCCESS;
392:
393: --Standard call to check for call compatibility.
394: IF NOT FND_API.compatible_api_call(
395: l_api_version,

Line 394: IF NOT FND_API.compatible_api_call(

390: --Initialize API return status to success
391: x_return_status := FND_API.G_RET_STS_SUCCESS;
392:
393: --Standard call to check for call compatibility.
394: IF NOT FND_API.compatible_api_call(
395: l_api_version,
396: p_api_version,
397: l_api_name,
398: G_PKG_NAME)

Line 400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

396: p_api_version,
397: l_api_name,
398: G_PKG_NAME)
399: THEN
400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
401: END IF;
402:
403: --Initialize message list if p_init_msg_list is set to TRUE.
404: IF FND_API.to_boolean( p_init_msg_list ) THEN

Line 404: IF FND_API.to_boolean( p_init_msg_list ) THEN

400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
401: END IF;
402:
403: --Initialize message list if p_init_msg_list is set to TRUE.
404: IF FND_API.to_boolean( p_init_msg_list ) THEN
405: FND_MSG_PUB.initialize;
406: END IF;
407:
408: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

420: p_object_version_number => p_x_instance_routings_tbl(i).object_version_number,
421: p_inst_routing_code => p_x_instance_routings_tbl(i).inst_routing_code,
422: x_return_status => l_return_status
423: );
424: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
425: RAISE FND_API.G_EXC_ERROR;
426: END IF;
427: ELSE
428: -- delete record from table

Line 425: RAISE FND_API.G_EXC_ERROR;

421: p_inst_routing_code => p_x_instance_routings_tbl(i).inst_routing_code,
422: x_return_status => l_return_status
423: );
424: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
425: RAISE FND_API.G_EXC_ERROR;
426: END IF;
427: ELSE
428: -- delete record from table
429: Delete_Instance_Routing (

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

429: Delete_Instance_Routing (
430: p_inst_routing_id => p_x_instance_routings_tbl(i).inst_routing_id,
431: x_return_status => l_return_status
432: );
433: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
434: RAISE FND_API.G_EXC_ERROR;
435: END IF;
436: END IF;
437: ELSE

Line 434: RAISE FND_API.G_EXC_ERROR;

430: p_inst_routing_id => p_x_instance_routings_tbl(i).inst_routing_id,
431: x_return_status => l_return_status
432: );
433: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
434: RAISE FND_API.G_EXC_ERROR;
435: END IF;
436: END IF;
437: ELSE
438: -- Create New record in table

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

442: p_inst_routing_code => p_x_instance_routings_tbl(i).inst_routing_code,
443: x_inst_routing_id => l_inst_routing_id,
444: x_return_status => l_return_status
445: );
446: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
447: RAISE FND_API.G_EXC_ERROR;
448: END IF;
449:
450: --Assign out param

Line 447: RAISE FND_API.G_EXC_ERROR;

443: x_inst_routing_id => l_inst_routing_id,
444: x_return_status => l_return_status
445: );
446: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
447: RAISE FND_API.G_EXC_ERROR;
448: END IF;
449:
450: --Assign out param
451: p_x_instance_routings_tbl(i).inst_routing_id := l_inst_routing_id;

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

460: x_return_status => l_return_status,
461: x_msg_count => l_msg_count,
462: x_msg_data => l_msg_data
463: );
464: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
465: RAISE FND_API.G_EXC_ERROR;
466: END IF;
467: END LOOP;
468: END IF;

Line 465: RAISE FND_API.G_EXC_ERROR;

461: x_msg_count => l_msg_count,
462: x_msg_data => l_msg_data
463: );
464: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
465: RAISE FND_API.G_EXC_ERROR;
466: END IF;
467: END LOOP;
468: END IF;
469:

Line 470: IF(p_commit = FND_API.G_TRUE) THEN

466: END IF;
467: END LOOP;
468: END IF;
469:
470: IF(p_commit = FND_API.G_TRUE) THEN
471: COMMIT WORK;
472: END IF;
473:
474: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception

Line 477: RAISE FND_API.G_EXC_ERROR;

473:
474: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
475: x_msg_count := FND_MSG_PUB.count_msg;
476: IF x_msg_count > 0 THEN
477: RAISE FND_API.G_EXC_ERROR;
478: END IF;
479:
480: -- Count and Get messages (optional)
481: FND_MSG_PUB.count_and_get(

Line 482: p_encoded => FND_API.G_FALSE,

478: END IF;
479:
480: -- Count and Get messages (optional)
481: FND_MSG_PUB.count_and_get(
482: p_encoded => FND_API.G_FALSE,
483: p_count => x_msg_count,
484: p_data => x_msg_data);
485:
486: EXCEPTION

Line 487: WHEN FND_API.G_EXC_ERROR THEN

483: p_count => x_msg_count,
484: p_data => x_msg_data);
485:
486: EXCEPTION
487: WHEN FND_API.G_EXC_ERROR THEN
488: ROLLBACK TO Process_instance_routings;
489: x_return_status := FND_API.G_RET_STS_ERROR ;
490: FND_MSG_PUB.count_and_get(
491: p_encoded => FND_API.G_FALSE,

Line 489: x_return_status := FND_API.G_RET_STS_ERROR ;

485:
486: EXCEPTION
487: WHEN FND_API.G_EXC_ERROR THEN
488: ROLLBACK TO Process_instance_routings;
489: x_return_status := FND_API.G_RET_STS_ERROR ;
490: FND_MSG_PUB.count_and_get(
491: p_encoded => FND_API.G_FALSE,
492: p_count => x_msg_count,
493: p_data => x_msg_data);

Line 491: p_encoded => FND_API.G_FALSE,

487: WHEN FND_API.G_EXC_ERROR THEN
488: ROLLBACK TO Process_instance_routings;
489: x_return_status := FND_API.G_RET_STS_ERROR ;
490: FND_MSG_PUB.count_and_get(
491: p_encoded => FND_API.G_FALSE,
492: p_count => x_msg_count,
493: p_data => x_msg_data);
494:
495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

491: p_encoded => FND_API.G_FALSE,
492: p_count => x_msg_count,
493: p_data => x_msg_data);
494:
495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
496: ROLLBACK TO Process_instance_routings;
497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
498: FND_MSG_PUB.count_and_get(
499: p_encoded => FND_API.G_FALSE,

Line 497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

493: p_data => x_msg_data);
494:
495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
496: ROLLBACK TO Process_instance_routings;
497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
498: FND_MSG_PUB.count_and_get(
499: p_encoded => FND_API.G_FALSE,
500: p_count => x_msg_count,
501: p_data => x_msg_data);

Line 499: p_encoded => FND_API.G_FALSE,

495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
496: ROLLBACK TO Process_instance_routings;
497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
498: FND_MSG_PUB.count_and_get(
499: p_encoded => FND_API.G_FALSE,
500: p_count => x_msg_count,
501: p_data => x_msg_data);
502:
503: WHEN OTHERS THEN

Line 505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

501: p_data => x_msg_data);
502:
503: WHEN OTHERS THEN
504: ROLLBACK TO Process_instance_routings;
505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
506: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
507: THEN
508: FND_MSG_PUB.add_exc_msg(
509: p_pkg_name => G_PKG_NAME,

Line 514: p_encoded => FND_API.G_FALSE,

510: p_procedure_name => l_api_name,
511: p_error_text => SUBSTRB(SQLERRM,1,240));
512: END IF;
513: FND_MSG_PUB.count_and_get(
514: p_encoded => FND_API.G_FALSE,
515: p_count => x_msg_count,
516: p_data => x_msg_data);
517: END Process_instance_routings;
518:

Line 774: p_init_msg_list => FND_API.G_TRUE,

770: CLOSE uc_header_information;
771:
772: AHL_UC_TREE_PVT.get_whole_uc_tree(
773: p_api_version => 1.0,
774: p_init_msg_list => FND_API.G_TRUE,
775: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
776: x_return_status => l_return_status,
777: x_msg_count => l_msg_count,
778: x_msg_data => l_msg_data,

Line 775: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

771:
772: AHL_UC_TREE_PVT.get_whole_uc_tree(
773: p_api_version => 1.0,
774: p_init_msg_list => FND_API.G_TRUE,
775: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
776: x_return_status => l_return_status,
777: x_msg_count => l_msg_count,
778: x_msg_data => l_msg_data,
779: p_uc_header_id => p_unit_header_id,

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

777: x_msg_count => l_msg_count,
778: x_msg_data => l_msg_data,
779: p_uc_header_id => p_unit_header_id,
780: x_uc_descendant_tbl => l_uc_descendant_tbl);
781: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
782: RAISE FND_API.G_EXC_ERROR;
783: END IF;
784:
785: /*OPEN get_child_instances(l_root_instance_id);

Line 782: RAISE FND_API.G_EXC_ERROR;

778: x_msg_data => l_msg_data,
779: p_uc_header_id => p_unit_header_id,
780: x_uc_descendant_tbl => l_uc_descendant_tbl);
781: IF(l_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
782: RAISE FND_API.G_EXC_ERROR;
783: END IF;
784:
785: /*OPEN get_child_instances(l_root_instance_id);
786: FETCH get_child_instances BULK COLLECT INTO l_child_inst_tbl;

Line 1182: x_return_status := FND_API.G_RET_STS_SUCCESS;

1178:
1179: BEGIN
1180:
1181: -- Initialize API return status to success
1182: x_return_status := FND_API.G_RET_STS_SUCCESS;
1183:
1184: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1185: FND_LOG.string(FND_LOG.level_procedure, 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||': Begin',
1186: 'Create_Instance_Routing. visit id = '||p_visit_id||

Line 1201: x_return_status := FND_API.G_RET_STS_ERROR;

1197: Fnd_Message.SET_NAME('AHL','AHL_VWP_INVALID_VST' ); -- Visit id VISIT_ID is invalid.
1198: Fnd_Message.Set_Token('VISIT_ID', p_visit_id);
1199: Fnd_Msg_Pub.ADD;
1200:
1201: x_return_status := FND_API.G_RET_STS_ERROR;
1202: RETURN;
1203: END IF;
1204: CLOSE validate_visit_csr;
1205:

Line 1215: x_return_status := FND_API.G_RET_STS_ERROR;

1211: Fnd_Message.SET_NAME('AHL','AHL_FMP_INVALID_ITEM_INSTANCE' ); -- The item instance INSTANCE is invalid.
1212: Fnd_Message.Set_Token('INSTANCE', p_item_instance_id);
1213: Fnd_Msg_Pub.ADD;
1214:
1215: x_return_status := FND_API.G_RET_STS_ERROR;
1216: RETURN;
1217: END IF;
1218: CLOSE validate_instance_csr;
1219:

Line 1303: x_return_status := FND_API.G_RET_STS_SUCCESS;

1299: );
1300: END IF;
1301:
1302: -- Initialize API return status to success
1303: x_return_status := FND_API.G_RET_STS_SUCCESS;
1304:
1305: -- validate the instance routing id
1306: OPEN validate_routing_csr (p_inst_routing_id);
1307: FETCH validate_routing_csr INTO l_inst_routings_rec;

Line 1314: x_return_status := FND_API.G_RET_STS_ERROR;

1310: Fnd_Message.SET_NAME('AHL','AHL_CAM_INVALID_INST_ROUTING' ); -- The Instance routing id ROUTID is invalid.
1311: Fnd_Message.Set_Token('ROUTID', p_inst_routing_id);
1312: Fnd_Msg_Pub.ADD;
1313:
1314: x_return_status := FND_API.G_RET_STS_ERROR;
1315: RETURN;
1316: END IF;
1317: CLOSE validate_routing_csr;
1318:

Line 1327: x_return_status := FND_API.G_RET_STS_ERROR;

1323: END IF;
1324: FND_MESSAGE.Set_Name('AHL', 'AHL_COM_RECORD_CHANGED'); -- Record has been modified by another user.
1325: FND_MSG_PUB.ADD;
1326:
1327: x_return_status := FND_API.G_RET_STS_ERROR;
1328: RETURN;
1329: END IF;
1330:
1331: -- update a record in the AHL_VISIT_INST_ROUTINGS table

Line 1378: x_return_status := FND_API.G_RET_STS_SUCCESS;

1374: FND_LOG.string(FND_LOG.level_procedure, 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||'.begin', 'Entering Procedure');
1375: END IF;
1376:
1377: -- Initialize API return status to success
1378: x_return_status := FND_API.G_RET_STS_SUCCESS;
1379:
1380: -- validate the instance routing id
1381: OPEN validate_routing_csr (p_inst_routing_id);
1382: FETCH validate_routing_csr INTO l_inst_routings_rec;

Line 1389: x_return_status := FND_API.G_RET_STS_ERROR;

1385: Fnd_Message.SET_NAME('AHL','AHL_CAM_INVALID_INST_ROUTING' ); -- The Instance routing id ROUTID is invalid.
1386: Fnd_Message.Set_Token('ROUTID', p_inst_routing_id);
1387: Fnd_Msg_Pub.ADD;
1388:
1389: x_return_status := FND_API.G_RET_STS_ERROR;
1390: RETURN;
1391: END IF;
1392: CLOSE validate_routing_csr;
1393:

Line 1447: x_return_status:=FND_API.G_RET_STS_SUCCESS;

1443: AND TSK.VISIT_TASK_ID = WO.VISIT_TASK_ID
1444: AND WO.STATUS_CODE NOT IN (7,12,4,5,22); -- Cancelled, Closed,Complete,Complete No-charge,Deleted
1445: BEGIN
1446: SAVEPOINT process_inst_rtng;
1447: x_return_status:=FND_API.G_RET_STS_SUCCESS;
1448:
1449: IF (p_visit_id IS NULL) THEN
1450: FND_MESSAGE.SET_NAME('AHL','AHL_VWP_VISIT_NULL');
1451: FND_MSG_PUB.ADD;

Line 1452: RAISE FND_API.G_EXC_ERROR;

1448:
1449: IF (p_visit_id IS NULL) THEN
1450: FND_MESSAGE.SET_NAME('AHL','AHL_VWP_VISIT_NULL');
1451: FND_MSG_PUB.ADD;
1452: RAISE FND_API.G_EXC_ERROR;
1453: END IF;
1454:
1455: IF (p_instance_id IS NULL) THEN
1456: FND_MESSAGE.SET_NAME('AHL','AHL_LTP_APS_INST_ID_NULL');

Line 1458: RAISE FND_API.G_EXC_ERROR;

1454:
1455: IF (p_instance_id IS NULL) THEN
1456: FND_MESSAGE.SET_NAME('AHL','AHL_LTP_APS_INST_ID_NULL');
1457: FND_MSG_PUB.ADD;
1458: RAISE FND_API.G_EXC_ERROR;
1459: END IF;
1460:
1461: IF (p_old_inst_rtng_code IS NULL AND p_new_inst_rtng_code IS NULL) THEN
1462: FND_MESSAGE.SET_NAME('AHL','AHL_CAM_INST_RTNG_NULL'); -- pending to define.

Line 1464: RAISE FND_API.G_EXC_ERROR;

1460:
1461: IF (p_old_inst_rtng_code IS NULL AND p_new_inst_rtng_code IS NULL) THEN
1462: FND_MESSAGE.SET_NAME('AHL','AHL_CAM_INST_RTNG_NULL'); -- pending to define.
1463: FND_MSG_PUB.ADD;
1464: RAISE FND_API.G_EXC_ERROR;
1465: END IF;
1466:
1467: IF (NVL(p_old_inst_rtng_code,'A') <> NVL(p_new_inst_rtng_code,'B')) THEN
1468: --Process instance routing only if new and old instance routing is not same

Line 1473: p_init_msg_list => FND_API.G_FALSE,

1469: FOR i in Get_Visit_Instance_Workorders(p_visit_id,p_instance_id )
1470: LOOP
1471: AHL_PRD_WORKORDER_PVT.Add_Inst_Rtng_Notes_To_WO(
1472: p_api_version => 1.0,
1473: p_init_msg_list => FND_API.G_FALSE,
1474: p_commit => FND_API.G_FALSE,
1475: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1476: x_return_status => l_return_status,
1477: x_msg_count => l_msg_count,

Line 1474: p_commit => FND_API.G_FALSE,

1470: LOOP
1471: AHL_PRD_WORKORDER_PVT.Add_Inst_Rtng_Notes_To_WO(
1472: p_api_version => 1.0,
1473: p_init_msg_list => FND_API.G_FALSE,
1474: p_commit => FND_API.G_FALSE,
1475: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1476: x_return_status => l_return_status,
1477: x_msg_count => l_msg_count,
1478: x_msg_data => l_msg_data,

Line 1475: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1471: AHL_PRD_WORKORDER_PVT.Add_Inst_Rtng_Notes_To_WO(
1472: p_api_version => 1.0,
1473: p_init_msg_list => FND_API.G_FALSE,
1474: p_commit => FND_API.G_FALSE,
1475: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1476: x_return_status => l_return_status,
1477: x_msg_count => l_msg_count,
1478: x_msg_data => l_msg_data,
1479: p_workorder_id => i.workorder_id,

Line 1486: RAISE FND_API.G_EXC_ERROR;

1482: );
1483:
1484: l_msg_count := FND_MSG_PUB.count_msg;
1485: IF l_msg_count > 0 THEN
1486: RAISE FND_API.G_EXC_ERROR;
1487: END IF;
1488:
1489: END LOOP;
1490: END IF;

Line 1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1489: END LOOP;
1490: END IF;
1491:
1492: EXCEPTION
1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1494: ROLLBACK TO process_inst_rtng;
1495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1496: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1497: p_count => x_msg_count,

Line 1495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1491:
1492: EXCEPTION
1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1494: ROLLBACK TO process_inst_rtng;
1495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1496: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1497: p_count => x_msg_count,
1498: p_data => x_msg_data);
1499: WHEN FND_API.G_EXC_ERROR THEN

Line 1496: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1492: EXCEPTION
1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1494: ROLLBACK TO process_inst_rtng;
1495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1496: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1497: p_count => x_msg_count,
1498: p_data => x_msg_data);
1499: WHEN FND_API.G_EXC_ERROR THEN
1500: ROLLBACK TO process_inst_rtng;

Line 1499: WHEN FND_API.G_EXC_ERROR THEN

1495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1496: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1497: p_count => x_msg_count,
1498: p_data => x_msg_data);
1499: WHEN FND_API.G_EXC_ERROR THEN
1500: ROLLBACK TO process_inst_rtng;
1501: x_return_status := FND_API.G_RET_STS_ERROR;
1502: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,

Line 1501: x_return_status := FND_API.G_RET_STS_ERROR;

1497: p_count => x_msg_count,
1498: p_data => x_msg_data);
1499: WHEN FND_API.G_EXC_ERROR THEN
1500: ROLLBACK TO process_inst_rtng;
1501: x_return_status := FND_API.G_RET_STS_ERROR;
1502: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data);
1505: WHEN OTHERS THEN

Line 1502: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1498: p_data => x_msg_data);
1499: WHEN FND_API.G_EXC_ERROR THEN
1500: ROLLBACK TO process_inst_rtng;
1501: x_return_status := FND_API.G_RET_STS_ERROR;
1502: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data);
1505: WHEN OTHERS THEN
1506: ROLLBACK TO process_inst_rtng;

Line 1507: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1503: p_count => x_msg_count,
1504: p_data => x_msg_data);
1505: WHEN OTHERS THEN
1506: ROLLBACK TO process_inst_rtng;
1507: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1508: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1509: FND_MSG_PUB.add_exc_msg(p_pkg_name => g_pkg_name,
1510: p_procedure_name => l_api_name,
1511: p_error_text => SUBSTRB(SQLERRM,1,240));

Line 1514: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1510: p_procedure_name => l_api_name,
1511: p_error_text => SUBSTRB(SQLERRM,1,240));
1512:
1513: END IF;
1514: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1515: p_count => x_msg_count,
1516: p_data => x_msg_data);
1517: END Process_Inst_Rtng_Notes;
1518: