1775: l_Visit_tbl ahl_vwp_visits_pvt.Visit_Tbl_Type;
1776: i number := 0;
1777: BEGIN
1778:
1779: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1780: fnd_log.string
1781: (
1782: fnd_log.level_procedure,
1783: 'ahl.plsql.AHL_LTP_SPACE_ASSIGN_PVT.Schedule_Visit',
1776: i number := 0;
1777: BEGIN
1778:
1779: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1780: fnd_log.string
1781: (
1782: fnd_log.level_procedure,
1783: 'ahl.plsql.AHL_LTP_SPACE_ASSIGN_PVT.Schedule_Visit',
1784: 'At the start of PLSQL procedure'
1778:
1779: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1780: fnd_log.string
1781: (
1782: fnd_log.level_procedure,
1783: 'ahl.plsql.AHL_LTP_SPACE_ASSIGN_PVT.Schedule_Visit',
1784: 'At the start of PLSQL procedure'
1785: );
1786: END IF;
2131: l_Visit_tbl(i).VISIT_TYPE_NAME := p_x_schedule_visit_rec.visit_type_mean;
2132: l_Visit_tbl(i).OPERATION_FLAG := 'U';
2133:
2134: IF l_Visit_tbl.COUNT > 0 THEN
2135: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2136: fnd_log.string
2137: (
2138: fnd_log.level_statement,
2139: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2132: l_Visit_tbl(i).OPERATION_FLAG := 'U';
2133:
2134: IF l_Visit_tbl.COUNT > 0 THEN
2135: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2136: fnd_log.string
2137: (
2138: fnd_log.level_statement,
2139: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2140: 'Before Calling ahl Vwp Visits Pvt Process Visit Records : '|| l_visit_tbl.count
2134: IF l_Visit_tbl.COUNT > 0 THEN
2135: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2136: fnd_log.string
2137: (
2138: fnd_log.level_statement,
2139: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2140: 'Before Calling ahl Vwp Visits Pvt Process Visit Records : '|| l_visit_tbl.count
2141: );
2142: END IF;
2154: x_msg_data => l_msg_data
2155: );
2156: END IF;
2157:
2158: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2159: fnd_log.string
2160: (
2161: fnd_log.level_statement,
2162: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2155: );
2156: END IF;
2157:
2158: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2159: fnd_log.string
2160: (
2161: fnd_log.level_statement,
2162: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2163: 'Before Calling ahl Vwp Visits Pvt status : '|| l_return_status
2157:
2158: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2159: fnd_log.string
2160: (
2161: fnd_log.level_statement,
2162: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2163: 'Before Calling ahl Vwp Visits Pvt status : '|| l_return_status
2164: );
2165: END IF;
2186: AHL_DEBUG_PUB.debug( 'before calling Start Date:'||p_x_schedule_visit_rec.start_date);
2187: AHL_DEBUG_PUB.debug( 'before calling Org ID:'||p_x_schedule_visit_rec.org_id);
2188: END IF;
2189:
2190: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2191: fnd_log.string
2192: (
2193: fnd_log.level_statement,
2194: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2187: AHL_DEBUG_PUB.debug( 'before calling Org ID:'||p_x_schedule_visit_rec.org_id);
2188: END IF;
2189:
2190: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2191: fnd_log.string
2192: (
2193: fnd_log.level_statement,
2194: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2195: 'Before Calling ahl ltp reqst matrl pvt Modify Visit Task Material for Visit Id : '|| l_visit_id
2189:
2190: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2191: fnd_log.string
2192: (
2193: fnd_log.level_statement,
2194: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2195: 'Before Calling ahl ltp reqst matrl pvt Modify Visit Task Material for Visit Id : '|| l_visit_id
2196: );
2197: END IF;
2529: l_visit_tbl(i).object_version_number := p_x_schedule_visit_rec.object_version_number;
2530: l_visit_tbl(i).operation_flag := 'U';
2531:
2532: IF l_Visit_tbl.COUNT > 0 THEN
2533: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2534: fnd_log.string
2535: (
2536: fnd_log.level_statement,
2537: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2530: l_visit_tbl(i).operation_flag := 'U';
2531:
2532: IF l_Visit_tbl.COUNT > 0 THEN
2533: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2534: fnd_log.string
2535: (
2536: fnd_log.level_statement,
2537: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2538: 'Before Calling ahl Vwp Visits Pvt Process Visit Records : '|| l_visit_tbl.count
2532: IF l_Visit_tbl.COUNT > 0 THEN
2533: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2534: fnd_log.string
2535: (
2536: fnd_log.level_statement,
2537: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2538: 'Before Calling ahl Vwp Visits Pvt Process Visit Records : '|| l_visit_tbl.count
2539: );
2540:
2553: x_msg_data => l_msg_data
2554: );
2555: END IF;
2556:
2557: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2558: fnd_log.string
2559: (
2560: fnd_log.level_statement,
2561: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2554: );
2555: END IF;
2556:
2557: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2558: fnd_log.string
2559: (
2560: fnd_log.level_statement,
2561: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2562: 'After Calling ahl Vwp Visits Pvt status : '|| l_return_status
2556:
2557: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2558: fnd_log.string
2559: (
2560: fnd_log.level_statement,
2561: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
2562: 'After Calling ahl Vwp Visits Pvt status : '|| l_return_status
2563: );
2564: