DBA Data[Home] [Help]

APPS.AHL_LTP_REQST_MATRL_PVT dependencies on FND_LOG

Line 10: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;

6:
7: ------------------------------------
8: -- Common constants and variables --
9: ------------------------------------
10: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
11: l_log_statement NUMBER := fnd_log.level_statement;
12: l_log_procedure NUMBER := fnd_log.level_procedure;
13: l_log_error NUMBER := fnd_log.level_error;
14: l_log_unexpected NUMBER := fnd_log.level_unexpected;

Line 11: l_log_statement NUMBER := fnd_log.level_statement;

7: ------------------------------------
8: -- Common constants and variables --
9: ------------------------------------
10: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
11: l_log_statement NUMBER := fnd_log.level_statement;
12: l_log_procedure NUMBER := fnd_log.level_procedure;
13: l_log_error NUMBER := fnd_log.level_error;
14: l_log_unexpected NUMBER := fnd_log.level_unexpected;
15: -----------------------------------------------------------------

Line 12: l_log_procedure NUMBER := fnd_log.level_procedure;

8: -- Common constants and variables --
9: ------------------------------------
10: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
11: l_log_statement NUMBER := fnd_log.level_statement;
12: l_log_procedure NUMBER := fnd_log.level_procedure;
13: l_log_error NUMBER := fnd_log.level_error;
14: l_log_unexpected NUMBER := fnd_log.level_unexpected;
15: -----------------------------------------------------------------
16:

Line 13: l_log_error NUMBER := fnd_log.level_error;

9: ------------------------------------
10: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
11: l_log_statement NUMBER := fnd_log.level_statement;
12: l_log_procedure NUMBER := fnd_log.level_procedure;
13: l_log_error NUMBER := fnd_log.level_error;
14: l_log_unexpected NUMBER := fnd_log.level_unexpected;
15: -----------------------------------------------------------------
16:
17: -- Definition of private procedure.

Line 14: l_log_unexpected NUMBER := fnd_log.level_unexpected;

10: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
11: l_log_statement NUMBER := fnd_log.level_statement;
12: l_log_procedure NUMBER := fnd_log.level_procedure;
13: l_log_error NUMBER := fnd_log.level_error;
14: l_log_unexpected NUMBER := fnd_log.level_unexpected;
15: -----------------------------------------------------------------
16:
17: -- Definition of private procedure.
18: --

Line 115: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN

111: BEGIN
112: --------------------Initialize ----------------------------------
113: -- Standard Start of API savepoint
114: SAVEPOINT unschedule_visit;
115: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
116: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',
117: 'At the start of PLSQL procedure');
118: END IF;
119: -- Standard call to check for call compatibility.

Line 116: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',

112: --------------------Initialize ----------------------------------
113: -- Standard Start of API savepoint
114: SAVEPOINT unschedule_visit;
115: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
116: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',
117: 'At the start of PLSQL procedure');
118: END IF;
119: -- Standard call to check for call compatibility.
120: IF FND_API.to_boolean(p_init_msg_list)THEN

Line 151: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

147: ELSE
148: -- Added by surrkuma on 14-JUL-2010 for bug 9901811
149: IF (NVL(l_sch_mtls_Rec.status, 'X') = 'ACTIVE') THEN
150: -- Add this requirement to l_unsched_mtl_tbl for ATP unscheduling
151: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
152: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
153: 'l_unsched_mtl_index = ' || l_unsched_mtl_index ||
154: ', Adding Requirement with id ' || l_sch_mtls_Rec.scheduled_material_id || ' to l_unsched_mtl_tbl for Unscheduling.');
155: END IF;

Line 152: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

148: -- Added by surrkuma on 14-JUL-2010 for bug 9901811
149: IF (NVL(l_sch_mtls_Rec.status, 'X') = 'ACTIVE') THEN
150: -- Add this requirement to l_unsched_mtl_tbl for ATP unscheduling
151: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
152: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
153: 'l_unsched_mtl_index = ' || l_unsched_mtl_index ||
154: ', Adding Requirement with id ' || l_sch_mtls_Rec.scheduled_material_id || ' to l_unsched_mtl_tbl for Unscheduling.');
155: END IF;
156: l_unsched_mtl_tbl(l_unsched_mtl_index).visit_id := l_sch_mtls_Rec.visit_id;

Line 186: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

182:
183: -- Added by surrkuma on 14-JUL-2010 for bug 9901811
184: IF (l_unsched_mtl_tbl.COUNT > 0) THEN
185: -- Call ATP to unschedule the soft Deleted requirements
186: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
187: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
188: 'Before calling AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials. l_unsched_mtl_tbl.COUNT = ' || l_unsched_mtl_tbl.COUNT);
189: END IF;
190: AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials(p_api_version => 1.0,

Line 187: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

183: -- Added by surrkuma on 14-JUL-2010 for bug 9901811
184: IF (l_unsched_mtl_tbl.COUNT > 0) THEN
185: -- Call ATP to unschedule the soft Deleted requirements
186: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
187: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
188: 'Before calling AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials. l_unsched_mtl_tbl.COUNT = ' || l_unsched_mtl_tbl.COUNT);
189: END IF;
190: AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials(p_api_version => 1.0,
191: p_deleted_matrl_tbl => l_unsched_mtl_tbl,

Line 195: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

191: p_deleted_matrl_tbl => l_unsched_mtl_tbl,
192: x_return_status => l_return_status,
193: x_msg_count => l_msg_count,
194: x_msg_data => l_msg_data);
195: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
196: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
197: 'After returning from AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials, l_return_status = ' || l_return_status);
198: END IF;
199: END IF;

Line 196: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

192: x_return_status => l_return_status,
193: x_msg_count => l_msg_count,
194: x_msg_data => l_msg_data);
195: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
196: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
197: 'After returning from AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials, l_return_status = ' || l_return_status);
198: END IF;
199: END IF;
200: -- End addition by surrkuma on 14-JUL-2010 for bug 9901811

Line 208: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

204: AHL_RSV_RESERVATIONS_PVT.DELETE_VISIT_RESERVATIONS(
205: X_RETURN_STATUS => X_RETURN_STATUS,
206: P_VISIT_ID => p_visit_id);
207: IF (l_log_statement >= l_log_current_level)THEN
208: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
209: ' After calling AHL_RSV_RESERVATIONS_PVT.DELETE_VISIT_RESERVATIONS. Error Message Status: ' || X_RETURN_STATUS);
210: END IF;
211:
212: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN

Line 220: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN

216: IF FND_API.TO_BOOLEAN(p_commit) THEN
217: COMMIT WORK;
218: END IF;
219:
220: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
221: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
222: 'At the end of normal execution of the PLSQL procedure.');
223: END IF;
224:

Line 221: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',

217: COMMIT WORK;
218: END IF;
219:
220: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
221: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
222: 'At the end of normal execution of the PLSQL procedure.');
223: END IF;
224:
225: EXCEPTION

Line 416: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',

412:
413: BEGIN
414:
415: IF (l_log_procedure >= l_log_current_level)THEN
416: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',
417: 'At the start of PLSQL procedure');
418: END IF;
419: -- Standard start of API savepoint
420: SAVEPOINT Insert_Planned_Matrls;

Line 429: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

425: -- Initialize API return status to success
426: x_return_status := FND_API.G_RET_STS_SUCCESS;
427: --
428: IF (l_log_statement >= l_log_current_level)THEN
429: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
430: 'Request for Create Planned Material for Visit Id: ' || p_visit_id);
431: END IF;
432:
433: --Get the sequence number

Line 475: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

471: CLOSE Check_item_org;
472:
473: --Check for primary UOM Code
474: IF l_uom_code <> l_prim_uom_code THEN
475: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
476: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
477: 'Primary Uom Code : '|| l_prim_uom_code || ', Source Uom Code : '|| l_uom_code);
478: END IF;
479:

Line 476: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

472:
473: --Check for primary UOM Code
474: IF l_uom_code <> l_prim_uom_code THEN
475: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
476: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
477: 'Primary Uom Code : '|| l_prim_uom_code || ', Source Uom Code : '|| l_uom_code);
478: END IF;
479:
480: -- yazhou 04Aug2005 Starts

Line 517: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

513: END IF;
514:
515: ELSE
516:
517: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
518: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
519: 'ELSE Primary Uom Code: ' || l_prim_uom_code ||
520: ', Source Uom Code: ' || l_uom_code ||
521: ', Requested quantity: ' || l_requested_quantity);

Line 518: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

514:
515: ELSE
516:
517: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
518: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
519: 'ELSE Primary Uom Code: ' || l_prim_uom_code ||
520: ', Source Uom Code: ' || l_uom_code ||
521: ', Requested quantity: ' || l_requested_quantity);
522: END IF;

Line 564: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

560: ELSE
561: l_material_request_type := 'PLANNED';
562: END IF;
563:
564: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
565: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
566: 'Before Insert Schedule Materials for Visit Id: '|| p_visit_id ||
567: ', Visit Task Id: ' || p_visit_task_id ||
568: ', Schedule Material Id: ' || l_schedule_material_id);

Line 565: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

561: l_material_request_type := 'PLANNED';
562: END IF;
563:
564: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
565: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
566: 'Before Insert Schedule Materials for Visit Id: '|| p_visit_id ||
567: ', Visit Task Id: ' || p_visit_task_id ||
568: ', Schedule Material Id: ' || l_schedule_material_id);
569: END IF;

Line 693: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

689: IF l_msg_count > 0 THEN
690: RAISE FND_API.G_EXC_ERROR;
691: END IF;
692:
693: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
694: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
695: 'At the end of PLSQL procedure.');
696: END IF;
697: EXCEPTION

Line 694: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',

690: RAISE FND_API.G_EXC_ERROR;
691: END IF;
692:
693: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
694: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
695: 'At the end of PLSQL procedure.');
696: END IF;
697: EXCEPTION
698: WHEN FND_API.G_EXC_ERROR THEN

Line 817: fnd_log.string

813:
814: BEGIN
815:
816: IF (l_log_procedure >= l_log_current_level)THEN
817: fnd_log.string
818: (
819: l_log_procedure,
820: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name || '.begin',
821: 'At the start of PLSQL procedure'

Line 834: fnd_log.string

830: -- Initialize API return status to success
831: x_return_status := FND_API.G_RET_STS_SUCCESS;
832: --
833: IF (l_log_statement >= l_log_current_level)THEN
834: fnd_log.string
835: (
836: l_log_statement,
837: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
838: 'Request for Update Material Number of Records : '|| l_planned_materials_tbl.COUNT

Line 856: fnd_log.string

852: IF Get_Planned_Items_cur%NOTFOUND THEN
853: FND_MESSAGE.set_name( 'AHL','AHL_LTP_SCHE_ID_INVALID' );
854: FND_MSG_PUB.add;
855: IF (l_log_error >= l_log_current_level)THEN
856: fnd_log.string
857: (
858: l_log_error,
859: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
860: 'Schedule Material id not found in ahl_schedule_materials table'

Line 878: fnd_log.string

874: THEN
875: FND_MESSAGE.set_name( 'AHL','AHL_LTP_RECORD_INVALID' );
876: FND_MSG_PUB.add;
877: IF (l_log_error >= l_log_current_level)THEN
878: fnd_log.string
879: (
880: l_log_error,
881: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
882: 'Schedule Material Record has been modified by someother user'

Line 899: fnd_log.string

895: IF Get_Inv_Item_cur%NOTFOUND THEN
896: FND_MESSAGE.set_name( 'AHL','AHL_LTP_ITEM_INVALID' );
897: FND_MSG_PUB.add;
898: IF (l_log_error >= l_log_current_level)THEN
899: fnd_log.string
900: (
901: l_log_error,
902: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
903: 'Inventory Item doesnt exist in Mtl System Items Vl'

Line 1072: fnd_log.string

1068: COMMIT WORK;
1069: END IF;
1070:
1071: IF (l_log_procedure >= l_log_current_level)THEN
1072: fnd_log.string
1073: (
1074: l_log_procedure,
1075: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name || '.end',
1076: 'At the end of PLSQL procedure'

Line 1199: fnd_log.string

1195:
1196: BEGIN
1197:
1198: IF (l_log_procedure >= l_log_current_level)THEN
1199: fnd_log.string
1200: (
1201: l_log_procedure,
1202: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1203: 'At the start of PLSQL procedure'

Line 1216: fnd_log.string

1212: -- Initialize API return status to success
1213: x_return_status := FND_API.G_RET_STS_SUCCESS;
1214: --
1215: IF (l_log_statement >= l_log_current_level)THEN
1216: fnd_log.string
1217: (
1218: l_log_statement,
1219: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1220: 'Request for Create Task Materials for Visit Id : '|| p_visit_id

Line 1232: fnd_log.string

1228: FETCH Get_visit_tasks_cur INTO l_visit_tasks_rec;
1229: CLOSE Get_visit_tasks_cur;
1230:
1231: IF (l_log_statement >= l_log_current_level)THEN
1232: fnd_log.string
1233: (
1234: l_log_statement,
1235: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1236: ' Visit Id: ' || p_visit_id

Line 1238: fnd_log.string

1234: l_log_statement,
1235: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1236: ' Visit Id: ' || p_visit_id
1237: );
1238: fnd_log.string
1239: (
1240: l_log_statement,
1241: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1242: ' Organization Id: ' || l_visit_tasks_rec.organization_id

Line 1258: fnd_log.string

1254: AND l_dummy IS NULL) THEN
1255: -- Derive task start time
1256:
1257: IF (l_log_statement >= l_log_current_level)THEN
1258: fnd_log.string
1259: (
1260: l_log_statement,
1261: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1262: ' Visit Task Id: ' || l_visit_tasks_rec.visit_task_id

Line 1264: fnd_log.string

1260: l_log_statement,
1261: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1262: ' Visit Task Id: ' || l_visit_tasks_rec.visit_task_id
1263: );
1264: fnd_log.string
1265: (
1266: l_log_statement,
1267: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1268: ' Task Start Time: ' || l_visit_tasks_rec.start_date_time

Line 1270: fnd_log.string

1266: l_log_statement,
1267: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1268: ' Task Start Time: ' || l_visit_tasks_rec.start_date_time
1269: );
1270: fnd_log.string
1271: (
1272: l_log_statement,
1273: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1274: ' Mr Route Id: ' || l_visit_tasks_rec.mr_route_id

Line 1296: fnd_log.string

1292: l_requirement_date := l_visit_tasks_rec.start_date_time;
1293: END IF;
1294:
1295: IF (l_log_statement >= l_log_current_level)THEN
1296: fnd_log.string
1297: (
1298: l_log_statement,
1299: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1300: ' Before Calling Get Route Mtl Req, Route Id: ' || l_route_id

Line 1302: fnd_log.string

1298: l_log_statement,
1299: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1300: ' Before Calling Get Route Mtl Req, Route Id: ' || l_route_id
1301: );
1302: fnd_log.string
1303: (
1304: l_log_statement,
1305: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1306: ' Before Calling Get Route Mtl Req, Instance Id: ' || l_instance_id

Line 1312: fnd_log.string

1308:
1309: END IF;
1310:
1311: IF (l_log_procedure >= l_log_current_level) THEN
1312: fnd_log.string
1313: (
1314: l_log_procedure,
1315: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1316: 'Before calling ahl ltp mtl req pvt.Get Route Mtl Req'

Line 1338: fnd_log.string

1334: x_route_mtl_req_tbl => l_route_mtl_req_tbl);
1335: END IF; --MR Route not null
1336:
1337: IF (l_log_procedure >= l_log_current_level) THEN
1338: fnd_log.string
1339: (
1340: l_log_procedure,
1341: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
1342: 'After calling ahl ltp mtl req pvt.Get Route Mtl Req, Return Status : '|| l_return_status

Line 1354: fnd_log.string

1350: END IF;
1351: END IF;
1352:
1353: IF (l_log_statement >= l_log_current_level)THEN
1354: fnd_log.string
1355: (
1356: l_log_statement,
1357: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create_Task_Materials',
1358: ' After Calling Get Route Mtl Req, l_route_mtl_req_tbl COUNT: ' || l_route_mtl_req_tbl.COUNT

Line 1395: fnd_log.string

1391: END IF; --l_route_mtl_req_tbl
1392: END IF;
1393:
1394: IF (l_log_procedure >= l_log_current_level) THEN
1395: fnd_log.string
1396: (
1397: l_log_procedure,
1398: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
1399: 'After calling Insert Planned Materials, Return Status : '|| l_return_status

Line 1418: fnd_log.string

1414: COMMIT WORK;
1415: END IF;
1416:
1417: IF (l_log_procedure >= l_log_current_level)THEN
1418: fnd_log.string
1419: (
1420: l_log_procedure,
1421: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Create Task Materials.end',
1422: 'At the end of PLSQL procedure'

Line 1670: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN

1666: l_instance_id NUMBER; -- Added by tchimira for VWPE 12673125
1667:
1668: BEGIN
1669:
1670: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1671: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',
1672: 'At the start of PLSQL procedure. p_visit_id = ' || p_visit_id ||
1673: ', p_visit_task_id = ' || p_visit_task_id ||
1674: ', p_start_time = ' || p_start_time ||

Line 1671: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',

1667:
1668: BEGIN
1669:
1670: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1671: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',
1672: 'At the start of PLSQL procedure. p_visit_id = ' || p_visit_id ||
1673: ', p_visit_task_id = ' || p_visit_task_id ||
1674: ', p_start_time = ' || p_start_time ||
1675: ', p_org_id = ' || p_org_id);

Line 1696: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1692: --
1693: IF l_Deleted_Items_Rec.scheduled_material_id IS NOT NULL THEN
1694: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
1695: -- Add this requirement to l_unsched_mtl_tbl for ATP unscheduling
1696: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1697: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1698: 'l_unsched_mtl_index = ' || l_unsched_mtl_index ||
1699: ', Adding Requirement with id ' || l_Deleted_Items_Rec.scheduled_material_id || ' to l_unsched_mtl_tbl for Unscheduling.');
1700: END IF;

Line 1697: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1693: IF l_Deleted_Items_Rec.scheduled_material_id IS NOT NULL THEN
1694: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
1695: -- Add this requirement to l_unsched_mtl_tbl for ATP unscheduling
1696: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1697: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1698: 'l_unsched_mtl_index = ' || l_unsched_mtl_index ||
1699: ', Adding Requirement with id ' || l_Deleted_Items_Rec.scheduled_material_id || ' to l_unsched_mtl_tbl for Unscheduling.');
1700: END IF;
1701: l_unsched_mtl_tbl(l_unsched_mtl_index).visit_id := l_Deleted_Items_Rec.visit_id;

Line 1712: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1708: l_unsched_mtl_tbl(l_unsched_mtl_index).primary_uom_code := l_Deleted_Items_Rec.uom;
1709: l_unsched_mtl_tbl(l_unsched_mtl_index).requested_date := l_Deleted_Items_Rec.requested_date;
1710: l_unsched_mtl_index := l_unsched_mtl_index + 1;
1711: -- End addition by surrkuma on 15-JUL-2010 for bug 9901811
1712: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1713: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1714: 'Updating the status to DELETED for Material Requirement Id ' || l_Deleted_Items_Rec.scheduled_material_id);
1715: END IF;
1716:

Line 1713: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1709: l_unsched_mtl_tbl(l_unsched_mtl_index).requested_date := l_Deleted_Items_Rec.requested_date;
1710: l_unsched_mtl_index := l_unsched_mtl_index + 1;
1711: -- End addition by surrkuma on 15-JUL-2010 for bug 9901811
1712: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1713: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1714: 'Updating the status to DELETED for Material Requirement Id ' || l_Deleted_Items_Rec.scheduled_material_id);
1715: END IF;
1716:
1717: UPDATE ahl_schedule_materials

Line 1763: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1759: CLOSE Get_Visit_Tasks_Cur;
1760: END IF;
1761:
1762: IF (l_log_statement >= l_log_current_level)THEN
1763: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1764: 'l_Visit_Task_Route_Tbl.COUNT: ' || l_Visit_Task_Route_Tbl.COUNT);
1765: END IF;
1766:
1767: IF l_Visit_Task_Route_Tbl.COUNT > 0 THEN

Line 1770: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN

1766:
1767: IF l_Visit_Task_Route_Tbl.COUNT > 0 THEN
1768: FOR i IN l_Visit_Task_Route_Tbl.FIRST..l_Visit_Task_Route_Tbl.LAST
1769: LOOP
1770: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1771: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Inside the loop of tasks, i = ' || i ||
1772: ', Route Id: ' || l_Visit_Task_Route_Tbl(i).route_id ||
1773: ', Instance Id: ' || l_Visit_Task_Route_Tbl(i).instance_id ||
1774: ', Task Start Time: ' || l_Visit_Task_Route_Tbl(i).task_start_date);

Line 1771: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Inside the loop of tasks, i = ' || i ||

1767: IF l_Visit_Task_Route_Tbl.COUNT > 0 THEN
1768: FOR i IN l_Visit_Task_Route_Tbl.FIRST..l_Visit_Task_Route_Tbl.LAST
1769: LOOP
1770: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1771: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Inside the loop of tasks, i = ' || i ||
1772: ', Route Id: ' || l_Visit_Task_Route_Tbl(i).route_id ||
1773: ', Instance Id: ' || l_Visit_Task_Route_Tbl(i).instance_id ||
1774: ', Task Start Time: ' || l_Visit_Task_Route_Tbl(i).task_start_date);
1775: END IF;

Line 1784: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1780: ELSE
1781: l_requirement_date := l_Visit_Task_Route_Tbl(i).task_start_date;
1782: END IF;
1783:
1784: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1785: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1786: 'Before calling AHL_LTP_MTL_REQ_PVT.Get_Route_Mtl_Req');
1787: END IF;
1788:

Line 1785: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1781: l_requirement_date := l_Visit_Task_Route_Tbl(i).task_start_date;
1782: END IF;
1783:
1784: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1785: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1786: 'Before calling AHL_LTP_MTL_REQ_PVT.Get_Route_Mtl_Req');
1787: END IF;
1788:
1789: --Call to get items

Line 1805: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1801: p_visit_id => p_visit_id,
1802: p_requirement_date => l_requirement_date,
1803: p_request_type => 'PLANNED',
1804: x_route_mtl_req_tbl => l_route_mtl_req_tbl);
1805: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1806: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1807: 'After calling AHL_LTP_MTL_REQ_PVT.Get_Route_Mtl_Req, Return Status: ' || l_return_status);
1808: END IF;
1809: -- Check Error Message stack.

Line 1806: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1802: p_requirement_date => l_requirement_date,
1803: p_request_type => 'PLANNED',
1804: x_route_mtl_req_tbl => l_route_mtl_req_tbl);
1805: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1806: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1807: 'After calling AHL_LTP_MTL_REQ_PVT.Get_Route_Mtl_Req, Return Status: ' || l_return_status);
1808: END IF;
1809: -- Check Error Message stack.
1810: IF (l_return_Status <> FND_API.G_RET_STS_SUCCESS) THEN

Line 1817: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN

1813: RAISE FND_API.G_EXC_ERROR;
1814: END IF;
1815: END IF;
1816:
1817: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1818: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1819: 'After Calling AHL_LTP_MTL_REQ_PVT.Get_Route_Mtl_Req, l_route_mtl_req_tbl.COUNT = ' || l_route_mtl_req_tbl.COUNT);
1820: END IF;
1821:

Line 1818: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1814: END IF;
1815: END IF;
1816:
1817: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1818: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1819: 'After Calling AHL_LTP_MTL_REQ_PVT.Get_Route_Mtl_Req, l_route_mtl_req_tbl.COUNT = ' || l_route_mtl_req_tbl.COUNT);
1820: END IF;
1821:
1822: IF l_route_mtl_req_tbl.COUNT > 0 THEN

Line 1842: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN

1838: -- Begin Changes by surrkuma on 15-JUL-2010 for Bug 9901811
1839: -- When Visit or Task is rescheduled, retain the ASM record, updating its Date or Org.
1840: -- Avoid soft deleting and creating new records.
1841: -- No need to automatically Reschedule or Unschedule for ATP
1842: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1843: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1844: 'l_Planned_Items_Rec.inventory_item_id = ' || l_Planned_Items_Rec.inventory_item_id ||
1845: ', l_route_mtl_req_tbl(j).inventory_item_id = ' || l_route_mtl_req_tbl(j).inventory_item_id ||
1846: ', l_Planned_Items_Rec.organization_id = ' || l_Planned_Items_Rec.organization_id ||

Line 1843: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1839: -- When Visit or Task is rescheduled, retain the ASM record, updating its Date or Org.
1840: -- Avoid soft deleting and creating new records.
1841: -- No need to automatically Reschedule or Unschedule for ATP
1842: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1843: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1844: 'l_Planned_Items_Rec.inventory_item_id = ' || l_Planned_Items_Rec.inventory_item_id ||
1845: ', l_route_mtl_req_tbl(j).inventory_item_id = ' || l_route_mtl_req_tbl(j).inventory_item_id ||
1846: ', l_Planned_Items_Rec.organization_id = ' || l_Planned_Items_Rec.organization_id ||
1847: ', l_visit_org_id = ' || l_visit_org_id ||

Line 1899: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1895: -- End of changes by surrkuma for SB
1896: END IF;
1897: CLOSE Item_exists_in_org_Cur;
1898: -- End changes by surrkuma on 15-JUL-2010 for Bug 9901811
1899: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1900: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1901: 'Updated ahl_schedule_materials for scheduled_material_id = ' || l_Planned_Items_Rec.scheduled_material_id);
1902: END IF;
1903: -- No need to automatically Reschedule or Unschedule for ATP

Line 1900: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1896: END IF;
1897: CLOSE Item_exists_in_org_Cur;
1898: -- End changes by surrkuma on 15-JUL-2010 for Bug 9901811
1899: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1900: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1901: 'Updated ahl_schedule_materials for scheduled_material_id = ' || l_Planned_Items_Rec.scheduled_material_id);
1902: END IF;
1903: -- No need to automatically Reschedule or Unschedule for ATP
1904: ELSE

Line 1913: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1909: ELSE
1910: -- The requirement does not already exist: Create a new one
1911: l_requested_qty := l_route_mtl_req_tbl(j).quantity;
1912: -- End Changes by surrkuma on 15-JUL-2010 for Bug 9901811
1913: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1914: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1915: 'About to call Insert_Planned_Matrls with p_visit_id = ' || p_visit_id ||
1916: ', p_visit_task_id = ' || l_Visit_Task_Route_Tbl(i).visit_task_id ||
1917: ', p_task_start_date = ' || l_Visit_Task_Route_Tbl(i).task_start_date ||

Line 1914: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1910: -- The requirement does not already exist: Create a new one
1911: l_requested_qty := l_route_mtl_req_tbl(j).quantity;
1912: -- End Changes by surrkuma on 15-JUL-2010 for Bug 9901811
1913: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1914: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1915: 'About to call Insert_Planned_Matrls with p_visit_id = ' || p_visit_id ||
1916: ', p_visit_task_id = ' || l_Visit_Task_Route_Tbl(i).visit_task_id ||
1917: ', p_task_start_date = ' || l_Visit_Task_Route_Tbl(i).task_start_date ||
1918: ', p_inventory_item_id = ' || l_route_mtl_req_tbl(j).inventory_item_id ||

Line 1947: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1943: x_return_status => l_return_status,
1944: x_msg_count => l_msg_count,
1945: x_msg_data => l_msg_data );
1946:
1947: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1948: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1949: 'Returned from call to Insert_Planned_Matrls. x_return_status = ' || l_return_status);
1950: END IF;
1951:

Line 1948: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1944: x_msg_count => l_msg_count,
1945: x_msg_data => l_msg_data );
1946:
1947: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1948: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1949: 'Returned from call to Insert_Planned_Matrls. x_return_status = ' || l_return_status);
1950: END IF;
1951:
1952: -- Changed by surrkuma: Moved the following lines to within the loop

Line 1966: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1962: END LOOP; -- Loop j on l_route_mtl_req_tbl (All materials for the given Route)
1963: -- Begin changes by surrkuma for SB on 28-Jun-2011
1964: -- Calling production API to change the item in ASM and WIP requirement
1965: IF l_req_material_tbl.COUNT > 0 THEN
1966: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1967: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1968: 'Before Calling AHL_PP_MATERIALS_PVT.Process_Material_Request');
1969: END IF;
1970: AHL_PP_MATERIALS_PVT.Process_Material_Request(

Line 1967: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1963: -- Begin changes by surrkuma for SB on 28-Jun-2011
1964: -- Calling production API to change the item in ASM and WIP requirement
1965: IF l_req_material_tbl.COUNT > 0 THEN
1966: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1967: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1968: 'Before Calling AHL_PP_MATERIALS_PVT.Process_Material_Request');
1969: END IF;
1970: AHL_PP_MATERIALS_PVT.Process_Material_Request(
1971: p_api_version => l_api_version,

Line 1977: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1973: x_return_status => l_return_status,
1974: x_msg_count => l_msg_count,
1975: x_msg_data => l_msg_data
1976: );
1977: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1978: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1979: 'Returned from call to AHL_PP_MATERIALS_PVT.Process_Material_Request. x_return_status = ' || l_return_status);
1980: END IF;
1981: IF (l_return_Status <> FND_API.G_RET_STS_SUCCESS) THEN

Line 1978: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1974: x_msg_count => l_msg_count,
1975: x_msg_data => l_msg_data
1976: );
1977: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1978: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1979: 'Returned from call to AHL_PP_MATERIALS_PVT.Process_Material_Request. x_return_status = ' || l_return_status);
1980: END IF;
1981: IF (l_return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
1982: l_msg_count := FND_MSG_PUB.count_msg;

Line 1990: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1986: END IF;
1987: END IF; -- l_req_material_tbl.COUNT > 0
1988: -- End of changes by surrkuma for SB
1989: END IF; -- l_route_mtl_req_tbl.COUNT > 0
1990: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1991: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1992: 'Outside the Route Materials loop, Return Status: ' || l_return_status);
1993: END IF;
1994:

Line 1991: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1987: END IF; -- l_req_material_tbl.COUNT > 0
1988: -- End of changes by surrkuma for SB
1989: END IF; -- l_route_mtl_req_tbl.COUNT > 0
1990: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1991: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1992: 'Outside the Route Materials loop, Return Status: ' || l_return_status);
1993: END IF;
1994:
1995: END LOOP; -- Loop i on l_Visit_Task_Route_Tbl (All routes/tasks for the Visit)

Line 1996: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1992: 'Outside the Route Materials loop, Return Status: ' || l_return_status);
1993: END IF;
1994:
1995: END LOOP; -- Loop i on l_Visit_Task_Route_Tbl (All routes/tasks for the Visit)
1996: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1997: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1998: 'Completed all tasks - Outside the Tasks loop.');
1999: END IF;
2000: END IF; -- l_Visit_Task_Route_Tbl.COUNT > 0

Line 1997: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

1993: END IF;
1994:
1995: END LOOP; -- Loop i on l_Visit_Task_Route_Tbl (All routes/tasks for the Visit)
1996: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1997: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
1998: 'Completed all tasks - Outside the Tasks loop.');
1999: END IF;
2000: END IF; -- l_Visit_Task_Route_Tbl.COUNT > 0
2001:

Line 2005: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2001:
2002: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
2003: IF (l_unsched_mtl_tbl.COUNT > 0) THEN
2004: -- Call ATP to unschedule the soft Deleted requirements
2005: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2006: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2007: 'Before calling AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials. l_unsched_mtl_tbl.COUNT = ' || l_unsched_mtl_tbl.COUNT);
2008: END IF;
2009: AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials(p_api_version => 1.0,

Line 2006: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2002: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
2003: IF (l_unsched_mtl_tbl.COUNT > 0) THEN
2004: -- Call ATP to unschedule the soft Deleted requirements
2005: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2006: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2007: 'Before calling AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials. l_unsched_mtl_tbl.COUNT = ' || l_unsched_mtl_tbl.COUNT);
2008: END IF;
2009: AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials(p_api_version => 1.0,
2010: p_deleted_matrl_tbl => l_unsched_mtl_tbl,

Line 2014: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2010: p_deleted_matrl_tbl => l_unsched_mtl_tbl,
2011: x_return_status => l_return_status,
2012: x_msg_count => l_msg_count,
2013: x_msg_data => l_msg_data);
2014: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2015: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2016: 'After returning from AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials, l_return_status = ' || l_return_status);
2017: END IF;
2018: END IF;

Line 2015: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2011: x_return_status => l_return_status,
2012: x_msg_count => l_msg_count,
2013: x_msg_data => l_msg_data);
2014: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2015: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2016: 'After returning from AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials, l_return_status = ' || l_return_status);
2017: END IF;
2018: END IF;
2019: -- End addition by surrkuma on 15-JUL-2010 for bug 9901811

Line 2027: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2023: Modify_Visit_Reservations (
2024: p_visit_id => p_visit_id,
2025: x_return_status => l_return_status);
2026:
2027: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2028: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2029: 'After calling Modify_Visit_Reservations, Return Status: ' || l_return_status);
2030: END IF;
2031:

Line 2028: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2024: p_visit_id => p_visit_id,
2025: x_return_status => l_return_status);
2026:
2027: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2028: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2029: 'After calling Modify_Visit_Reservations, Return Status: ' || l_return_status);
2030: END IF;
2031:
2032: -- Check Error Message stack.

Line 2049: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN

2045: IF FND_API.TO_BOOLEAN(p_commit) THEN
2046: COMMIT WORK;
2047: END IF;
2048:
2049: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2050: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
2051: 'At the normal execution end of PLSQL procedure.');
2052: END IF;
2053: EXCEPTION

Line 2050: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',

2046: COMMIT WORK;
2047: END IF;
2048:
2049: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2050: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
2051: 'At the normal execution end of PLSQL procedure.');
2052: END IF;
2053: EXCEPTION
2054: WHEN FND_API.G_EXC_ERROR THEN

Line 2351: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN

2347: WHERE visit_id = c_visit_id;
2348: --priyan end
2349: BEGIN
2350:
2351: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2352: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',
2353: 'At the start of PLSQL procedure. p_visit_id = ' || p_visit_id ||
2354: ', p_visit_task_id = ' || p_visit_task_id ||
2355: ', p_operation_flag = ' || p_operation_flag);

Line 2352: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',

2348: --priyan end
2349: BEGIN
2350:
2351: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2352: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',
2353: 'At the start of PLSQL procedure. p_visit_id = ' || p_visit_id ||
2354: ', p_visit_task_id = ' || p_visit_task_id ||
2355: ', p_operation_flag = ' || p_operation_flag);
2356: END IF;

Line 2377: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2373: --priyan
2374: -- Added the check l_assoc_id IS NULL
2375: IF (p_visit_task_id IS NOT NULL AND l_assoc_id IS NULL AND p_visit_task_id <> FND_API.g_miss_num AND p_operation_flag = 'C' ) THEN
2376: -- if create
2377: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2378: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Before calling Create_Task_Materials');
2379: END IF;
2380:
2381: Create_Task_Materials (

Line 2378: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Before calling Create_Task_Materials');

2374: -- Added the check l_assoc_id IS NULL
2375: IF (p_visit_task_id IS NOT NULL AND l_assoc_id IS NULL AND p_visit_task_id <> FND_API.g_miss_num AND p_operation_flag = 'C' ) THEN
2376: -- if create
2377: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2378: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Before calling Create_Task_Materials');
2379: END IF;
2380:
2381: Create_Task_Materials (
2382: p_api_version => l_api_version,

Line 2392: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

2388: x_return_status => l_return_status,
2389: x_msg_count => l_msg_count,
2390: x_msg_data => l_msg_data );
2391:
2392: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2393: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY,
2394: 'After calling Create_Task_Materials, Return Status: ' || l_return_status);
2395: END IF;
2396: -- Check Error Message stack.

Line 2393: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY,

2389: x_msg_count => l_msg_count,
2390: x_msg_data => l_msg_data );
2391:
2392: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2393: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY,
2394: 'After calling Create_Task_Materials, Return Status: ' || l_return_status);
2395: END IF;
2396: -- Check Error Message stack.
2397: IF (l_return_Status <> FND_API.G_RET_STS_SUCCESS) THEN

Line 2407: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN

2403: --priyan
2404: -- Added the check l_assoc_id IS NULL
2405: ELSIF (p_visit_id IS NOT NULL AND l_assoc_id IS NULL AND p_visit_id <> FND_API.g_miss_num AND p_operation_flag = 'U' ) THEN
2406: -- if update
2407: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2408: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2409: 'Request for Visit Org or Start date change: Org Id: ' || p_org_id || ', Start date: ' || p_start_date);
2410: END IF;
2411:

Line 2408: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2404: -- Added the check l_assoc_id IS NULL
2405: ELSIF (p_visit_id IS NOT NULL AND l_assoc_id IS NULL AND p_visit_id <> FND_API.g_miss_num AND p_operation_flag = 'U' ) THEN
2406: -- if update
2407: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2408: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2409: 'Request for Visit Org or Start date change: Org Id: ' || p_org_id || ', Start date: ' || p_start_date);
2410: END IF;
2411:
2412: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 2412: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2408: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2409: 'Request for Visit Org or Start date change: Org Id: ' || p_org_id || ', Start date: ' || p_start_date);
2410: END IF;
2411:
2412: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2413: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2414: 'Before calling Modify_Visit_Task_Matrls');
2415: END IF;
2416:

Line 2413: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2409: 'Request for Visit Org or Start date change: Org Id: ' || p_org_id || ', Start date: ' || p_start_date);
2410: END IF;
2411:
2412: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2413: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2414: 'Before calling Modify_Visit_Task_Matrls');
2415: END IF;
2416:
2417: Modify_Visit_Task_Matrls (

Line 2430: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2426: x_return_status => l_return_status,
2427: x_msg_count => l_msg_count,
2428: x_msg_data => l_msg_data);
2429:
2430: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2431: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2432: 'After calling Modify_Visit_Task_Matrls, Return Status: ' || l_return_status
2433: );
2434: END IF;

Line 2431: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2427: x_msg_count => l_msg_count,
2428: x_msg_data => l_msg_data);
2429:
2430: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2431: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2432: 'After calling Modify_Visit_Task_Matrls, Return Status: ' || l_return_status
2433: );
2434: END IF;
2435: -- Check Error Message stack.

Line 2468: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2464:
2465: ELSIF (p_visit_id IS NOT NULL AND p_visit_id <> FND_API.g_miss_num AND p_operation_flag = 'R'
2466: AND p_visit_task_id IS NULL) THEN
2467: -- remove mode , with no task id
2468: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2469: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2470: 'Before calling Remove_Visit_Task_Matrls');
2471: END IF;
2472:

Line 2469: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2465: ELSIF (p_visit_id IS NOT NULL AND p_visit_id <> FND_API.g_miss_num AND p_operation_flag = 'R'
2466: AND p_visit_task_id IS NULL) THEN
2467: -- remove mode , with no task id
2468: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2469: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2470: 'Before calling Remove_Visit_Task_Matrls');
2471: END IF;
2472:
2473: Remove_Visit_Task_Matrls (

Line 2484: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2480: x_return_status => l_return_status,
2481: x_msg_count => l_msg_count,
2482: x_msg_data => l_msg_data);
2483:
2484: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2485: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2486: 'After calling Remove_Visit_Task_Matrls, Return Status: '|| l_return_status
2487: );
2488: END IF;

Line 2485: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2481: x_msg_count => l_msg_count,
2482: x_msg_data => l_msg_data);
2483:
2484: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2485: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2486: 'After calling Remove_Visit_Task_Matrls, Return Status: '|| l_return_status
2487: );
2488: END IF;
2489:

Line 2501: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2497:
2498: ELSIF (p_visit_task_id IS NOT NULL AND p_visit_task_id <> FND_API.g_miss_num AND p_operation_flag = 'R')
2499: THEN
2500: -- Remove mode with Task ID
2501: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2502: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2503: 'Before calling Remove_Visit_Task_Matrls');
2504: END IF;
2505:

Line 2502: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2498: ELSIF (p_visit_task_id IS NOT NULL AND p_visit_task_id <> FND_API.g_miss_num AND p_operation_flag = 'R')
2499: THEN
2500: -- Remove mode with Task ID
2501: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2502: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2503: 'Before calling Remove_Visit_Task_Matrls');
2504: END IF;
2505:
2506: Remove_Visit_Task_Matrls (

Line 2519: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2515: x_msg_count => l_msg_count,
2516: x_msg_data => l_msg_data);
2517:
2518:
2519: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2520: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2521: 'After calling Remove_Visit_Task_Matrls, Return Status: '|| l_return_status
2522: );
2523: END IF;

Line 2520: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2516: x_msg_data => l_msg_data);
2517:
2518:
2519: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2520: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2521: 'After calling Remove_Visit_Task_Matrls, Return Status: '|| l_return_status
2522: );
2523: END IF;
2524: -- Check Error Message stack.

Line 2535: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2531:
2532: ELSIF (p_visit_id IS NOT NULL AND p_visit_id <> FND_API.g_miss_num AND p_visit_status IN ('CLOSED', 'CANCELLED'))
2533: -- visitis in Closed or Cancelled status
2534: THEN
2535: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2536: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2537: 'Before calling Update_Unplanned_Matrls');
2538: END IF;
2539:

Line 2536: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2532: ELSIF (p_visit_id IS NOT NULL AND p_visit_id <> FND_API.g_miss_num AND p_visit_status IN ('CLOSED', 'CANCELLED'))
2533: -- visitis in Closed or Cancelled status
2534: THEN
2535: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2536: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2537: 'Before calling Update_Unplanned_Matrls');
2538: END IF;
2539:
2540: Update_Unplanned_Matrls (

Line 2550: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2546: x_return_status => l_return_status,
2547: x_msg_count => l_msg_count,
2548: x_msg_data => l_msg_data);
2549:
2550: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2551: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2552: 'After calling Update_Unplanned_Matrls, Return Status: '|| l_return_status
2553: );
2554: END IF;

Line 2551: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2547: x_msg_count => l_msg_count,
2548: x_msg_data => l_msg_data);
2549:
2550: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2551: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2552: 'After calling Update_Unplanned_Matrls, Return Status: '|| l_return_status
2553: );
2554: END IF;
2555: -- Check Error Message stack.

Line 2569: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN

2565: IF FND_API.TO_BOOLEAN(p_commit) THEN
2566: COMMIT WORK;
2567: END IF;
2568:
2569: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2570: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
2571: 'At the end of PLSQL procedure');
2572: END IF;
2573: EXCEPTION

Line 2570: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',

2566: COMMIT WORK;
2567: END IF;
2568:
2569: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2570: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
2571: 'At the end of PLSQL procedure');
2572: END IF;
2573: EXCEPTION
2574: WHEN FND_API.G_EXC_ERROR THEN

Line 2716: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN

2712: l_unsched_mtl_index NUMBER := 1;
2713:
2714: L_DEBUG_KEY VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || l_api_name;
2715: BEGIN
2716: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2717: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',
2718: 'At the start of PLSQL procedure.');
2719: END IF;
2720:

Line 2717: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',

2713:
2714: L_DEBUG_KEY VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || l_api_name;
2715: BEGIN
2716: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2717: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin',
2718: 'At the start of PLSQL procedure.');
2719: END IF;
2720:
2721: -- Standard start of API savepoint

Line 2732: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2728:
2729: -- Initialize API return status to success
2730: x_return_status := FND_API.G_RET_STS_SUCCESS;
2731:
2732: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2733: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2734: 'Request for Remove Task Materials for Visit Id: ' || l_visit_id ||
2735: ' and Visit Task Id: ' || l_visit_task_id);
2736: END IF;

Line 2733: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2729: -- Initialize API return status to success
2730: x_return_status := FND_API.G_RET_STS_SUCCESS;
2731:
2732: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2733: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2734: 'Request for Remove Task Materials for Visit Id: ' || l_visit_id ||
2735: ' and Visit Task Id: ' || l_visit_task_id);
2736: END IF;
2737:

Line 2744: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2740: OPEN visit_task_details_cur(l_visit_id,l_visit_task_id);
2741: FETCH visit_task_details_cur INTO l_visit_task_details_rec;
2742: CLOSE visit_task_details_cur;
2743:
2744: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2745: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2746: ' After visit task details cur, Visit Id: ' || l_visit_id);
2747: END IF;
2748:

Line 2745: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2741: FETCH visit_task_details_cur INTO l_visit_task_details_rec;
2742: CLOSE visit_task_details_cur;
2743:
2744: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2745: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2746: ' After visit task details cur, Visit Id: ' || l_visit_id);
2747: END IF;
2748:
2749: --Check for deleting a visit

Line 2751: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN

2747: END IF;
2748:
2749: --Check for deleting a visit
2750: IF (l_visit_task_id IS NOT NULL AND l_visit_task_id <> fnd_api.g_miss_num) THEN
2751: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2752: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2753: 'Before Retrieving task materials cur, Visit Task Id: ' || l_visit_task_id);
2754: END IF;
2755: --Retrieve task materials only

Line 2752: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2748:
2749: --Check for deleting a visit
2750: IF (l_visit_task_id IS NOT NULL AND l_visit_task_id <> fnd_api.g_miss_num) THEN
2751: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2752: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2753: 'Before Retrieving task materials cur, Visit Task Id: ' || l_visit_task_id);
2754: END IF;
2755: --Retrieve task materials only
2756: OPEN visit_task_mtrls_cur(l_visit_task_id);

Line 2764: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2760: -- update request quanity zero
2761: IF l_visit_task_mtrls_rec.schedule_material_id IS NOT NULL THEN
2762: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
2763: -- Add this requirement to l_unsched_mtl_tbl for ATP unscheduling
2764: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2765: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2766: 'l_unsched_mtl_index = ' || l_unsched_mtl_index ||
2767: ', Adding Requirement with id ' || l_visit_task_mtrls_rec.schedule_material_id || ' to l_unsched_mtl_tbl for Unscheduling.');
2768: END IF;

Line 2765: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2761: IF l_visit_task_mtrls_rec.schedule_material_id IS NOT NULL THEN
2762: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
2763: -- Add this requirement to l_unsched_mtl_tbl for ATP unscheduling
2764: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2765: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2766: 'l_unsched_mtl_index = ' || l_unsched_mtl_index ||
2767: ', Adding Requirement with id ' || l_visit_task_mtrls_rec.schedule_material_id || ' to l_unsched_mtl_tbl for Unscheduling.');
2768: END IF;
2769: l_unsched_mtl_tbl(l_unsched_mtl_index).visit_id := l_visit_task_mtrls_rec.visit_id;

Line 2791: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN

2787: END LOOP;
2788: CLOSE visit_task_mtrls_cur;
2789: ELSE
2790: -- l_visit_task_id is NULL: Remove for entire visit
2791: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2792: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2793: ' Before Retrieving all visit task materials cur, For Visit Id: ' || l_visit_id
2794: );
2795: END IF;

Line 2792: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2788: CLOSE visit_task_mtrls_cur;
2789: ELSE
2790: -- l_visit_task_id is NULL: Remove for entire visit
2791: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2792: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2793: ' Before Retrieving all visit task materials cur, For Visit Id: ' || l_visit_id
2794: );
2795: END IF;
2796:

Line 2806: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2802: -- update request quanity zero
2803: IF l_visit_mtrls_rec.schedule_material_id IS NOT NULL THEN
2804: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
2805: -- Add this requirement to l_unsched_mtl_tbl for ATP unscheduling
2806: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2807: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2808: 'l_unsched_mtl_index = ' || l_unsched_mtl_index ||
2809: ', Adding Requirement with id ' || l_visit_mtrls_rec.schedule_material_id || ' to l_unsched_mtl_tbl for Unscheduling.');
2810: END IF;

Line 2807: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2803: IF l_visit_mtrls_rec.schedule_material_id IS NOT NULL THEN
2804: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
2805: -- Add this requirement to l_unsched_mtl_tbl for ATP unscheduling
2806: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2807: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2808: 'l_unsched_mtl_index = ' || l_unsched_mtl_index ||
2809: ', Adding Requirement with id ' || l_visit_mtrls_rec.schedule_material_id || ' to l_unsched_mtl_tbl for Unscheduling.');
2810: END IF;
2811: l_unsched_mtl_tbl(l_unsched_mtl_index).visit_id := l_visit_mtrls_rec.visit_id;

Line 2839: fnd_log.string

2835: X_RETURN_STATUS => X_RETURN_STATUS,
2836: P_VISIT_ID => p_visit_id);
2837:
2838: IF (l_log_statement >= l_log_current_level)THEN
2839: fnd_log.string
2840: (
2841: l_log_statement,
2842: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Remove_Visit_Task_Matrls',
2843: ' After calling AHL_RSV_RESERVATIONS_PVT.DELETE_VISIT_RESERVATIONS ErrorMessage Status : ' || X_RETURN_STATUS

Line 2855: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2851:
2852: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
2853: IF (l_unsched_mtl_tbl.COUNT > 0) THEN
2854: -- Call ATP to unschedule the soft Deleted requirements
2855: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2856: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2857: 'Before calling AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials. l_unsched_mtl_tbl.COUNT = ' || l_unsched_mtl_tbl.COUNT);
2858: END IF;
2859: AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials(p_api_version => 1.0,

Line 2856: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2852: -- Added by surrkuma on 15-JUL-2010 for bug 9901811
2853: IF (l_unsched_mtl_tbl.COUNT > 0) THEN
2854: -- Call ATP to unschedule the soft Deleted requirements
2855: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2856: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2857: 'Before calling AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials. l_unsched_mtl_tbl.COUNT = ' || l_unsched_mtl_tbl.COUNT);
2858: END IF;
2859: AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials(p_api_version => 1.0,
2860: p_deleted_matrl_tbl => l_unsched_mtl_tbl,

Line 2864: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

2860: p_deleted_matrl_tbl => l_unsched_mtl_tbl,
2861: x_return_status => l_return_status,
2862: x_msg_count => l_msg_count,
2863: x_msg_data => l_msg_data);
2864: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2865: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2866: 'After returning from AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials, l_return_status = ' || l_return_status);
2867: END IF;
2868: END IF;

Line 2865: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,

2861: x_return_status => l_return_status,
2862: x_msg_count => l_msg_count,
2863: x_msg_data => l_msg_data);
2864: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2865: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY,
2866: 'After returning from AHL_LTP_MATRL_AVAL_PVT.Unschedule_deleted_materials, l_return_status = ' || l_return_status);
2867: END IF;
2868: END IF;
2869: -- End addition by surrkuma on 15-JUL-2010 for bug 9901811

Line 2888: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN

2884: IF FND_API.TO_BOOLEAN(p_commit) THEN
2885: COMMIT WORK;
2886: END IF;
2887:
2888: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2889: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
2890: 'At the end of PLSQL procedure.');
2891: END IF;
2892: EXCEPTION

Line 2889: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',

2885: COMMIT WORK;
2886: END IF;
2887:
2888: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2889: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.end',
2890: 'At the end of PLSQL procedure.');
2891: END IF;
2892: EXCEPTION
2893: WHEN FND_API.G_EXC_ERROR THEN

Line 2979: fnd_log.string

2975: l_visit_mtrls_rec visit_mtrls_cur%ROWTYPE;
2976:
2977: BEGIN
2978: IF (l_log_procedure >= l_log_current_level)THEN
2979: fnd_log.string
2980: (
2981: l_log_procedure,
2982: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Update_Unplanned_Matrls' || '.begin',
2983: 'At the start of PLSQL procedure'

Line 2998: fnd_log.string

2994: -- Initialize API return status to success
2995: x_return_status := FND_API.G_RET_STS_SUCCESS;
2996:
2997: IF (l_log_statement >= l_log_current_level)THEN
2998: fnd_log.string
2999: (
3000: l_log_statement,
3001: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name,
3002: 'Request for Update Materials for Visit Id : '|| p_visit_id

Line 3027: fnd_log.string

3023: X_RETURN_STATUS => X_RETURN_STATUS,
3024: P_VISIT_ID => p_visit_id);
3025:
3026: IF (l_log_statement >= l_log_current_level)THEN
3027: fnd_log.string
3028: (
3029: l_log_statement,
3030: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name,
3031: ' After calling AHL_RSV_RESERVATIONS_PVT.DELETE_VISIT_RESERVATIONS ErrorMessage Status : ' || X_RETURN_STATUS

Line 3045: fnd_log.string

3041: COMMIT WORK;
3042: END IF;
3043:
3044: IF (l_log_procedure >= l_log_current_level)THEN
3045: fnd_log.string
3046: (
3047: l_log_procedure,
3048: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Update Unplanned Matrls.end',
3049: 'At the end of PLSQL procedure'

Line 3141: fnd_log.string

3137: l_org_count NUMBER;
3138: l_scheduled_material_id NUMBER;
3139: BEGIN
3140: IF (l_log_procedure >= l_log_current_level)THEN
3141: fnd_log.string
3142: (
3143: l_log_procedure,
3144: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Modify_Visit_Reservations.Start',
3145: 'At the end of PLSQL procedure'

Line 3168: fnd_log.string

3164: FROM ahl_visit_tasks_b
3165: WHERE visit_id = p_visit_id);
3166:
3167: IF (l_log_statement >= l_log_current_level)THEN
3168: fnd_log.string
3169: (
3170: l_log_statement,
3171: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Modify_Visit_Reservations',
3172: 'l_org_count : '||l_org_count||' l_cur_org_id:'||l_cur_org_id||

Line 3193: fnd_log.string

3189: X_RETURN_STATUS => X_RETURN_STATUS,
3190: P_VISIT_ID => p_visit_id);
3191:
3192: IF (l_log_statement >= l_log_current_level)THEN
3193: fnd_log.string
3194: (
3195: l_log_statement,
3196: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Modify_Visit_Reservations',
3197: 'After calling AHL_RSV_RESERVATIONS_PVT.DELETE_VISIT_RESERVATIONS:X_RETURN_STATUS '||X_RETURN_STATUS

Line 3206: fnd_log.string

3202: RAISE Fnd_Api.g_exc_error;
3203: END IF;
3204: ELSE
3205: IF (l_log_statement >= l_log_current_level)THEN
3206: fnd_log.string
3207: (
3208: l_log_statement,
3209: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Modify_Visit_Reservations',
3210: 'In the else part of check l_prev_org_id <> l_cur_org_id'

Line 3228: fnd_log.string

3224: p_scheduled_material_id => l_scheduled_material_id
3225: );
3226:
3227: IF (l_log_statement >= l_log_current_level)THEN
3228: fnd_log.string
3229: (
3230: l_log_statement,
3231: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Modify_Visit_Reservations',
3232: 'After calling AHL_RSV_RESERVATIONS_PVT.Delete_Reservation:l_return_status '||l_return_status

Line 3249: fnd_log.string

3245: X_RETURN_STATUS => x_return_status,
3246: P_VISIT_ID => p_visit_id);
3247:
3248: IF (l_log_statement >= l_log_current_level)THEN
3249: fnd_log.string
3250: (
3251: l_log_statement,
3252: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Modify_Visit_Reservations',
3253: 'After calling AHL_RSV_RESERVATIONS_PVT.Update_Visit_Reservations:x_return_status '||x_return_status

Line 3264: fnd_log.string

3260: END IF;
3261: END IF; -- IF l_prev_org_id <> l_cur_org_id
3262:
3263: IF (l_log_procedure >= l_log_current_level)THEN
3264: fnd_log.string
3265: (
3266: l_log_procedure,
3267: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Modify_Visit_Reservations.end',
3268: 'At the end of PLSQL procedure'

Line 3324: fnd_log.string( l_log_procedure,L_DEBUG_KEY ||'.begin','At the start of PL SQL procedure - Task id = '||p_visit_task_id);

3320: END IF;
3321:
3322: -- Log API entry point
3323: IF (l_log_procedure >= l_log_current_level) THEN
3324: fnd_log.string( l_log_procedure,L_DEBUG_KEY ||'.begin','At the start of PL SQL procedure - Task id = '||p_visit_task_id);
3325: END IF;
3326:
3327: IF (p_visit_task_id IS NULL) THEN
3328: IF (l_log_statement >= l_log_current_level) THEN

Line 3329: fnd_log.string( l_log_statement,L_DEBUG_KEY,'Task id is null' );

3325: END IF;
3326:
3327: IF (p_visit_task_id IS NULL) THEN
3328: IF (l_log_statement >= l_log_current_level) THEN
3329: fnd_log.string( l_log_statement,L_DEBUG_KEY,'Task id is null' );
3330: END IF;
3331: Fnd_Message.SET_NAME('AHL','AHL_VISIT_TASKID_NULL');
3332: Fnd_Msg_Pub.ADD;
3333: RAISE Fnd_Api.G_EXC_ERROR;

Line 3352: fnd_log.string(l_log_procedure,

3348: COMMIT WORK;
3349: END IF;
3350:
3351: IF (l_log_procedure >= l_log_current_level) THEN
3352: fnd_log.string(l_log_procedure,
3353: L_DEBUG_KEY ||'.end',
3354: 'No of rows updated - '||SQL%ROWCOUNT);
3355: fnd_log.string(l_log_procedure,
3356: L_DEBUG_KEY ||'.end',

Line 3355: fnd_log.string(l_log_procedure,

3351: IF (l_log_procedure >= l_log_current_level) THEN
3352: fnd_log.string(l_log_procedure,
3353: L_DEBUG_KEY ||'.end',
3354: 'No of rows updated - '||SQL%ROWCOUNT);
3355: fnd_log.string(l_log_procedure,
3356: L_DEBUG_KEY ||'.end',
3357: 'At the end of PL SQL procedure. Return Status =' || x_return_status);
3358: END IF;
3359:

Line 3404: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

3400: l_api_name CONSTANT VARCHAR2(30) := 'Get_DFF_Default_Values';
3401: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || l_api_name;
3402:
3403: BEGIN
3404: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3405: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin', 'Entering Procedure. flexfield_name: ' || flexfield_name);
3406: END IF;
3407:
3408: fnd_dflex.get_flexfield('AHL', flexfield_name, flexfield, flexinfo);

Line 3405: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin', 'Entering Procedure. flexfield_name: ' || flexfield_name);

3401: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || l_api_name;
3402:
3403: BEGIN
3404: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3405: fnd_log.string(fnd_log.level_procedure, L_DEBUG_KEY || '.begin', 'Entering Procedure. flexfield_name: ' || flexfield_name);
3406: END IF;
3407:
3408: fnd_dflex.get_flexfield('AHL', flexfield_name, flexfield, flexinfo);
3409:

Line 3417: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

3413: flex_fields_defaults.ATTRIBUTE_CATEGORY := context_code;
3414: END IF;
3415:
3416:
3417: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
3418: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'flex_fields_defaults.ATTRIBUTE_CATEGORY: ' || flex_fields_defaults.ATTRIBUTE_CATEGORY);
3419: END IF;
3420:
3421: IF(flex_fields_defaults.ATTRIBUTE_CATEGORY IS NOT NULL)THEN

Line 3418: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'flex_fields_defaults.ATTRIBUTE_CATEGORY: ' || flex_fields_defaults.ATTRIBUTE_CATEGORY);

3414: END IF;
3415:
3416:
3417: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
3418: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'flex_fields_defaults.ATTRIBUTE_CATEGORY: ' || flex_fields_defaults.ATTRIBUTE_CATEGORY);
3419: END IF;
3420:
3421: IF(flex_fields_defaults.ATTRIBUTE_CATEGORY IS NOT NULL)THEN
3422: -- Get all the contexts

Line 3427: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

3423: fnd_dflex.get_contexts(flexfield, contexts);
3424: -- Find the required Contexts (Just Global or Global+User Selected)
3425: FOR j IN 1 .. contexts.ncontexts LOOP
3426: IF(contexts.is_enabled(j) AND (flex_fields_defaults.ATTRIBUTE_CATEGORY = contexts.context_code(j) OR contexts.is_global(j))) THEN
3427: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
3428: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is enabled. contexts.context_code(j): ' || contexts.context_code(j));
3429: IF (contexts.is_global(j)) THEN
3430: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is global.');
3431: ELSE

Line 3428: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is enabled. contexts.context_code(j): ' || contexts.context_code(j));

3424: -- Find the required Contexts (Just Global or Global+User Selected)
3425: FOR j IN 1 .. contexts.ncontexts LOOP
3426: IF(contexts.is_enabled(j) AND (flex_fields_defaults.ATTRIBUTE_CATEGORY = contexts.context_code(j) OR contexts.is_global(j))) THEN
3427: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
3428: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is enabled. contexts.context_code(j): ' || contexts.context_code(j));
3429: IF (contexts.is_global(j)) THEN
3430: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is global.');
3431: ELSE
3432: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is not global.');

Line 3430: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is global.');

3426: IF(contexts.is_enabled(j) AND (flex_fields_defaults.ATTRIBUTE_CATEGORY = contexts.context_code(j) OR contexts.is_global(j))) THEN
3427: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
3428: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is enabled. contexts.context_code(j): ' || contexts.context_code(j));
3429: IF (contexts.is_global(j)) THEN
3430: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is global.');
3431: ELSE
3432: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is not global.');
3433: END IF;
3434: END IF;

Line 3432: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is not global.');

3428: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is enabled. contexts.context_code(j): ' || contexts.context_code(j));
3429: IF (contexts.is_global(j)) THEN
3430: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is global.');
3431: ELSE
3432: fnd_log.string(fnd_log.level_statement, L_DEBUG_KEY, 'Context is not global.');
3433: END IF;
3434: END IF;
3435: -- Get Segments for current context
3436: fnd_dflex.get_segments(fnd_dflex.make_context(flexfield, contexts.context_code(j)), segments, TRUE);

Line 3609: IF (fnd_log.level_procedure >= l_log_current_level)THEN

3605: AND organization_id = C_ORG_ID;
3606:
3607: BEGIN
3608:
3609: IF (fnd_log.level_procedure >= l_log_current_level)THEN
3610: fnd_log.string (fnd_log.level_procedure,
3611: l_debug_key,
3612: 'At the start of PLSQL procedure');
3613: END IF;

Line 3610: fnd_log.string (fnd_log.level_procedure,

3606:
3607: BEGIN
3608:
3609: IF (fnd_log.level_procedure >= l_log_current_level)THEN
3610: fnd_log.string (fnd_log.level_procedure,
3611: l_debug_key,
3612: 'At the start of PLSQL procedure');
3613: END IF;
3614:

Line 3641: fnd_log.string (l_log_statement,

3637: RETURN;
3638: END IF;
3639:
3640: IF (l_log_statement >= l_log_current_level)THEN
3641: fnd_log.string (l_log_statement,
3642: l_debug_key,
3643: 'Before calling AHL_RA_NR_PROFILE_PVT.POPULATE_PROF_MAT_REQ, p_mr_header_id : '
3644: || p_mr_header_id || ' , p_instance_id: '||p_instance_id ||' , p_ue_id: '||p_ue_id);
3645: END IF;

Line 3659: fnd_log.string(l_log_statement,

3655: x_prof_mat_req_tbl => l_nrp_mat_req_tbl
3656: );
3657:
3658: IF (l_log_statement >= l_log_current_level) THEN
3659: fnd_log.string(l_log_statement,
3660: L_DEBUG_KEY,
3661: 'After calling POPULATE_PROF_MAT_REQ. l_return_status = ' || l_return_status ||' FND_MSG_PUB.count_msg= '||FND_MSG_PUB.count_msg||'l_nrp_mat_req_tbl.count is : '||l_nrp_mat_req_tbl.count);
3662: END IF;
3663:

Line 3667: fnd_log.string(l_log_statement,

3663:
3664: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
3665: x_msg_count := FND_MSG_PUB.count_msg;
3666: IF (l_log_statement >= l_log_current_level) THEN
3667: fnd_log.string(l_log_statement,
3668: L_DEBUG_KEY,
3669: 'Errors from POPULATE_PROF_MAT_REQ. Message count: ' || x_msg_count);
3670: END IF;
3671: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 3682: fnd_log.string (l_log_statement,

3678: IF l_nrp_mat_req_tbl.count > 0 THEN
3679: --Loop through all the materials populated by POPULATE_PROF_MAT_REQ and print the details in the debug log
3680: FOR i IN l_nrp_mat_req_tbl.FIRST..l_nrp_mat_req_tbl.LAST LOOP
3681: IF (l_log_statement >= l_log_current_level)THEN
3682: fnd_log.string (l_log_statement,
3683: l_debug_key,
3684: 'Attributes of l_nrp_mat_req_tbl as returned from POPULATE_PROF_MAT_REQ : Row - '|| i ||' - INVENTORY_ITEM_ID: '
3685: || l_nrp_mat_req_tbl(i).INVENTORY_ITEM_ID || ' , QUANTITY : ' || l_nrp_mat_req_tbl(i).QUANTITY || ' , UOM_CODE: '||l_nrp_mat_req_tbl(i).UOM_CODE
3686: ||' , STAGE_TYPE_CODE: '||l_nrp_mat_req_tbl(i).STAGE_TYPE_CODE);

Line 3704: fnd_log.string (l_log_statement,

3700:
3701: --For the required quantity in l_req_material_tbl, get the quantity in primary UOM of the item
3702: l_prim_quantity := AHL_LTP_MTL_REQ_PVT.Get_Primary_UOM_Qty(l_nrp_mat_req_tbl(i).INVENTORY_ITEM_ID, l_nrp_mat_req_tbl(i).UOM_CODE, l_nrp_mat_req_tbl(i).QUANTITY);
3703: IF (l_log_statement >= l_log_current_level)THEN
3704: fnd_log.string (l_log_statement,
3705: l_debug_key,
3706: 'Inside the loop for NR materials, Visit_id: '|| p_visit_id ||' ,visit_task_id: '|| l_stage_task_rec.visit_task_id ||' ,INVENTORY_ITEM_ID: '
3707: || l_nrp_mat_req_tbl(i).INVENTORY_ITEM_ID || ' , QUANTITY : ' || l_nrp_mat_req_tbl(i).QUANTITY || ' , UOM_CODE: '
3708: ||l_nrp_mat_req_tbl(i).UOM_CODE ||' , STAGE_TYPE_CODE: '||l_nrp_mat_req_tbl(i).STAGE_TYPE_CODE );

Line 3719: fnd_log.string (l_log_statement,

3715: OPEN get_workorder_detls (l_stage_task_rec.visit_task_id);
3716: FETCH get_workorder_detls INTO l_requested_date, l_workorder_id, l_operation_sequence, l_workorder_operation_id;
3717: IF get_workorder_detls%FOUND THEN
3718: IF (l_log_statement >= l_log_current_level)THEN
3719: fnd_log.string (l_log_statement,
3720: l_debug_key,
3721: 'l_requested_date: '|| l_requested_date ||' ,l_workorder_id: '|| l_workorder_id ||' ,l_operation_sequence: ' || l_operation_sequence
3722: || ' , l_workorder_operation_id : ' || l_workorder_operation_id || ' , l_scheduled_material_id : ' || l_scheduled_material_id);
3723: END IF;

Line 3771: fnd_log.string (l_log_statement,

3767: FETCH Get_primary_uom INTO l_prim_uom_code;
3768: CLOSE Get_primary_uom;
3769:
3770: IF (l_log_statement >= l_log_current_level)THEN
3771: fnd_log.string (l_log_statement,
3772: l_debug_key,
3773: 'l_scheduled_material_id : '|| l_scheduled_material_id ||' ,visit_task_id: '|| l_stage_task_rec.visit_task_id
3774: ||' ,INVENTORY_ITEM_ID: ' || l_nrp_mat_req_tbl(i).INVENTORY_ITEM_ID || ' , QUANTITY : ' || l_nrp_mat_req_tbl(i).QUANTITY
3775: || ' , UOM_CODE: '||l_nrp_mat_req_tbl(i).UOM_CODE );

Line 3782: fnd_log.string (l_log_statement,

3778: OPEN get_workorder_detls (l_stage_task_rec.visit_task_id);
3779: FETCH get_workorder_detls INTO l_requested_date, l_workorder_id, l_operation_sequence, l_workorder_operation_id;
3780: IF get_workorder_detls%FOUND THEN
3781: IF (l_log_statement >= l_log_current_level)THEN
3782: fnd_log.string (l_log_statement,
3783: l_debug_key,
3784: 'l_requested_date: '|| l_requested_date ||' ,l_workorder_id: '|| l_workorder_id ||' ,l_operation_sequence: ' || l_operation_sequence
3785: || ' , l_workorder_operation_id : ' || l_workorder_operation_id );
3786: END IF;

Line 3812: fnd_log.string (l_log_statement,

3808:
3809: ELSE
3810: -- IF the corresponding WO does not exists, create only records in the ASM table
3811: IF (l_log_statement >= l_log_current_level)THEN
3812: fnd_log.string (l_log_statement,
3813: l_debug_key,
3814: ' visit_task_id: '|| l_stage_task_rec.visit_task_id
3815: ||' ,INVENTORY_ITEM_ID: ' || l_nrp_mat_req_tbl(i).INVENTORY_ITEM_ID || ' , QUANTITY : ' || l_prim_quantity
3816: || ' , UOM_CODE: '||l_prim_uom_code||'l_stage_task_rec.planned_start_date: '||l_stage_task_rec.planned_start_date ||'l_visit_org_id: '||l_visit_org_id);

Line 3839: fnd_log.string(l_log_statement,

3835: x_msg_count => l_msg_count,
3836: x_msg_data => l_msg_data );
3837:
3838: IF (l_log_statement >= l_log_current_level) THEN
3839: fnd_log.string(l_log_statement,
3840: L_DEBUG_KEY,
3841: 'After calling AHL_LTP_REQST_MATRL_PVT.Insert_Planned_Matrls. l_return_status = ' || l_return_status);
3842: END IF;
3843:

Line 3860: IF (fnd_log.level_procedure >= l_log_current_level) THEN

3856: CLOSE get_workorder_detls;
3857: END IF; --get_scheduled_mat_detls%FOUND
3858: END LOOP;
3859:
3860: IF (fnd_log.level_procedure >= l_log_current_level) THEN
3861: fnd_log.string ( fnd_log.level_procedure,
3862: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
3863: 'Before calling AHL_PP_MATERIALS_PVT.Process_Material_Request, l_req_material_tbl.count: '||l_req_material_tbl.count );
3864: END IF;

Line 3861: fnd_log.string ( fnd_log.level_procedure,

3857: END IF; --get_scheduled_mat_detls%FOUND
3858: END LOOP;
3859:
3860: IF (fnd_log.level_procedure >= l_log_current_level) THEN
3861: fnd_log.string ( fnd_log.level_procedure,
3862: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
3863: 'Before calling AHL_PP_MATERIALS_PVT.Process_Material_Request, l_req_material_tbl.count: '||l_req_material_tbl.count );
3864: END IF;
3865:

Line 3870: fnd_log.string (l_log_statement,

3866: --Call AHL_PP_MATERIALS_PVT.Process_Material_Request to update materials both in WIP table and in ASM and to create in only WIP table
3867: IF l_req_material_tbl.count > 0 THEN
3868: FOR i IN l_req_material_tbl.FIRST..l_req_material_tbl.LAST LOOP
3869: IF (l_log_statement >= l_log_current_level)THEN
3870: fnd_log.string (l_log_statement,
3871: l_debug_key,
3872: 'Attributes of l_req_material_tbl as passed to AHL_PP_MATERIALS_PVT.Process_Material_Request : Row - '|| i ||' ,SCHEDULE_MATERIAL_ID: '
3873: || l_req_material_tbl(i).SCHEDULE_MATERIAL_ID||' ,INVENTORY_ITEM_ID: ' || l_req_material_tbl(i).INVENTORY_ITEM_ID || ' , REQ QUANTITY : '
3874: || l_req_material_tbl(i).REQUESTED_QUANTITY || ' , SCH QTY: '||l_req_material_tbl(i).SCHEDULED_QUANTITY||' ,WORKORDER_ID: '||l_req_material_tbl(i).WORKORDER_ID

Line 3894: fnd_log.string(l_log_statement,

3890: x_msg_data => l_msg_data );
3891: END IF;
3892:
3893: IF (l_log_statement >= l_log_current_level) THEN
3894: fnd_log.string(l_log_statement,
3895: L_DEBUG_KEY,
3896: 'After calling AHL_PP_MATERIALS_PVT.Process_Material_Request. l_return_status = ' || l_return_status);
3897: END IF;
3898:

Line 3912: IF (fnd_log.level_procedure >= l_log_current_level)THEN

3908: END IF;
3909: END IF; --l_nrp_mat_req_tbl.count > 0
3910:
3911:
3912: IF (fnd_log.level_procedure >= l_log_current_level)THEN
3913: fnd_log.string
3914: (
3915: fnd_log.level_procedure,
3916: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Associate_Stage_Materials.end',

Line 3913: fnd_log.string

3909: END IF; --l_nrp_mat_req_tbl.count > 0
3910:
3911:
3912: IF (fnd_log.level_procedure >= l_log_current_level)THEN
3913: fnd_log.string
3914: (
3915: fnd_log.level_procedure,
3916: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Associate_Stage_Materials.end',
3917: 'At the end of PLSQL procedure'

Line 3915: fnd_log.level_procedure,

3911:
3912: IF (fnd_log.level_procedure >= l_log_current_level)THEN
3913: fnd_log.string
3914: (
3915: fnd_log.level_procedure,
3916: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Associate_Stage_Materials.end',
3917: 'At the end of PLSQL procedure'
3918: );
3919: END IF;

Line 4061: IF (fnd_log.level_procedure >= l_log_current_level)THEN

4057: AND opr.workorder_id = wo.workorder_id;
4058:
4059: BEGIN
4060:
4061: IF (fnd_log.level_procedure >= l_log_current_level)THEN
4062: fnd_log.string (fnd_log.level_procedure,
4063: L_DEBUG_KEY,
4064: 'At the start of PLSQL procedure');
4065: END IF;

Line 4062: fnd_log.string (fnd_log.level_procedure,

4058:
4059: BEGIN
4060:
4061: IF (fnd_log.level_procedure >= l_log_current_level)THEN
4062: fnd_log.string (fnd_log.level_procedure,
4063: L_DEBUG_KEY,
4064: 'At the start of PLSQL procedure');
4065: END IF;
4066:

Line 4093: fnd_log.string ( l_log_statement,

4089: RETURN;
4090: END IF;
4091:
4092: IF (l_log_statement >= l_log_current_level)THEN
4093: fnd_log.string ( l_log_statement,
4094: l_debug_key,
4095: 'Before calling AHL_RA_NR_PROFILE_PVT.POPULATE_PROF_MAT_REQ, p_mr_header_id : '
4096: || p_mr_header_id || ' , p_instance_id: '||p_instance_id ||' , p_ue_id: '||p_ue_id);
4097: END IF;

Line 4111: fnd_log.string(l_log_statement,

4107: x_prof_mat_req_tbl => l_nrp_mat_req_tbl
4108: );
4109:
4110: IF (l_log_statement >= l_log_current_level) THEN
4111: fnd_log.string(l_log_statement,
4112: L_DEBUG_KEY,
4113: 'After calling AHL_RA_NR_PROFILE_PVT.POPULATE_PROF_MAT_REQ. l_return_status = ' || l_return_status);
4114: END IF;
4115:

Line 4119: fnd_log.string(l_log_statement,

4115:
4116: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
4117: x_msg_count := FND_MSG_PUB.count_msg;
4118: IF (l_log_statement >= l_log_current_level) THEN
4119: fnd_log.string(l_log_statement,
4120: L_DEBUG_KEY,
4121: 'Errors from AHL_RA_NR_PROFILE_PVT.POPULATE_PROF_MAT_REQ. Message count: ' || x_msg_count);
4122: END IF;
4123: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 4169: fnd_log.string

4165: FETCH get_workorder_detls INTO l_requested_date, l_workorder_id, l_operation_sequence, l_workorder_operation_id;
4166: IF get_workorder_detls%FOUND THEN
4167: -- Update WIP table with these materials
4168: IF (l_log_statement >= l_log_current_level)THEN
4169: fnd_log.string
4170: (
4171: l_log_statement,
4172: l_debug_key,
4173: 'Attributes of l_req_material_tbl passed to AHL_PP_MATERIALS_PVT.Process_Material_Request : Row - '|| i ||' - INVENTORY_ITEM_ID: ' || l_nrp_mat_req_tbl(i).INVENTORY_ITEM_ID

Line 4226: IF (fnd_log.level_procedure >= l_log_current_level) THEN

4222:
4223: CLOSE get_scheduled_mat_detls;
4224: END LOOP;
4225:
4226: IF (fnd_log.level_procedure >= l_log_current_level) THEN
4227: fnd_log.string(fnd_log.level_procedure,
4228: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
4229: 'Before calling AHL_PP_MATERIALS_PVT.Process_Material_Request, l_req_material_tbl.count= '||l_req_material_tbl.count );
4230: END IF;

Line 4227: fnd_log.string(fnd_log.level_procedure,

4223: CLOSE get_scheduled_mat_detls;
4224: END LOOP;
4225:
4226: IF (fnd_log.level_procedure >= l_log_current_level) THEN
4227: fnd_log.string(fnd_log.level_procedure,
4228: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
4229: 'Before calling AHL_PP_MATERIALS_PVT.Process_Material_Request, l_req_material_tbl.count= '||l_req_material_tbl.count );
4230: END IF;
4231:

Line 4236: fnd_log.string (l_log_statement,

4232: --Call AHL_PP_MATERIALS_PVT.Process_Material_Request to update materials both in WIP table and in ASM
4233: IF l_req_material_tbl.count > 0 THEN
4234: FOR i IN l_req_material_tbl.FIRST..l_req_material_tbl.LAST LOOP
4235: IF (l_log_statement >= l_log_current_level)THEN
4236: fnd_log.string (l_log_statement,
4237: l_debug_key,
4238: 'Attributes of l_req_material_tbl as passed to AHL_PP_MATERIALS_PVT.Process_Material_Request : Row - '|| i
4239: ||' ,INVENTORY_ITEM_ID: ' || l_req_material_tbl(i).INVENTORY_ITEM_ID || ' , REQ QUANTITY : ' || l_req_material_tbl(i).REQUESTED_QUANTITY
4240: || ' , SCH QTY: '||l_req_material_tbl(i).SCHEDULED_QUANTITY||' ,WORKORDER_ID: '||l_req_material_tbl(i).WORKORDER_ID

Line 4260: fnd_log.string(l_log_statement,

4256: );
4257: END IF;
4258:
4259: IF (l_log_statement >= l_log_current_level) THEN
4260: fnd_log.string(l_log_statement,
4261: L_DEBUG_KEY,
4262: 'After calling AHL_PP_MATERIALS_PVT.Process_Material_Request. l_return_status = ' || l_return_status);
4263: END IF;
4264:

Line 4279: IF (fnd_log.level_procedure >= l_log_current_level)THEN

4275:
4276: END IF; --l_nrp_mat_req_tbl.count > 0
4277:
4278:
4279: IF (fnd_log.level_procedure >= l_log_current_level)THEN
4280: fnd_log.string
4281: (
4282: fnd_log.level_procedure,
4283: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Remove_Stage_Materials.end',

Line 4280: fnd_log.string

4276: END IF; --l_nrp_mat_req_tbl.count > 0
4277:
4278:
4279: IF (fnd_log.level_procedure >= l_log_current_level)THEN
4280: fnd_log.string
4281: (
4282: fnd_log.level_procedure,
4283: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Remove_Stage_Materials.end',
4284: 'At the end of PLSQL procedure'

Line 4282: fnd_log.level_procedure,

4278:
4279: IF (fnd_log.level_procedure >= l_log_current_level)THEN
4280: fnd_log.string
4281: (
4282: fnd_log.level_procedure,
4283: 'ahl.plsql.AHL_LTP_REQST_MATRL_PVT.Remove_Stage_Materials.end',
4284: 'At the end of PLSQL procedure'
4285: );
4286: END IF;

Line 4393: IF (fnd_log.level_procedure >= l_log_current_level)THEN

4389: AND opr.workorder_id = wo.workorder_id;
4390:
4391: BEGIN
4392:
4393: IF (fnd_log.level_procedure >= l_log_current_level)THEN
4394: fnd_log.string (fnd_log.level_procedure,
4395: L_DEBUG_KEY,
4396: 'At the start of PLSQL procedure');
4397: END IF;

Line 4394: fnd_log.string (fnd_log.level_procedure,

4390:
4391: BEGIN
4392:
4393: IF (fnd_log.level_procedure >= l_log_current_level)THEN
4394: fnd_log.string (fnd_log.level_procedure,
4395: L_DEBUG_KEY,
4396: 'At the start of PLSQL procedure');
4397: END IF;
4398:

Line 4421: IF (fnd_log.level_procedure >= l_log_current_level) THEN

4417: END IF;
4418:
4419: OPEN get_workorder_detls (p_visit_task_id);
4420: FETCH get_workorder_detls INTO l_requested_date, l_workorder_id, l_operation_sequence, l_workorder_operation_id, l_visit_id;
4421: IF (fnd_log.level_procedure >= l_log_current_level) THEN
4422: fnd_log.string(fnd_log.level_procedure,L_DEBUG_KEY,
4423: 'l_workorder_id: '||l_workorder_id||', l_workorder_operation_id: '||l_workorder_operation_id||',l_operation_sequence '||l_operation_sequence||', l_requested_date: '|| l_requested_date);
4424: END IF;
4425: l_workorder_tbl(1).WORKORDER_ID := l_workorder_id;

Line 4422: fnd_log.string(fnd_log.level_procedure,L_DEBUG_KEY,

4418:
4419: OPEN get_workorder_detls (p_visit_task_id);
4420: FETCH get_workorder_detls INTO l_requested_date, l_workorder_id, l_operation_sequence, l_workorder_operation_id, l_visit_id;
4421: IF (fnd_log.level_procedure >= l_log_current_level) THEN
4422: fnd_log.string(fnd_log.level_procedure,L_DEBUG_KEY,
4423: 'l_workorder_id: '||l_workorder_id||', l_workorder_operation_id: '||l_workorder_operation_id||',l_operation_sequence '||l_operation_sequence||', l_requested_date: '|| l_requested_date);
4424: END IF;
4425: l_workorder_tbl(1).WORKORDER_ID := l_workorder_id;
4426: l_workorder_tbl(1).VISIT_TASK_ID := p_visit_task_id;

Line 4451: IF (fnd_log.level_procedure >= l_log_current_level) THEN

4447: l_req_material_tbl(i).WORKORDER_OPERATION_ID := l_workorder_operation_id;
4448: i := i + 1;
4449: END LOOP;
4450:
4451: IF (fnd_log.level_procedure >= l_log_current_level) THEN
4452: fnd_log.string(fnd_log.level_procedure,L_DEBUG_KEY,
4453: 'Before calling AHL_PP_MATERIALS_PVT.Process_Material_Request, l_req_material_tbl.count= '||l_req_material_tbl.count );
4454: END IF;
4455:

Line 4452: fnd_log.string(fnd_log.level_procedure,L_DEBUG_KEY,

4448: i := i + 1;
4449: END LOOP;
4450:
4451: IF (fnd_log.level_procedure >= l_log_current_level) THEN
4452: fnd_log.string(fnd_log.level_procedure,L_DEBUG_KEY,
4453: 'Before calling AHL_PP_MATERIALS_PVT.Process_Material_Request, l_req_material_tbl.count= '||l_req_material_tbl.count );
4454: END IF;
4455:
4456: --Call AHL_PP_MATERIALS_PVT.Process_Material_Request to update materials both in WIP table and in ASM

Line 4474: fnd_log.string(l_log_statement,

4470: );
4471: END IF;
4472:
4473: IF (l_log_statement >= l_log_current_level) THEN
4474: fnd_log.string(l_log_statement,
4475: L_DEBUG_KEY,
4476: 'After calling AHL_PP_MATERIALS_PVT.Process_Material_Request. l_return_status = ' || l_return_status);
4477: END IF;
4478:

Line 4490: IF (fnd_log.level_procedure >= l_log_current_level) THEN

4486: RAISE Fnd_Api.g_exc_unexpected_error;
4487: END IF;
4488: END IF;
4489:
4490: IF (fnd_log.level_procedure >= l_log_current_level) THEN
4491: fnd_log.string(fnd_log.level_procedure,L_DEBUG_KEY,
4492: 'Before calling AHL_PRD_WORKORDER_PVT.process_stage_jobs and l_workorder_tbl count is:'||l_workorder_tbl.count);
4493: END IF;
4494:

Line 4491: fnd_log.string(fnd_log.level_procedure,L_DEBUG_KEY,

4487: END IF;
4488: END IF;
4489:
4490: IF (fnd_log.level_procedure >= l_log_current_level) THEN
4491: fnd_log.string(fnd_log.level_procedure,L_DEBUG_KEY,
4492: 'Before calling AHL_PRD_WORKORDER_PVT.process_stage_jobs and l_workorder_tbl count is:'||l_workorder_tbl.count);
4493: END IF;
4494:
4495: --Call AHL_PRD_WORKORDER_PVT.process_stage_jobs to remove resource requirements

Line 4512: fnd_log.string(l_log_statement,

4508: );
4509: END IF;
4510:
4511: IF (l_log_statement >= l_log_current_level) THEN
4512: fnd_log.string(l_log_statement,
4513: L_DEBUG_KEY,
4514: 'After calling AHL_PRD_WORKORDER_PVT.process_stage_jobs. l_return_status = ' || l_return_status);
4515: END IF;
4516:

Line 4528: IF (fnd_log.level_procedure >= l_log_current_level)THEN

4524: RAISE Fnd_Api.g_exc_unexpected_error;
4525: END IF;
4526: END IF;
4527:
4528: IF (fnd_log.level_procedure >= l_log_current_level)THEN
4529: fnd_log.string(fnd_log.level_procedure,
4530: L_DEBUG_KEY,
4531: 'At the end of PLSQL procedure');
4532: END IF;

Line 4529: fnd_log.string(fnd_log.level_procedure,

4525: END IF;
4526: END IF;
4527:
4528: IF (fnd_log.level_procedure >= l_log_current_level)THEN
4529: fnd_log.string(fnd_log.level_procedure,
4530: L_DEBUG_KEY,
4531: 'At the end of PLSQL procedure');
4532: END IF;
4533: