[Home] [Help]
3977: -- Restricted to 14 days, 14 weeks , 14 months due to technical reasons.
3978: -- Pre-reqs :
3979: -- Parameters :
3980: --
3981: -- Standard IN Parameters :
3982: -- p_api_version IN NUMBER Required
3983: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
3984: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
3985: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
3985: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
3986: -- Based on this flag, the API will set the default attributes.
3987: -- p_module_type In VARCHAR2 Default NULL
3988: -- This will be null.
3989: -- Standard out Parameters :
3990: -- x_return_status OUT VARCHAR2 Required
3991: -- x_msg_count OUT NUMBER Required
3992: -- x_msg_data OUT VARCHAR2 Required
3993: --
4076: l_search_visits_Rec search_visits_rec_type := p_search_visits_rec;
4077:
4078: BEGIN
4079: --------------------Initialize ----------------------------------
4080: -- Standard Start of API savepoint
4081: SAVEPOINT Search_Scheduled_Visits;
4082: -- Check if API is called in debug mode. If yes, enable debug.
4083: IF G_DEBUG='Y' THEN
4084: AHL_DEBUG_PUB.enable_debug;
4086: -- Debug info.
4087: IF G_DEBUG='Y' THEN
4088: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_schedule_pvt. Search Scheduled Visits','+SPANT+');
4089: END IF;
4090: -- Standard call to check for call compatibility.
4091: IF FND_API.to_boolean(p_init_msg_list)
4092: THEN
4093: FND_MSG_PUB.initialize;
4094: END IF;
4507: --
4508: END IF;
4509:
4510: ---------------------------End of Body---------------------------------------
4511: --Standard check to count messages
4512: l_msg_count := Fnd_Msg_Pub.count_msg;
4513:
4514: IF l_msg_count > 0 THEN
4515: X_msg_count := l_msg_count;
4516: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4517: RAISE Fnd_Api.G_EXC_ERROR;
4518: END IF;
4519:
4520: --Standard check for commit
4521: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
4522: COMMIT;
4523: END IF;
4524: -- Debug info
4619: l_due_time NUMBER;
4620:
4621: BEGIN
4622: --
4623: -- Standard Start of API savepoint
4624: SAVEPOINT get_visit_duration;
4625: -- Check if API is called in debug mode. If yes, enable debug.
4626: IF G_DEBUG='Y' THEN
4627: AHL_DEBUG_PUB.enable_debug;
4629: -- Debug info.
4630: IF G_DEBUG='Y' THEN
4631: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_schedule_pvt.get_visit_duration','+SPSL+');
4632: END IF;
4633: -- Standard call to check for call compatibility.
4634: IF FND_API.to_boolean(l_init_msg_list)
4635: THEN
4636: FND_MSG_PUB.initialize;
4637: END IF;
4794: l_visit_start_time DATE;
4795: l_visit_end_time DATE;
4796:
4797: BEGIN
4798: -- Standard Start of API savepoint
4799: SAVEPOINT get_visit_end_date;
4800: -- Check if API is called in debug mode. If yes, enable debug.
4801: IF G_DEBUG='Y' THEN
4802: AHL_DEBUG_PUB.enable_debug;
4804: -- Debug info.
4805: IF G_DEBUG='Y' THEN
4806: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_schedule_pvt.get_visit_end_date','+SUAVL+');
4807: END IF;
4808: -- Standard call to check for call compatibility.
4809: IF FND_API.to_boolean(l_init_msg_list)
4810: THEN
4811: FND_MSG_PUB.initialize;
4812: END IF;
4849: IF G_DEBUG='Y' THEN
4850: AHL_DEBUG_PUB.debug( 'x_visit_end_date:'||x_visit_end_date);
4851: END IF;
4852:
4853: --Standard check to count messages
4854: IF G_DEBUG='Y' THEN
4855: -- Debug info
4856: Ahl_Debug_Pub.debug( 'End of private api Get visit end date','+SPSL+');
4857: -- Check if API is called in debug mode. If yes, disable debug.
4952: FROM ahl_unit_effectivities_app_v T1, ahl_visit_tasks_b T2
4953: WHERE T1.unit_effectivity_id = T2.unit_effectivity_id AND T2.visit_id = x_id;
4954:
4955: BEGIN
4956: -- Standard Start of API savepoint
4957: SAVEPOINT get_visit_due_by_date;
4958: -- Check if API is called in debug mode. If yes, enable debug.
4959: IF G_DEBUG='Y' THEN
4960: AHL_DEBUG_PUB.enable_debug;
4961: -- Debug info.
4962: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_schedule_pvt.get_visit_due_by_date','+SPSL+');
4963: --
4964: END IF;
4965: -- Standard call to check for call compatibility.
4966: IF FND_API.to_boolean(l_init_msg_list)
4967: THEN
4968: FND_MSG_PUB.initialize;
4969: END IF;
5003: IF G_DEBUG='Y' THEN
5004: AHL_DEBUG_PUB.debug( 'inside visit due by date :'||x_due_by_date);
5005: END IF;
5006:
5007: --Standard check to count messages
5008: l_msg_count := Fnd_Msg_Pub.count_msg;
5009:
5010: IF l_msg_count > 0 THEN
5011: X_msg_count := l_msg_count;
5087: l_commit VARCHAR2(10);
5088: l_validation_level NUMBER := FND_API.g_valid_level_full;
5089: l_visit_end_date DATE;
5090: BEGIN
5091: -- Standard Start of API savepoint
5092: SAVEPOINT Derive_visit_end_date;
5093: -- Check if API is called in debug mode. If yes, enable debug.
5094: IF G_DEBUG='Y' THEN
5095: AHL_DEBUG_PUB.enable_debug;
5100: --
5101: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_schedule_pvt Derive visit end date','+SPSL+');
5102: --
5103: END IF;
5104: -- Standard call to check for call compatibility.
5105: IF FND_API.to_boolean(l_init_msg_list)
5106: THEN
5107: FND_MSG_PUB.initialize;
5108: END IF;
5213: -- based on start date, and various combinations of search criteria UOM (Days,Weeks, Months).
5214: -- Pre-reqs :
5215: -- Parameters :
5216: --
5217: -- Standard IN Parameters :
5218: -- p_api_version IN NUMBER Required
5219: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
5220: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
5221: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
5221: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
5222: -- Based on this flag, the API will set the default attributes.
5223: -- p_module_type In VARCHAR2 Default NULL
5224: -- This will be null.
5225: -- Standard out Parameters :
5226: -- x_return_status OUT VARCHAR2 Required
5227: -- x_msg_count OUT NUMBER Required
5228: -- x_msg_data OUT VARCHAR2 Required
5229: --
5481: l_count NUMBER := 0;
5482: --
5483: BEGIN
5484: --
5485: -- Standard Start of API savepoint
5486: SAVEPOINT Get_visit_details;
5487: -- Check if API is called in debug mode. If yes, enable debug.
5488: IF G_DEBUG='Y' THEN
5489: AHL_DEBUG_PUB.enable_debug;
5491: -- Debug info.
5492: IF G_DEBUG='Y' THEN
5493: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_schedule_pvt Get visit details','+SPSL+');
5494: END IF;
5495: -- Standard call to check for call compatibility.
5496: IF FND_API.to_boolean(p_init_msg_list)
5497: THEN
5498: FND_MSG_PUB.initialize;
5499: END IF;
6055: IF G_DEBUG='Y' THEN
6056: AHL_DEBUG_PUB.debug( 'total records:'||x_visit_details_tbl.count);
6057: END IF;
6058:
6059: --Standard check to count messages
6060: l_msg_count := Fnd_Msg_Pub.count_msg;
6061:
6062: IF l_msg_count > 0 THEN
6063: X_msg_count := l_msg_count;