[Home] [Help]
1000: l_junk VARCHAR2(1);
1001:
1002: BEGIN
1003:
1004: IF NOT(FND_FUNCTION.TEST('AHL_PRD_DISALLOW_CANCEL_JOBS',null)) THEN
1005:
1006: -- if no workorder ID is passed, then check for only AHL_PRD_DISALLOW_CANCEL_JOBS
1007: -- function access.
1008: IF (p_workorder_id IS NULL) THEN
1015: return FND_API.G_TRUE;
1016: END IF;
1017: CLOSE is_workorders_released;
1018:
1019: IF(FND_FUNCTION.TEST('AHL_PRD_CANCEL_REL_JOBS',null))THEN
1020: return FND_API.G_TRUE;
1021: END IF;
1022: END IF;
1023:
1034: --
1035: -- p_employee_id -- Optional Input Employee Id.
1036: -- p_workorder_id -- Mandatory Workorder ID.
1037: -- p_operation_seq_num -- Mandatory Operation Seq Number
1038: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1039: --
1040: --
1041: -- Description : This function returns the total hours assigned to an operation.
1042: -- If the user role is technician or line maintenance technician, then the
1049:
1050: FUNCTION Get_Op_TotalHours_Assigned (p_employee_id IN NUMBER := NULL,
1051: p_workorder_id IN NUMBER,
1052: p_operation_seq_num IN NUMBER,
1053: p_fnd_function_name IN VARCHAR2)
1054: RETURN NUMBER
1055:
1056: IS
1057:
1088:
1089: BEGIN
1090:
1091: l_total_hours := 0;
1092: IF (p_fnd_function_name = G_TECH_MYWO) THEN -- Technician.
1093: -- Get logged in user's emp ID if input employee ID is null.
1094: IF (p_employee_id IS NULL) THEN
1095: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1096: ELSE
1121: -- p_workorder_id -- Mandatory Workorder ID.
1122: -- p_operation_seq_num -- Mandatory Operation Seq Number
1123: -- p_resource_id -- Mandatory resource ID.
1124: -- p_resource_seq_num -- Mandatory resource ID.
1125: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1126: --
1127: --
1128: -- Description : This function returns the total hours assigned for a specific resource
1129: -- within an operation. If the employee id passed to the function is null,
1134: p_workorder_id IN NUMBER,
1135: p_operation_seq_num IN NUMBER,
1136: p_resource_id IN NUMBER,
1137: p_resource_seq_num IN NUMBER,
1138: p_fnd_function_name IN VARCHAR2)
1139: RETURN NUMBER
1140: IS
1141: -- query to retrieve total hrs assigned to an employee for an operation-resource.
1142: CURSOR c_get_total_hours_emp(p_employee_id IN NUMBER,
1177:
1178: BEGIN
1179:
1180: l_total_hours := 0;
1181: IF (p_fnd_function_name = G_TECH_MYWO) THEN -- Technician.
1182: -- Get logged in user's emp ID if input employee ID is null.
1183: IF (p_employee_id IS NULL) THEN
1184: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1185: ELSE
1209: -- Parameters :
1210: -- p_employee_id -- Optional Input Employee Id.
1211: -- p_wip_entity_id -- Mandatory Workorder ID.
1212: -- p_operation_seq_num -- Mandatory Operation Seq Number
1213: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1214: --
1215: -- Description : This function returns the number of hours transacted by an employee
1216: -- accross all resources within an operation. If the employee id passed to the
1217: -- function is null then the calculations are based on the user currently logged
1219:
1220: FUNCTION Get_Op_Transacted_Hours (p_employee_id IN NUMBER := NULL,
1221: p_wip_entity_id IN NUMBER,
1222: p_operation_seq_num IN NUMBER,
1223: p_fnd_function_name IN VARCHAR2)
1224: RETURN NUMBER
1225: IS
1226: -- query to retrieve total hrs transacted by an employee.
1227: CURSOR c_get_res_txns_emp(p_wip_entity_id IN NUMBER,
1286: BEGIN
1287:
1288: l_total_hrs := 0;
1289: l_pending_hrs := 0;
1290: IF (p_fnd_function_name = G_TECH_MYWO OR p_fnd_function_name = G_LINE_TECH) THEN
1291:
1292: -- Get logged in user's emp ID if input employee ID is null.
1293: IF (p_employee_id IS NULL) THEN
1294: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1317: FETCH c_get_pend_res_txns_op INTO l_pending_hrs;
1318: CLOSE c_get_pend_res_txns_op;
1319:
1320: l_total_hrs := l_total_hrs + l_pending_hrs;
1321: END IF; -- p_fnd_function_name.
1322:
1323: RETURN round(l_total_hrs,3);
1324:
1325: END Get_Op_Transacted_Hours;
1332: -- p_employee_id -- Optional Input Employee Id.
1333: -- p_wip_entity_id -- Mandatory Workorder ID.
1334: -- p_operation_seq_num -- Mandatory Operation Seq Number
1335: -- p_resource_seq_num -- Mandatory Resource ID.
1336: -- p_fnd_function_name -- Mandatory fnd_function to identify user role.
1337: --
1338: -- Description : This function returns the number of hours transacted by an employee
1339: -- for a particular resource requirement within an operation if the user is
1340: -- has a role of a technician or line maintenance technician. It returns the
1345: FUNCTION Get_Res_Transacted_Hours (p_employee_id IN NUMBER := NULL,
1346: p_wip_entity_id IN NUMBER,
1347: p_operation_seq_num IN NUMBER,
1348: p_resource_seq_num IN NUMBER,
1349: p_fnd_function_name IN VARCHAR2)
1350: RETURN NUMBER
1351: IS
1352: -- query to retrieve total hrs transacted by an employee.
1353: CURSOR c_get_res_txns_emp(p_wip_entity_id IN NUMBER,
1421:
1422: l_total_hrs NUMBER;
1423: l_pending_hrs NUMBER;
1424: l_employee_id NUMBER;
1425: l_fnd_function_name VARCHAR2(80);
1426:
1427: BEGIN
1428:
1429: l_total_hrs := 0;
1428:
1429: l_total_hrs := 0;
1430: l_pending_hrs := 0;
1431:
1432: -- Though p_fnd_function_name is mandatory it cannot be passed from the OA Tech Search UI
1433: -- due to the limitation with OA inner table. Hence putting the code here.
1434: l_fnd_function_name := p_fnd_function_name;
1435: IF (l_fnd_function_name IS NULL) THEN
1436: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1430: l_pending_hrs := 0;
1431:
1432: -- Though p_fnd_function_name is mandatory it cannot be passed from the OA Tech Search UI
1433: -- due to the limitation with OA inner table. Hence putting the code here.
1434: l_fnd_function_name := p_fnd_function_name;
1435: IF (l_fnd_function_name IS NULL) THEN
1436: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1437: END IF;
1438:
1431:
1432: -- Though p_fnd_function_name is mandatory it cannot be passed from the OA Tech Search UI
1433: -- due to the limitation with OA inner table. Hence putting the code here.
1434: l_fnd_function_name := p_fnd_function_name;
1435: IF (l_fnd_function_name IS NULL) THEN
1436: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1437: END IF;
1438:
1439: -- Technician or Transit Technician
1432: -- Though p_fnd_function_name is mandatory it cannot be passed from the OA Tech Search UI
1433: -- due to the limitation with OA inner table. Hence putting the code here.
1434: l_fnd_function_name := p_fnd_function_name;
1435: IF (l_fnd_function_name IS NULL) THEN
1436: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1437: END IF;
1438:
1439: -- Technician or Transit Technician
1440: IF (l_fnd_function_name = G_TECH_MYWO OR l_fnd_function_name = G_LINE_TECH) THEN
1436: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1437: END IF;
1438:
1439: -- Technician or Transit Technician
1440: IF (l_fnd_function_name = G_TECH_MYWO OR l_fnd_function_name = G_LINE_TECH) THEN
1441:
1442: -- Get logged in user's emp ID if input employee ID is null.
1443: IF (p_employee_id IS NULL) THEN
1444: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1469: FETCH c_get_pend_res_txns_res INTO l_pending_hrs;
1470: CLOSE c_get_pend_res_txns_res;
1471:
1472: l_total_hrs := l_total_hrs + l_pending_hrs;
1473: END IF; -- p_fnd_function_name.
1474:
1475: RETURN round(l_total_hrs,3);
1476:
1477: END Get_Res_Transacted_Hours;
1484: --
1485: -- p_employee_id -- Optional Input Employee Id.
1486: -- p_workorder_id -- Mandatory Workorder ID.
1487: -- p_operation_seq_num -- Mandatory Operation Seq Number
1488: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1489: --
1490: --
1491: -- Description : This function will be used to retrieve the Assigned Start Date for an
1492: -- operation as displayed on the Operations subtab of the Update Workorders
1504:
1505: FUNCTION Get_Op_Assigned_Start_Date(p_employee_id IN NUMBER := NULL,
1506: p_workorder_id IN NUMBER,
1507: p_operation_seq_num IN NUMBER,
1508: p_fnd_function_name IN VARCHAR2)
1509: RETURN DATE
1510:
1511: IS
1512:
1537: l_assigned_start DATE;
1538:
1539: BEGIN
1540:
1541: IF (p_fnd_function_name = G_TECH_MYWO) THEN -- Technician.
1542: -- Get logged in user's emp ID if input employee ID is null.
1543: IF (p_employee_id IS NULL) THEN
1544: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1545: ELSE
1568: --
1569: -- p_employee_id -- Optional Input Employee Id.
1570: -- p_workorder_id -- Mandatory Workorder ID.
1571: -- p_operation_seq_num -- Mandatory Operation Seq Number
1572: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1573: --
1574: --
1575: -- Description : This function will be used to retrieve the Assigned End Date for an
1576: -- operation as displayed on the Operations subtab of the Update Workorders
1587:
1588: FUNCTION Get_Op_Assigned_End_Date(p_employee_id IN NUMBER := NULL,
1589: p_workorder_id IN NUMBER,
1590: p_operation_seq_num IN NUMBER,
1591: p_fnd_function_name IN VARCHAR2)
1592: RETURN DATE
1593:
1594: IS
1595:
1620: l_assigned_end DATE;
1621:
1622: BEGIN
1623:
1624: IF (p_fnd_function_name = G_TECH_MYWO) THEN -- Technician.
1625: -- Get logged in user's emp ID if input employee ID is null.
1626: IF (p_employee_id IS NULL) THEN
1627: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1628: ELSE