eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_VWP_RULES_PVT dependencies on FND_LOG

Line 56: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;

52: G_RT_ASSOC_TYPE CONSTANT VARCHAR2(30) := 'ROUTE';
53: ------------------------------------
54: -- Common constants and variables --
55: ------------------------------------
56: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
57: l_log_statement NUMBER := fnd_log.level_statement;
58: l_log_procedure NUMBER := fnd_log.level_procedure;
59: l_log_error NUMBER := fnd_log.level_error;
60: l_log_unexpected NUMBER := fnd_log.level_unexpected;

Line 57: l_log_statement NUMBER := fnd_log.level_statement;

53: ------------------------------------
54: -- Common constants and variables --
55: ------------------------------------
56: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
57: l_log_statement NUMBER := fnd_log.level_statement;
58: l_log_procedure NUMBER := fnd_log.level_procedure;
59: l_log_error NUMBER := fnd_log.level_error;
60: l_log_unexpected NUMBER := fnd_log.level_unexpected;
61: ---------------------------------------------------------------------

Line 58: l_log_procedure NUMBER := fnd_log.level_procedure;

54: -- Common constants and variables --
55: ------------------------------------
56: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
57: l_log_statement NUMBER := fnd_log.level_statement;
58: l_log_procedure NUMBER := fnd_log.level_procedure;
59: l_log_error NUMBER := fnd_log.level_error;
60: l_log_unexpected NUMBER := fnd_log.level_unexpected;
61: ---------------------------------------------------------------------
62: -- Define Record Types for record structures needed by the APIs --

Line 59: l_log_error NUMBER := fnd_log.level_error;

55: ------------------------------------
56: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
57: l_log_statement NUMBER := fnd_log.level_statement;
58: l_log_procedure NUMBER := fnd_log.level_procedure;
59: l_log_error NUMBER := fnd_log.level_error;
60: l_log_unexpected NUMBER := fnd_log.level_unexpected;
61: ---------------------------------------------------------------------
62: -- Define Record Types for record structures needed by the APIs --
63: ---------------------------------------------------------------------

Line 60: l_log_unexpected NUMBER := fnd_log.level_unexpected;

56: l_log_current_level NUMBER := fnd_log.g_current_runtime_level;
57: l_log_statement NUMBER := fnd_log.level_statement;
58: l_log_procedure NUMBER := fnd_log.level_procedure;
59: l_log_error NUMBER := fnd_log.level_error;
60: l_log_unexpected NUMBER := fnd_log.level_unexpected;
61: ---------------------------------------------------------------------
62: -- Define Record Types for record structures needed by the APIs --
63: ---------------------------------------------------------------------
64: -- Serial record type for validating serial exists in unit-config tree of the visit

Line 127: fnd_log.string(l_log_procedure,

123: AND trunc(nvl(active_end_date, SYSDATE+1)) > trunc(SYSDATE);
124:
125: BEGIN
126: IF (l_log_procedure >= l_log_current_level) THEN
127: fnd_log.string(l_log_procedure,
128: L_DEBUG_KEY ||'.begin',
129: 'At the start of PL SQL function. Visit Id = ' || p_visit_id ||
130: ', p_instance_id = ' || p_instance_id);
131: END IF;

Line 180: fnd_log.string(l_log_procedure,

176: L_API_NAME CONSTANT VARCHAR2(30) := 'Check_Item_Name_Or_Id';
177: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
178: BEGIN
179: IF (l_log_procedure >= l_log_current_level) THEN
180: fnd_log.string(l_log_procedure,
181: L_DEBUG_KEY ||'.begin',
182: 'At the start of PL SQL procedure. Item Id = ' ||
183: p_item_id || ', Item Name = ' || p_item_name || ', Org Id = ' || p_org_id);
184: END IF;

Line 254: fnd_log.string(l_log_procedure,

250: x_return_status := Fnd_Api.G_RET_STS_ERROR;
251: END IF;
252:
253: IF (l_log_procedure >= l_log_current_level) THEN
254: fnd_log.string(l_log_procedure,
255: L_DEBUG_KEY ||'.end',
256: 'At the end of PL SQL procedure. Return Status = ' || x_return_status ||
257: '. Item Id = ' || x_item_id || ', Item Name = ' || x_item_name ||
258: ', Org Id = ' || x_org_id);

Line 328: fnd_log.string(l_log_procedure,

324:
325: BEGIN
326:
327: IF (l_log_procedure >= l_log_current_level) THEN
328: fnd_log.string(l_log_procedure,
329: L_DEBUG_KEY ||'.begin',
330: 'At the start of PL SQL procedure. Project Template Name = ' || p_proj_temp_name);
331: END IF;
332:

Line 341: fnd_log.string(l_log_statement,

337: THEN
338: x_return_status := Fnd_Api.G_RET_STS_ERROR;
339: ELSE
340: IF (l_log_statement >= l_log_current_level) THEN
341: fnd_log.string(l_log_statement,
342: L_DEBUG_KEY,
343: 'Project Id = ' || x_project_id);
344: END IF;
345: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 351: fnd_log.string(l_log_procedure,

347: CLOSE c_proj_template;
348: END IF;
349:
350: IF (l_log_procedure >= l_log_current_level) THEN
351: fnd_log.string(l_log_procedure,
352: L_DEBUG_KEY ||'.end',
353: 'At the end of PL SQL procedure. Return Status = ' || x_return_status);
354: END IF;
355:

Line 385: fnd_log.string(l_log_procedure,

381: L_API_NAME CONSTANT VARCHAR2(30) := 'Check_Serial_Name_Or_Id';
382: L_DEBUG_KEY CONSTANT VARCHAR2(100):= 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
383: BEGIN
384: IF (l_log_procedure >= l_log_current_level) THEN
385: fnd_log.string(l_log_procedure,
386: L_DEBUG_KEY ||'.begin',
387: 'At the start of PL SQL procedure. Org Id = ' || p_org_id ||
388: ', Item Id = ' || p_item_id ||
389: ', Serial Id = ' || p_serial_id ||

Line 410: fnd_log.string(l_log_procedure,

406:
407: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
408:
409: IF (l_log_procedure >= l_log_current_level) THEN
410: fnd_log.string(l_log_procedure,
411: L_DEBUG_KEY ||'.end',
412: 'At the end of PL SQL procedure. Return Status = ' ||
413: x_return_status || ', Serial Id = ' || x_serial_id);
414: END IF;

Line 450: fnd_log.string(l_log_procedure,

446: L_API_NAME CONSTANT VARCHAR2(30) := 'Check_Dept_Desc_Or_Id';
447: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
448: BEGIN
449: IF (l_log_procedure >= l_log_current_level) THEN
450: fnd_log.string(l_log_procedure,
451: L_DEBUG_KEY ||'.begin',
452: 'At the start of PL SQL procedure. Org Id = ' || p_organization_id ||
453: ', Dept Id = ' || p_department_id || ', Dept Name = ' || p_dept_name);
454: END IF;

Line 472: fnd_log.string(l_log_procedure,

468:
469: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
470:
471: IF (l_log_procedure >= l_log_current_level) THEN
472: fnd_log.string(l_log_procedure,
473: L_DEBUG_KEY ||'.end',
474: 'At the end of PL SQL procedure. Return Status = ' || x_return_status ||
475: '. Department Id = ' || x_department_id);
476: END IF;

Line 512: fnd_log.string(l_log_procedure,

508: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
509:
510: BEGIN
511: IF (l_log_procedure >= l_log_current_level) THEN
512: fnd_log.string(l_log_procedure,
513: L_DEBUG_KEY ||'.begin',
514: 'At the start of PL SQL procedure. Organization Id = ' || p_organization_id ||
515: 'Organization Name = ' || p_org_name);
516: END IF;

Line 546: fnd_log.string(l_log_procedure,

542: AND MP.EAM_enabled_flag='Y';
543: END IF;
544: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
545: IF (l_log_procedure >= l_log_current_level) THEN
546: fnd_log.string(l_log_procedure,
547: L_DEBUG_KEY ||'.end',
548: 'At the end of PL SQL procedure. Return Status = ' || x_return_status ||
549: 'Organization Id = ' || x_organization_id);
550: END IF;

Line 586: fnd_log.string(l_log_procedure,

582:
583: BEGIN
584:
585: IF (l_log_procedure >= l_log_current_level) THEN
586: fnd_log.string(l_log_procedure,
587: L_DEBUG_KEY ||'.begin',
588: 'At the start of PL SQL procedure. SR Number= ' ||
589: p_service_number || ', SR Id = ' || p_service_id);
590: END IF;

Line 617: fnd_log.string(l_log_procedure,

613:
614: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
615:
616: IF (l_log_procedure >= l_log_current_level) THEN
617: fnd_log.string(l_log_procedure,
618: L_DEBUG_KEY ||'.end',
619: 'At the end of PL SQL procedure. Return Status = ' || x_return_status ||
620: 'Service Id = ' || x_service_id);
621: END IF;

Line 674: fnd_log.string(l_log_procedure,

670: AND NVL(simulation_plan_id,-99) = ASP.simulation_plan_id);
671: */
672: BEGIN
673: IF (l_log_procedure >= l_log_current_level) THEN
674: fnd_log.string(l_log_procedure,
675: L_DEBUG_KEY ||'.begin',
676: 'At the start of PL SQL procedure. Visit Id = ' || p_Visit_id);
677: END IF;
678: IF (p_visit_id IS NOT NULL) THEN

Line 686: fnd_log.string(l_log_statement,

682:
683: IF (l_simulation_plan IS NOT NULL) THEN
684:
685: IF (l_log_statement >= l_log_current_level)THEN
686: fnd_log.string(l_log_statement,
687: L_DEBUG_KEY,
688: 'Simulation Id Check' || l_simulation_plan);
689: END IF;
690: SELECT SIMULATION_PLAN_ID INTO l_simulation_plan_id

Line 714: fnd_log.string(l_log_procedure,

710: */
711: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
712:
713: IF (l_log_procedure >= l_log_current_level) THEN
714: fnd_log.string(l_log_procedure,
715: L_DEBUG_KEY ||'.end',
716: 'At the end of PL SQL procedure. Return Status = ' || x_return_status ||
717: 'x_bln_flag = ' || x_bln_flag);
718: END IF;

Line 756: fnd_log.string(l_log_procedure,

752:
753: --mpothuku added status_code <> 'DELETED' clause to fix #206 on 03/30/05
754: BEGIN
755: IF (l_log_procedure >= l_log_current_level) THEN
756: fnd_log.string(l_log_procedure,
757: L_DEBUG_KEY ||'.begin',
758: 'At the start of PL SQL procedure. Visit Task Id = ' || p_visit_task_id ||
759: ', Visit Task Number = ' || p_visit_task_number || ', Visit Id = ' || p_visit_id);
760: END IF;

Line 779: fnd_log.string(l_log_procedure,

775: END IF;
776:
777: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
778: IF (l_log_procedure >= l_log_current_level) THEN
779: fnd_log.string(l_log_procedure,
780: L_DEBUG_KEY ||'.end',
781: 'At the end of PL SQL procedure. Return Status = ' || x_return_status ||
782: 'Visit Task Id = ' || x_visit_task_id);
783: END IF;

Line 817: fnd_log.string(l_log_procedure,

813: L_API_NAME CONSTANT VARCHAR2(30) := 'Check_Lookup_Name_Or_Id';
814: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
815: BEGIN
816: IF (l_log_procedure >= l_log_current_level) THEN
817: fnd_log.string(l_log_procedure,
818: L_DEBUG_KEY ||'.begin',
819: 'At the start of PL SQL procedure. p_lookup_type = ' || p_lookup_type ||
820: ', p_lookup_code = ' || p_lookup_code ||
821: ', p_meaning = ' || p_meaning ||

Line 849: fnd_log.string(l_log_procedure,

845:
846: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
847:
848: IF (l_log_procedure >= l_log_current_level) THEN
849: fnd_log.string(l_log_procedure,
850: L_DEBUG_KEY ||'.end',
851: 'At the end of PL SQL procedure. Return Status = ' || x_return_status ||
852: '. x_lookup_code = ' || x_lookup_code);
853: END IF;

Line 905: fnd_log.string(l_log_procedure,

901: */
902: BEGIN
903:
904: IF (l_log_procedure >= l_log_current_level) THEN
905: fnd_log.string(l_log_procedure,
906: L_DEBUG_KEY ||'.begin',
907: 'At the start of PL SQL procedure.');
908: END IF;
909: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 920: fnd_log.string(l_log_procedure,L_DEBUG_KEY, 'Responsiblity_Id from c_fnd_response = ' || l_responsibility_id);

916: OPEN c_fnd_response;
917: FETCH c_fnd_response INTO l_responsibility_id;
918:
919: IF (l_log_procedure >= l_log_current_level) THEN
920: fnd_log.string(l_log_procedure,L_DEBUG_KEY, 'Responsiblity_Id from c_fnd_response = ' || l_responsibility_id);
921: END IF;
922:
923: IF c_fnd_response%NOTFOUND THEN
924: x_return_status := Fnd_Api.g_ret_sts_error;

Line 938: fnd_log.string(l_log_procedure,L_DEBUG_KEY, 'Responsiblity_Id from c_fnd_user_resp = ' || l_responsibility_id);

934: OPEN c_fnd_user_resp(l_responsibility_id);
935: FETCH c_fnd_user_resp INTO l_responsibility_id;
936:
937: IF (l_log_procedure >= l_log_current_level) THEN
938: fnd_log.string(l_log_procedure,L_DEBUG_KEY, 'Responsiblity_Id from c_fnd_user_resp = ' || l_responsibility_id);
939: END IF;
940:
941: IF c_fnd_user_resp%NOTFOUND THEN
942: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1004: IF (fnd_log.level_event >= l_log_current_level) THEN

1000: p_operating_unit_id => mo_global.get_current_org_id, -- Yazhou added for MOAC changes on 05Oct2005
1001: p_msg_count => l_msg_count,
1002: p_msg_data => l_msg_data,
1003: p_return_status => x_return_status);
1004: IF (fnd_log.level_event >= l_log_current_level) THEN
1005: fnd_log.string(fnd_log.level_event,
1006: L_DEBUG_KEY,
1007: 'After calling PA_INTERFACE_UTILS_PUB.Set_Global_Info. Return Status = ' || x_return_status);
1008: END IF;

Line 1005: fnd_log.string(fnd_log.level_event,

1001: p_msg_count => l_msg_count,
1002: p_msg_data => l_msg_data,
1003: p_return_status => x_return_status);
1004: IF (fnd_log.level_event >= l_log_current_level) THEN
1005: fnd_log.string(fnd_log.level_event,
1006: L_DEBUG_KEY,
1007: 'After calling PA_INTERFACE_UTILS_PUB.Set_Global_Info. Return Status = ' || x_return_status);
1008: END IF;
1009: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

Line 1011: fnd_log.string(l_log_statement,

1007: 'After calling PA_INTERFACE_UTILS_PUB.Set_Global_Info. Return Status = ' || x_return_status);
1008: END IF;
1009: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1010: IF (l_log_statement >= l_log_current_level) THEN
1011: fnd_log.string(l_log_statement,
1012: L_DEBUG_KEY,
1013: 'Errors from PA_INTERFACE_UTILS_PUB.Set_Global_Info. Message count: ' ||
1014: l_msg_count || ', message data: ' || l_msg_data);
1015: END IF;

Line 1025: fnd_log.string(l_log_procedure,

1021: END IF;
1022: -- End Changes made by jaramana on July 25, 2005
1023:
1024: IF (l_log_procedure >= l_log_current_level) THEN
1025: fnd_log.string(l_log_procedure,
1026: L_DEBUG_KEY ||'.end',
1027: 'At the end of PL SQL procedure. Return Status = ' ||
1028: x_return_status || '. x_check_project = ' || x_check_project);
1029: END IF;

Line 1069: fnd_log.string(l_log_procedure,

1065: AND (active_end_date is null or active_end_date > sysdate);
1066:
1067: BEGIN
1068: IF (l_log_procedure >= l_log_current_level) THEN
1069: fnd_log.string(l_log_procedure,
1070: L_DEBUG_KEY ||'.begin',
1071: 'At the start of PL SQL procedure. Unit Name = ' || p_unit_name);
1072: END IF;
1073: IF (p_unit_name IS NOT NULL) THEN

Line 1079: fnd_log.string(l_log_statement,

1075: FETCH c_serial INTO x_instance_id;
1076: CLOSE c_serial;
1077:
1078: IF (l_log_statement >= l_log_current_level) THEN
1079: fnd_log.string(l_log_statement,
1080: L_DEBUG_KEY,
1081: 'Instance Id = ' || x_instance_id);
1082: END IF;
1083:

Line 1098: fnd_log.string(l_log_procedure,

1094: END IF;
1095:
1096: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1097: IF (l_log_procedure >= l_log_current_level) THEN
1098: fnd_log.string(l_log_procedure,
1099: L_DEBUG_KEY ||'.end',
1100: 'At the end of PL SQL procedure. Return Status = ' || x_return_status ||
1101: '. Item Id = ' || x_item_id || ' Item Org Id' || x_item_org_id);
1102: END IF;

Line 1184: fnd_log.string(l_log_procedure,

1180: l_description ahl_routes_vl.remarks%TYPE; --Bug 5758813
1181:
1182: BEGIN
1183: IF (l_log_procedure >= l_log_current_level) THEN
1184: fnd_log.string(l_log_procedure,
1185: L_DEBUG_KEY ||'.begin',
1186: 'At the start of PL SQL procedure. Visit Id = ' || p_visit_id ||
1187: ', parent id = ' || p_parent_id || ', p_serial_id = ' || p_serial_id ||
1188: ', p_item_id = ' || p_item_id || ', p_mr_id = ' || p_mr_id ||

Line 1199: fnd_log.string(l_log_statement,

1195: l_type := 'UNPLANNED';
1196: IF p_serial_id IS NULL THEN
1197: x_return_status := Fnd_Api.g_ret_sts_error;
1198: IF (l_log_statement >= l_log_current_level) THEN
1199: fnd_log.string(l_log_statement,
1200: L_DEBUG_KEY,
1201: 'Error in Insert_Tasks. Serial Id missing.');
1202: END IF;
1203: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

Line 1219: fnd_log.string(l_log_statement,

1215: OPEN c_mr_title(p_mr_id);
1216: FETCH c_mr_title INTO l_name, l_description;
1217: CLOSE c_mr_title;
1218: IF (l_log_statement >= l_log_current_level) THEN
1219: fnd_log.string(l_log_statement,
1220: L_DEBUG_KEY,
1221: 'Summary Task. MR Title = ' || l_name || ', MR Description = ' || l_description);
1222: END IF;
1223: ELSIF p_unit_id IS NOT NULL THEN

Line 1230: fnd_log.string(l_log_statement,

1226: OPEN c_unit_eff_title(p_unit_id);
1227: FETCH c_unit_eff_title INTO l_name, l_description;
1228: CLOSE c_unit_eff_title;
1229: IF (l_log_statement >= l_log_current_level) THEN
1230: fnd_log.string(l_log_statement,
1231: L_DEBUG_KEY,
1232: 'Summary Task. Unit Eff Title = ' || l_name || ', Unit Eff Description = ' || l_description);
1233: END IF;
1234: END IF;

Line 1243: fnd_log.string(l_log_statement,

1239: OPEN c_route_title(p_mr_route_id);
1240: FETCH c_route_title INTO l_name, l_description;
1241: CLOSE c_route_title;
1242: IF (l_log_statement >= l_log_current_level) THEN
1243: fnd_log.string(l_log_statement,
1244: L_DEBUG_KEY,
1245: 'Task. Route Title = ' || l_name || ', Route Description = ' || l_description);
1246: END IF;
1247: ELSIF p_unit_id IS NOT NULL THEN

Line 1254: fnd_log.string(l_log_statement,

1250: OPEN c_unit_eff_title(p_unit_id);
1251: FETCH c_unit_eff_title INTO l_name, l_description;
1252: CLOSE c_unit_eff_title;
1253: IF (l_log_statement >= l_log_current_level) THEN
1254: fnd_log.string(l_log_statement,
1255: L_DEBUG_KEY,
1256: 'Task. Unit Eff Title = ' || l_name || ', Unit Eff Description = ' || l_description);
1257: END IF;
1258: END IF;

Line 1265: fnd_log.string(l_log_statement,

1261: -- Check for the Visit Task ID and Number.
1262: l_task_ID := Get_Visit_Task_Id();
1263: l_task_number := Get_Visit_Task_Number(p_visit_id);
1264: IF (l_log_statement >= l_log_current_level) THEN
1265: fnd_log.string(l_log_statement,
1266: L_DEBUG_KEY,
1267: 'Task ID = ' || l_task_id || ', Task Number = ' || l_task_number);
1268: END IF;
1269:

Line 1278: fnd_log.string(l_log_statement,

1274: RAISE Fnd_Api.G_EXC_ERROR;
1275: END IF;
1276:
1277: IF (l_log_statement >= l_log_current_level) THEN
1278: fnd_log.string(l_log_statement,
1279: L_DEBUG_KEY,
1280: 'Before calling AHL_VISIT_TASKS_PKG.Insert_Row.');
1281: END IF;
1282:

Line 1342: fnd_log.string(l_log_statement,

1338: X_LAST_UPDATED_BY => Fnd_Global.USER_ID,
1339: X_LAST_UPDATE_LOGIN => Fnd_Global.LOGIN_ID);
1340:
1341: IF (l_log_statement >= l_log_current_level) THEN
1342: fnd_log.string(l_log_statement,
1343: L_DEBUG_KEY,
1344: 'After calling AHL_VISIT_TASKS_PKG.Insert_Row.');
1345: END IF;
1346:

Line 1352: fnd_log.string(l_log_statement,

1348:
1349: -- Added cxcheng POST11510--------------
1350: --Now adjust the times derivation for task
1351: IF (l_log_statement >= l_log_current_level) THEN
1352: fnd_log.string(l_log_statement,
1353: L_DEBUG_KEY,
1354: 'Before calling AHL_VWP_TIMES_PVT.Adjust_Task_Times.');
1355: END IF;
1356:

Line 1368: fnd_log.string(l_log_statement,

1364: x_msg_data => l_msg_data,
1365: p_task_id => l_task_id);
1366:
1367: IF (l_log_statement >= l_log_current_level) THEN
1368: fnd_log.string(l_log_statement,
1369: L_DEBUG_KEY,
1370: 'After calling AHL_VWP_TIMES_PVT.Adjust_Task_Times. Return Status = ' ||
1371: l_return_status);
1372: END IF;

Line 1377: fnd_log.string(l_log_statement,

1373:
1374: l_msg_count := Fnd_Msg_Pub.count_msg;
1375: IF l_msg_count > 0 OR l_return_status <> Fnd_Api.g_ret_sts_success THEN
1376: IF (l_log_statement >= l_log_current_level) THEN
1377: fnd_log.string(l_log_statement,
1378: L_DEBUG_KEY,
1379: 'Errors from AHL_VWP_TIMES_PVT.Adjust_Task_Times. Message count: ' ||
1380: l_msg_count || ', message data: ' || l_msg_data);
1381: END IF;

Line 1389: fnd_log.string(l_log_procedure,

1385: END IF;
1386:
1387: x_return_status := Fnd_Api.g_ret_sts_success;
1388: IF (l_log_procedure >= l_log_current_level) THEN
1389: fnd_log.string(l_log_procedure,
1390: L_DEBUG_KEY || '.end',
1391: 'Return Status = ' || x_return_status || '. Task Id = ' || x_task_id);
1392: END IF;
1393: END IF; -- p_visit_id IS NOT NULL

Line 1446: fnd_log.string(l_log_procedure,

1442: relation_rec_tbl relation_tbl;
1443:
1444: BEGIN
1445: IF (l_log_procedure >= l_log_current_level) THEN
1446: fnd_log.string(l_log_procedure,
1447: L_DEBUG_KEY ||'.begin',
1448: 'At the start of PL SQL function. MAIN HEADER = ' || p_MR_main_id ||
1449: 'CURRENT MR HEADER = ' || p_MR_HEADER_id);
1450: END IF;

Line 1483: fnd_log.string(l_log_procedure,

1479: END LOOP;
1480: END IF;
1481:
1482: IF (l_log_procedure >= l_log_current_level) THEN
1483: fnd_log.string(l_log_procedure,
1484: L_DEBUG_KEY ||'.end',
1485: 'At the end of PL SQL function. Parent_Id' || x_parent_id);
1486: END IF;
1487: RETURN x_parent_id;

Line 1518: fnd_log.string(l_log_procedure,

1514: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
1515:
1516: BEGIN
1517: IF (l_log_procedure >= l_log_current_level) THEN
1518: fnd_log.string(l_log_procedure,
1519: L_DEBUG_KEY ||'.begin',
1520: 'At the start of PL SQL function.');
1521: END IF;
1522:

Line 1537: fnd_log.string(l_log_procedure,

1533: END IF;
1534: CLOSE c_id_exists_t;
1535:
1536: IF (l_log_procedure >= l_log_current_level) THEN
1537: fnd_log.string(l_log_procedure,
1538: L_DEBUG_KEY ||'.end',
1539: 'At the end of PL SQL function. Visit Task Id = ' || x_visit_task_id);
1540: END IF;
1541: RETURN x_visit_task_id;

Line 1567: fnd_log.string(l_log_procedure,

1563: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
1564:
1565: BEGIN
1566: IF (l_log_procedure >= l_log_current_level) THEN
1567: fnd_log.string(l_log_procedure,
1568: L_DEBUG_KEY ||'.begin',
1569: 'At the start of PL SQL function. Visit Id = ' || p_visit_id);
1570: END IF;
1571:

Line 1583: fnd_log.string(l_log_procedure,

1579: x_Visit_Task_Number := 1;
1580: END IF;
1581:
1582: IF (l_log_procedure >= l_log_current_level) THEN
1583: fnd_log.string(l_log_procedure,
1584: L_DEBUG_KEY ||'.end',
1585: 'At the end of PL SQL function. Visit Task Number = ' || x_Visit_Task_Number);
1586: END IF;
1587: RETURN x_Visit_Task_Number;

Line 1662: fnd_log.string(l_log_procedure,

1658: );
1659: BEGIN
1660: ---------------------------Start of Body-------------------------------------
1661: IF (l_log_procedure >= l_log_current_level) THEN
1662: fnd_log.string(l_log_procedure,
1663: L_DEBUG_KEY ||'.begin',
1664: 'At the start of PL SQL procedure. Visit Id = ' || p_visit_id ||
1665: ', Task Type = ' || p_task_type || ', MR count = ' || p_MR_Serial_tbl.count);
1666: END IF;

Line 1672: fnd_log.string(l_log_statement,

1668: IF p_MR_Serial_tbl.count > 0 THEN
1669: y := p_MR_Serial_tbl.FIRST;
1670: LOOP
1671: IF (l_log_statement >= l_log_current_level)THEN
1672: fnd_log.string(l_log_statement,
1673: L_DEBUG_KEY,
1674: 'MR ID = ' || p_MR_Serial_tbl(y).MR_ID);
1675: END IF;
1676:

Line 1690: fnd_log.string(l_log_statement,

1686: FETCH c_route_seq_ct INTO l_count;
1687: CLOSE c_route_seq_ct;
1688:
1689: IF (l_log_statement >= l_log_current_level) THEN
1690: fnd_log.string(l_log_statement,
1691: L_DEBUG_KEY,
1692: 'Route sequence count = ' || l_count);
1693: END IF;
1694:

Line 1709: fnd_log.string(l_log_statement,

1705: IF p_task_type = 'UNPLANNED' THEN -- For Unplanned task: Serial Id remains same for all Routes within a MR
1706: l_serial_id := p_MR_Serial_tbl(y).SERIAL_ID ;
1707:
1708: IF (l_log_statement >= l_log_current_level) THEN
1709: fnd_log.string(l_log_statement,
1710: L_DEBUG_KEY,
1711: 'Task type code = ' || p_task_type || ', MR ROUTE = ' || c_route_seq_rec.MR_ROUTE_ID);
1712: END IF;
1713:

Line 1719: fnd_log.string(l_log_statement,

1715: FETCH c_route_task INTO l_parent_task_id;
1716: CLOSE c_route_task;
1717:
1718: IF (l_log_statement >= l_log_current_level) THEN
1719: fnd_log.string(l_log_statement,
1720: L_DEBUG_KEY,
1721: 'Parent Id = ' || l_parent_task_id || ', RELATED MR ROUTE = ' || c_route_seq_rec.RELATED_MR_ROUTE_ID);
1722: END IF;
1723:

Line 1729: fnd_log.string(l_log_statement,

1725: FETCH c_route_task INTO l_child_task_id;
1726: CLOSE c_route_task;
1727:
1728: IF (l_log_statement >= l_log_current_level) THEN
1729: fnd_log.string(l_log_statement,
1730: L_DEBUG_KEY,
1731: 'Child Id = ' || l_child_task_id);
1732: END IF;
1733:

Line 1736: fnd_log.string(l_log_statement,

1732: END IF;
1733:
1734: IF l_parent_task_id <> 0 AND l_child_task_id <> 0 THEN
1735: IF (l_log_statement >= l_log_current_level) THEN
1736: fnd_log.string(l_log_statement,
1737: L_DEBUG_KEY,
1738: 'Parent Id = ' || l_parent_task_id || ', Child Id = ' || l_child_task_id);
1739: END IF;
1740: l_tsk_flag := 'Y';

Line 1768: fnd_log.string(l_log_statement,

1764:
1765: END IF; -- End of check p_task_type = 'UNPLANNED' check
1766:
1767: IF (l_log_statement >= l_log_current_level) THEN
1768: fnd_log.string(l_log_statement,
1769: L_DEBUG_KEY,
1770: 'Value of L_TSK_FLAG after task type check' || l_tsk_flag);
1771: END IF;
1772:

Line 1841: fnd_log.string(l_log_statement,

1837: l_task_rec.attribute15 := NULL;
1838: END IF;
1839:
1840: IF (l_log_statement >= l_log_current_level) THEN
1841: fnd_log.string(l_log_statement,
1842: L_DEBUG_KEY,
1843: 'Before inserting record into AHL_TASK_LINKS');
1844: END IF;
1845:

Line 1867: fnd_log.string(l_log_statement,

1863: l_task_rec.ATTRIBUTE15
1864: );
1865:
1866: IF (l_log_statement >= l_log_current_level) THEN
1867: fnd_log.string(l_log_statement,
1868: L_DEBUG_KEY,
1869: 'After inserting record into AHL_TASK_LINKS');
1870: END IF;
1871: END IF; -- -- End of check l_tsk_flag = 'Y'

Line 1885: fnd_log.string(l_log_procedure,

1881: END LOOP;
1882: END IF; -- End of check p_MR_Id_tbl.count > 0
1883: x_return_status := Fnd_Api.g_ret_sts_success;
1884: IF (l_log_procedure >= l_log_current_level) THEN
1885: fnd_log.string(l_log_procedure,
1886: L_DEBUG_KEY ||'.end',
1887: 'At the end of PL SQL procedure. Return Status = ' || x_return_status);
1888: END IF;
1889: END Tech_Dependency;

Line 2024: fnd_log.string(l_log_procedure,

2020: l_mr_title VARCHAR2(80);
2021:
2022: BEGIN
2023: IF (l_log_procedure >= l_log_current_level) THEN
2024: fnd_log.string(l_log_procedure,
2025: L_DEBUG_KEY ||'.begin',
2026: 'At the start of PL SQL procedure. p_visit_id' || p_visit_id ||
2027: ', p_unit_id' || p_unit_id || ', p_item_id' || p_item_id ||
2028: ', p_mr_id' || p_mr_id || ', p_service_req_id' || p_service_req_id ||

Line 2047: fnd_log.string(l_log_statement,

2043: FETCH c_task INTO c_task_rec;
2044:
2045: IF c_task%FOUND THEN
2046: IF (l_log_statement >= l_log_current_level)THEN
2047: fnd_log.string(l_log_statement,
2048: L_DEBUG_KEY,
2049: 'Inner c_task found. Unit Effectivity is found');
2050: END IF;
2051: CLOSE c_task;

Line 2068: fnd_log.string(l_log_statement,

2064: OPEN c_task_chk(l_visit_id, l_MR_Id, l_serial_id);
2065: FETCH c_task_chk INTO c_task_chk_rec;
2066: IF c_task_chk%FOUND THEN
2067: IF (l_log_statement >= l_log_current_level)THEN
2068: fnd_log.string(l_log_statement,
2069: L_DEBUG_KEY,
2070: ' Inner c_task2 found');
2071: END IF;
2072: Fnd_Message.SET_NAME('AHL','AHL_VWP_MR_FOUND');

Line 2085: fnd_log.string(l_log_statement,

2081: FETCH c_info INTO l_org_id, l_item_id;
2082: CLOSE c_info;
2083:
2084: IF (l_log_statement >= l_log_current_level)THEN
2085: fnd_log.string(l_log_statement,
2086: L_DEBUG_KEY,
2087: 'c_info cursor - Organization = '||l_org_id ||
2088: 'and Item = ' || l_item_id);
2089: END IF;

Line 2104: fnd_log.string(l_log_statement,

2100: OPEN c_task_chk(l_visit_id, l_MR_Id, l_serial_id);
2101: FETCH c_task_chk INTO c_task_chk_rec;
2102: IF c_task_chk%FOUND THEN
2103: IF (l_log_statement >= l_log_current_level)THEN
2104: fnd_log.string(l_log_statement,
2105: L_DEBUG_KEY,
2106: ' Inner c_task2 found');
2107: END IF;
2108: Fnd_Message.SET_NAME('AHL','AHL_VWP_MR_FOUND');

Line 2127: fnd_log.string(l_log_statement,

2123: RAISE FND_API.G_EXC_ERROR;
2124: END IF;
2125:
2126: IF (l_log_statement >= l_log_current_level) THEN
2127: fnd_log.string(l_log_statement,
2128: L_DEBUG_KEY,
2129: 'Before calling INSERT_TASKS for Summary Task. Task Id = ' || l_task_id);
2130: END IF;
2131:

Line 2153: fnd_log.string(l_log_statement,

2149: x_msg_count => l_msg_count,
2150: x_msg_data => l_msg_data);
2151:
2152: IF (l_log_statement >= l_log_current_level) THEN
2153: fnd_log.string(l_log_statement,
2154: L_DEBUG_KEY,
2155: 'After calling INSERT_TASKS for Summary Task. Task Id = ' || l_task_id ||
2156: '. Return Status = ' || l_return_status);
2157: END IF;

Line 2162: fnd_log.string(l_log_statement,

2158:
2159: l_msg_count := FND_MSG_PUB.count_msg;
2160: IF l_msg_count > 0 OR l_return_status <> Fnd_Api.g_ret_sts_success THEN
2161: IF (l_log_statement >= l_log_current_level) THEN
2162: fnd_log.string(l_log_statement,
2163: L_DEBUG_KEY,
2164: 'Errors from INSERT_TASKS. Message count: ' ||
2165: l_msg_count || ', message data: ' || l_msg_data);
2166: END IF;

Line 2226: fnd_log.string(l_log_statement,

2222:
2223: l_mr_route_id := MR_Route_Tbl(i);
2224:
2225: IF (l_log_statement >= l_log_current_level) THEN
2226: fnd_log.string(l_log_statement,
2227: L_DEBUG_KEY,
2228: 'l_mr_route_id = ' || l_mr_route_id);
2229: fnd_log.string(l_log_statement,
2230: L_DEBUG_KEY,

Line 2229: fnd_log.string(l_log_statement,

2225: IF (l_log_statement >= l_log_current_level) THEN
2226: fnd_log.string(l_log_statement,
2227: L_DEBUG_KEY,
2228: 'l_mr_route_id = ' || l_mr_route_id);
2229: fnd_log.string(l_log_statement,
2230: L_DEBUG_KEY,
2231: 'Before calling INSERT_TASKS for Simple Task');
2232: END IF;
2233:

Line 2255: fnd_log.string(l_log_statement,

2251: x_msg_count => l_msg_count,
2252: x_msg_data => l_msg_data);
2253:
2254: IF (l_log_statement >= l_log_current_level) THEN
2255: fnd_log.string(l_log_statement,
2256: L_DEBUG_KEY,
2257: 'After calling INSERT_TASKS for Simple Task. Task Id = ' || l_task_id ||
2258: '. Visit ID = ' || l_visit_id);
2259: END IF;

Line 2264: fnd_log.string(l_log_statement,

2260:
2261: l_msg_count := FND_MSG_PUB.count_msg;
2262: IF l_msg_count > 0 OR l_return_status <> Fnd_Api.g_ret_sts_success THEN
2263: IF (l_log_statement >= l_log_current_level) THEN
2264: fnd_log.string(l_log_statement,
2265: L_DEBUG_KEY,
2266: 'Errors from INSERT_TASKS. Message count: ' ||
2267: l_msg_count || ', message data: ' || l_msg_data);
2268: END IF;

Line 2281: fnd_log.string(l_log_statement,

2277:
2278: IF l_task_det.start_date_time IS NOT NULL THEN
2279:
2280: IF (l_log_statement >= l_log_current_level) THEN
2281: fnd_log.string(l_log_statement,
2282: L_DEBUG_KEY,
2283: 'PLANNED TASK - Before calling AHL_LTP_REQST_MATRL_PVT.Process_Planned_Materials');
2284: END IF;
2285: AHL_LTP_REQST_MATRL_PVT.Process_Planned_Materials (

Line 2300: fnd_log.string(l_log_statement,

2296: x_return_status => x_return_status,
2297: x_msg_count => l_msg_count,
2298: x_msg_data => l_msg_data );
2299: IF (l_log_statement >= l_log_current_level) THEN
2300: fnd_log.string(l_log_statement,
2301: L_DEBUG_KEY,
2302: 'PLANNED TASK - After calling AHL_LTP_REQST_MATRL_PVT.Process_Planned_Materials');
2303: END IF;
2304: l_msg_count := FND_MSG_PUB.count_msg;

Line 2318: fnd_log.string(l_log_procedure,

2314: END IF;
2315:
2316: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2317: IF (l_log_procedure >= l_log_current_level) THEN
2318: fnd_log.string(l_log_procedure,
2319: L_DEBUG_KEY ||'.end',
2320: 'At the end of PL SQL procedure. Return Status = ' || x_return_status ||
2321: ', p_x_parent_MR_Id = ' || p_x_parent_MR_Id);
2322: END IF;

Line 2363: fnd_log.string(l_log_procedure,

2359: c_child_rec c_child%ROWTYPE;
2360:
2361: BEGIN
2362: IF (l_log_procedure >= l_log_current_level) THEN
2363: fnd_log.string(l_log_procedure,
2364: L_DEBUG_KEY ||'.begin',
2365: 'At the start of PL SQL procedure. Visit Id = ' || p_visit_id ||
2366: 'Visit Task Id = ' || p_visit_task_id || 'Cost Parent Id = ' || p_cost_parent_id);
2367: END IF;

Line 2374: fnd_log.string(l_log_statement,

2370: p_cost_parent_id <> Fnd_Api.G_MISS_NUM ) THEN
2371:
2372: IF p_cost_parent_id = p_visit_task_id THEN
2373: IF (l_log_statement >= l_log_current_level) THEN
2374: fnd_log.string(l_log_statement,
2375: L_DEBUG_KEY,
2376: 'p_cost_parent_id = p_visit_task_id');
2377: END IF;
2378: Fnd_Message.SET_NAME('AHL','AHL_VWP_NO_COST_LOOP');

Line 2389: fnd_log.string(l_log_statement,

2385: FETCH c_child INTO c_child_rec;
2386:
2387: IF p_cost_parent_id = c_child_rec.VISIT_TASK_ID THEN
2388: IF (l_log_statement >= l_log_current_level) THEN
2389: fnd_log.string(l_log_statement,
2390: L_DEBUG_KEY,
2391: 'TASK LOOP');
2392: END IF;
2393: Fnd_Message.SET_NAME('AHL','AHL_VWP_NO_COST_LOOP');

Line 2403: fnd_log.string(l_log_procedure,

2399: END LOOP;
2400: CLOSE c_child;
2401: END IF;
2402: IF (l_log_procedure >= l_log_current_level) THEN
2403: fnd_log.string(l_log_procedure,
2404: L_DEBUG_KEY ||'.end',
2405: 'At the end of PL SQL procedure.');
2406: END IF;
2407:

Line 2439: fnd_log.string(l_log_procedure,

2435: c_child_rec c_child%ROWTYPE;
2436:
2437: BEGIN
2438: IF (l_log_procedure >= l_log_current_level) THEN
2439: fnd_log.string(l_log_procedure,
2440: L_DEBUG_KEY ||'.begin',
2441: 'At the start of PL SQL procedure. Visit Id = ' || p_visit_id || '. Visit Task Id = ' ||
2442: p_visit_task_id || '. Originating Task Id' || p_originating_task_id);
2443: END IF;

Line 2450: fnd_log.string(l_log_statement,

2446: p_originating_task_id <> Fnd_Api.G_MISS_NUM ) THEN
2447:
2448: IF p_originating_task_id = p_visit_task_id THEN
2449: IF (l_log_statement >= l_log_current_level) THEN
2450: fnd_log.string(l_log_statement,
2451: L_DEBUG_KEY,
2452: 'TASK LOOP1');
2453: END IF;
2454: Fnd_Message.SET_NAME('AHL','AHL_VWP_NO_ORIGIN_LOOP');

Line 2465: fnd_log.string(l_log_statement,

2461: FETCH c_child INTO c_child_rec;
2462:
2463: IF p_originating_task_id = c_child_rec.VISIT_TASK_ID THEN
2464: IF (l_log_statement >= l_log_current_level) THEN
2465: fnd_log.string(l_log_statement,
2466: L_DEBUG_KEY,
2467: 'TASK LOOP2');
2468: END IF;
2469:

Line 2481: fnd_log.string(l_log_procedure,

2477: END LOOP;
2478: CLOSE c_child;
2479: END IF;
2480: IF (l_log_procedure >= l_log_current_level) THEN
2481: fnd_log.string(l_log_procedure,
2482: L_DEBUG_KEY ||'.end',
2483: 'At the end of PL SQL procedure.');
2484: END IF;
2485: END Check_Origin_Task_Loop;

Line 2508: fnd_log.string(l_log_procedure,

2504: L_DEBUG_KEY CONSTANT VARCHAR2(100):= 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
2505:
2506: BEGIN
2507: IF (l_log_procedure >= l_log_current_level) THEN
2508: fnd_log.string(l_log_procedure,
2509: L_DEBUG_KEY ||'.begin',
2510: 'At the start of PL SQL procedure. Visit Id = ' || p_visit_id ||
2511: 'p_flag' || p_flag);
2512: END IF;

Line 2521: fnd_log.string(l_log_procedure,

2517: ANY_TASK_CHG_FLAG = p_flag
2518: WHERE VISIT_ID = p_visit_id;
2519: END IF;
2520: IF (l_log_procedure >= l_log_current_level) THEN
2521: fnd_log.string(l_log_procedure,
2522: L_DEBUG_KEY ||'.end',
2523: 'At the end of PL SQL procedure. Return Status = ' || x_return_status);
2524: END IF;
2525: END Update_Visit_Task_Flag;

Line 2592: fnd_log.string(l_log_procedure,

2588: and qpq.qualifier_attribute = 'QUALIFIER_ATTRIBUTE16';
2589:
2590: BEGIN
2591: IF (l_log_procedure >= l_log_current_level) THEN
2592: fnd_log.string(l_log_procedure,
2593: L_DEBUG_KEY ||'.begin',
2594: 'At the start of PL SQL procedure. Visit Id = ' ||
2595: p_visit_id || 'Price List Name = ' || p_price_list_name);
2596: END IF;

Line 2606: fnd_log.string(l_log_unexpected,

2602: IF (visit_info_csr%NOTFOUND) THEN
2603: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT');
2604: FND_MSG_PUB.ADD;
2605: IF (l_log_unexpected >= l_log_current_level)THEN
2606: fnd_log.string(l_log_unexpected,
2607: L_DEBUG_KEY,
2608: 'Visit id not found in AHL_VISITS_B table');
2609: END IF;
2610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2614: IF (fnd_log.level_error >= l_log_current_level)THEN

2610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2611: ELSIF(l_service_request_id IS NULL)THEN
2612: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT_UPDT_NOS');
2613: FND_MSG_PUB.ADD;
2614: IF (fnd_log.level_error >= l_log_current_level)THEN
2615: fnd_log.string(fnd_log.level_error,
2616: L_DEBUG_KEY,
2617: 'price list can not be associated because service request id is not associated to visit');
2618: END IF;

Line 2615: fnd_log.string(fnd_log.level_error,

2611: ELSIF(l_service_request_id IS NULL)THEN
2612: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT_UPDT_NOS');
2613: FND_MSG_PUB.ADD;
2614: IF (fnd_log.level_error >= l_log_current_level)THEN
2615: fnd_log.string(fnd_log.level_error,
2616: L_DEBUG_KEY,
2617: 'price list can not be associated because service request id is not associated to visit');
2618: END IF;
2619: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2633: fnd_log.string(l_log_unexpected,

2629: IF(customer_id_csr%NOTFOUND)THEN
2630: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_SR_ID');
2631: FND_MSG_PUB.ADD;
2632: IF (l_log_unexpected >= l_log_current_level)THEN
2633: fnd_log.string(l_log_unexpected,
2634: L_DEBUG_KEY,
2635: 'Associated Service Request ' || l_service_request_id ||
2636: ' is invalid as record not found.');
2637: END IF;

Line 2642: IF (fnd_log.level_error >= l_log_current_level)THEN

2638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2639: ELSIF(l_customer_id IS NULL)THEN
2640: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_SRVREQ_NOCUST');
2641: FND_MSG_PUB.ADD;
2642: IF (fnd_log.level_error >= l_log_current_level)THEN
2643: fnd_log.string(fnd_log.level_error,
2644: L_DEBUG_KEY,
2645: 'Customer id for corresponding service request ' || l_service_request_id || ' is null.');
2646: END IF;

Line 2643: fnd_log.string(fnd_log.level_error,

2639: ELSIF(l_customer_id IS NULL)THEN
2640: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_SRVREQ_NOCUST');
2641: FND_MSG_PUB.ADD;
2642: IF (fnd_log.level_error >= l_log_current_level)THEN
2643: fnd_log.string(fnd_log.level_error,
2644: L_DEBUG_KEY,
2645: 'Customer id for corresponding service request ' || l_service_request_id || ' is null.');
2646: END IF;
2647: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2662: IF (fnd_log.level_error >= l_log_current_level)THEN

2658: IF(price_list_id_csr%NOTFOUND)THEN
2659: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PLIST_NFOUND');
2660: FND_MESSAGE.Set_Token('PRICE_LIST',p_price_list_name);
2661: FND_MSG_PUB.ADD;
2662: IF (fnd_log.level_error >= l_log_current_level)THEN
2663: fnd_log.string(fnd_log.level_error,
2664: L_DEBUG_KEY,
2665: 'Valid price list not found with price list name ' || p_price_list_name);
2666: END IF;

Line 2663: fnd_log.string(fnd_log.level_error,

2659: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PLIST_NFOUND');
2660: FND_MESSAGE.Set_Token('PRICE_LIST',p_price_list_name);
2661: FND_MSG_PUB.ADD;
2662: IF (fnd_log.level_error >= l_log_current_level)THEN
2663: fnd_log.string(fnd_log.level_error,
2664: L_DEBUG_KEY,
2665: 'Valid price list not found with price list name ' || p_price_list_name);
2666: END IF;
2667: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2675: fnd_log.string(l_log_procedure,

2671: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
2672: RETURN;
2673: END IF;
2674: IF (l_log_procedure >= l_log_current_level) THEN
2675: fnd_log.string(l_log_procedure,
2676: L_DEBUG_KEY ||'.end',
2677: 'At the end of PL SQL procedure. x_price_list_id = ' || x_price_list_id);
2678: END IF;
2679:

Line 2725: fnd_log.string(l_log_procedure,

2721: --RR
2722: BEGIN
2723:
2724: IF (l_log_procedure >= l_log_current_level) THEN
2725: fnd_log.string(l_log_procedure,
2726: L_DEBUG_KEY ||'.begin',
2727: 'At the start of PL SQL procedure. Visit Task Id = ' || p_visit_task_id);
2728: END IF;
2729: l_task_id := p_visit_task_id;

Line 2745: fnd_log.string(l_log_statement,

2741: FETCH c_origin INTO c_origin_rec;
2742: EXIT WHEN c_origin%NOTFOUND;
2743: IF c_origin_rec.visit_task_id IS NOT NULL THEN
2744: IF (l_log_statement >= l_log_current_level) THEN
2745: fnd_log.string(l_log_statement,
2746: L_DEBUG_KEY,
2747: 'update origin');
2748: END IF;
2749: UPDATE AHL_VISIT_TASKS_B SET ORIGINATING_TASK_ID = NULL,

Line 2766: fnd_log.string(l_log_statement,

2762: FETCH c_parent INTO c_parent_rec;
2763: EXIT WHEN c_parent%NOTFOUND;
2764: IF c_parent_rec.visit_task_id IS NOT NULL THEN
2765: IF (l_log_statement >= l_log_current_level) THEN
2766: fnd_log.string(l_log_statement,
2767: L_DEBUG_KEY,
2768: 'update parent');
2769: END IF;
2770: UPDATE AHL_VISIT_TASKS_B SET COST_PARENT_ID = l_parent_id,

Line 2779: fnd_log.string(l_log_procedure,

2775: CLOSE c_parent;
2776: -- RR
2777: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2778: IF (l_log_procedure >= l_log_current_level) THEN
2779: fnd_log.string(l_log_procedure,
2780: L_DEBUG_KEY ||'.end',
2781: 'At the end of PL SQL procedure. Return Status = ' || x_return_status);
2782: END IF;
2783: END Update_Cost_Origin_Task;

Line 2807: fnd_log.string(l_log_procedure,

2803: l_item_present boolean:=false;
2804: BEGIN
2805:
2806: IF (l_log_procedure >= l_log_current_level) THEN
2807: fnd_log.string(l_log_procedure,
2808: L_DEBUG_KEY ||'.begin',
2809: 'At the start of PL SQL procedure. p_item_tbl1.count = ' || p_item_tbl1.count ||
2810: '. p_item_tbl2.count = ' || p_item_tbl2.count);
2811: END IF;

Line 2853: fnd_log.string(l_log_procedure,

2849: END LOOP;
2850: END IF;
2851:
2852: IF (l_log_procedure >= l_log_current_level) THEN
2853: fnd_log.string(l_log_procedure,
2854: L_DEBUG_KEY ||'.end',
2855: 'At the end of PL SQL procedure. x_item_tbl.COUNT = ' || x_item_tbl.COUNT);
2856: END IF;
2857:

Line 2903: fnd_log.string(l_log_procedure,

2899: p_item_id => c_task_rec.originating_task_id,
2900: x_item_chk_flag => l_item_chk_flag);
2901:
2902: IF (l_log_procedure >= l_log_current_level)THEN
2903: fnd_log.string(l_log_procedure,
2904: L_DEBUG_KEY||'.end',
2905: 'Check for RECURSIVE task id = ' || p_item_id);
2906: END IF;
2907: ELSE

Line 2910: fnd_log.string(l_log_procedure,

2906: END IF;
2907: ELSE
2908: l_item_chk_flag := 'N';
2909: IF (l_log_procedure >= l_log_current_level)THEN
2910: fnd_log.string(l_log_procedure,
2911: L_DEBUG_KEY||'.end',
2912: 'Check for NON RECURSIVE task id = ' || p_item_id);
2913: END IF;
2914: END IF;

Line 2964: fnd_log.string(l_log_procedure,

2960:
2961: BEGIN
2962:
2963: IF (l_log_procedure >= l_log_current_level) THEN
2964: fnd_log.string(l_log_procedure,
2965: L_DEBUG_KEY ||'.begin',
2966: 'At the start of PL SQL procedure. Visit Id = ' || p_visit_id);
2967: END IF;
2968: -- FETCH organization id

Line 2979: IF (fnd_log.level_error >= l_log_current_level)THEN

2975: FETCH currency_code_csr INTO x_currency_code;
2976: IF (currency_code_csr%NOTFOUND)THEN
2977: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_NO_CURRENCY');
2978: FND_MSG_PUB.ADD;
2979: IF (fnd_log.level_error >= l_log_current_level)THEN
2980: fnd_log.string(fnd_log.level_error,
2981: L_DEBUG_KEY,
2982: 'No curency is defined for the organization of the visit. l_org_id = ' || l_org_id);
2983: END IF;

Line 2980: fnd_log.string(fnd_log.level_error,

2976: IF (currency_code_csr%NOTFOUND)THEN
2977: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_NO_CURRENCY');
2978: FND_MSG_PUB.ADD;
2979: IF (fnd_log.level_error >= l_log_current_level)THEN
2980: fnd_log.string(fnd_log.level_error,
2981: L_DEBUG_KEY,
2982: 'No curency is defined for the organization of the visit. l_org_id = ' || l_org_id);
2983: END IF;
2984: END IF;

Line 2989: fnd_log.string(l_log_procedure,

2985: CLOSE currency_code_csr;
2986: END IF;
2987:
2988: IF (l_log_procedure >= l_log_current_level) THEN
2989: fnd_log.string(l_log_procedure,
2990: L_DEBUG_KEY ||'.end',
2991: 'At the end of PL SQL procedure. Currency Code = ' || x_currency_code);
2992: END IF;
2993: END Check_Currency_for_Costing;

Line 3033: fnd_log.string(l_log_procedure,

3029: AND FLV.LOOKUP_TYPE(+) = 'AHL_JOB_STATUS'
3030: AND AWO.STATUS_CODE = FLV.LOOKUP_CODE(+);
3031: BEGIN
3032: IF (l_log_procedure >= l_log_current_level) THEN
3033: fnd_log.string(l_log_procedure,
3034: L_DEBUG_KEY ||'.begin',
3035: 'At the start of PL SQL procedure. Visit OR Task Id = ' || p_id ||
3036: 'p_is_task_flag = '|| p_is_task_flag);
3037: END IF;

Line 3050: fnd_log.string(l_log_procedure,

3046: CLOSE c_job_tsk;
3047: END IF;
3048:
3049: IF (l_log_procedure >= l_log_current_level) THEN
3050: fnd_log.string(l_log_procedure,
3051: L_DEBUG_KEY ||'.end',
3052: 'At the end of PL SQL procedure. Status Code = '|| x_status_code ||
3053: 'Status Meaning = ' || x_status_meaning);
3054: END IF;

Line 3081: fnd_log.string(l_log_procedure,

3077: WHERE DEPARTMENT_ID = P_DEPT_ID;
3078: --
3079: BEGIN
3080: IF (l_log_procedure >= l_log_current_level) THEN
3081: fnd_log.string(l_log_procedure,
3082: L_DEBUG_KEY ||'.begin',
3083: 'At the start of PL SQL procedure. Department Id = ' || p_dept_id);
3084: END IF;
3085: IF P_DEPT_ID IS NOT NULL AND P_DEPT_ID <> FND_API.G_MISS_NUM

Line 3099: fnd_log.string(l_log_procedure,

3095: ELSE
3096: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3097: END IF;
3098: IF (l_log_procedure >= l_log_current_level) THEN
3099: fnd_log.string(l_log_procedure,
3100: L_DEBUG_KEY ||'.end',
3101: 'At the end of PL SQL procedure. Return Status = ' || x_return_status);
3102: END IF;
3103: END CHECK_DEPARTMENT_SHIFT;