[Home] [Help]
980: l_junk VARCHAR2(1);
981:
982: BEGIN
983:
984: IF NOT(FND_FUNCTION.TEST('AHL_PRD_DISALLOW_CANCEL_JOBS',null)) THEN
985:
986: -- if no workorder ID is passed, then check for only AHL_PRD_DISALLOW_CANCEL_JOBS
987: -- function access.
988: IF (p_workorder_id IS NULL) THEN
995: return FND_API.G_TRUE;
996: END IF;
997: CLOSE is_workorders_released;
998:
999: IF(FND_FUNCTION.TEST('AHL_PRD_CANCEL_REL_JOBS',null))THEN
1000: return FND_API.G_TRUE;
1001: END IF;
1002: END IF;
1003:
1014: --
1015: -- p_employee_id -- Optional Input Employee Id.
1016: -- p_workorder_id -- Mandatory Workorder ID.
1017: -- p_operation_seq_num -- Mandatory Operation Seq Number
1018: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1019: --
1020: --
1021: -- Description : This function returns the total hours assigned to an operation.
1022: -- If the user role is technician or line maintenance technician, then the
1029:
1030: FUNCTION Get_Op_TotalHours_Assigned (p_employee_id IN NUMBER := NULL,
1031: p_workorder_id IN NUMBER,
1032: p_operation_seq_num IN NUMBER,
1033: p_fnd_function_name IN VARCHAR2)
1034: RETURN NUMBER
1035:
1036: IS
1037:
1068:
1069: BEGIN
1070:
1071: l_total_hours := 0;
1072: IF (p_fnd_function_name = G_TECH_MYWO) THEN -- Technician.
1073: -- Get logged in user's emp ID if input employee ID is null.
1074: IF (p_employee_id IS NULL) THEN
1075: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1076: ELSE
1100: -- p_employee_id -- Optional Input Employee Id.
1101: -- p_workorder_id -- Mandatory Workorder ID.
1102: -- p_operation_seq_num -- Mandatory Operation Seq Number
1103: -- p_resource_id -- Mandatory resource ID.
1104: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1105: --
1106: --
1107: -- Description : This function returns the total hours assigned for a specific resource
1108: -- within an operation. If the employee id passed to the function is null,
1112: FUNCTION Get_Res_TotalHours_Assigned (p_employee_id IN NUMBER := NULL,
1113: p_workorder_id IN NUMBER,
1114: p_operation_seq_num IN NUMBER,
1115: p_resource_id IN NUMBER,
1116: p_fnd_function_name IN VARCHAR2)
1117: RETURN NUMBER
1118: IS
1119: -- query to retrieve total hrs assigned to an employee for an operation-resource.
1120: CURSOR c_get_total_hours_emp(p_employee_id IN NUMBER,
1153:
1154: BEGIN
1155:
1156: l_total_hours := 0;
1157: IF (p_fnd_function_name = G_TECH_MYWO) THEN -- Technician.
1158: -- Get logged in user's emp ID if input employee ID is null.
1159: IF (p_employee_id IS NULL) THEN
1160: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1161: ELSE
1185: -- Parameters :
1186: -- p_employee_id -- Optional Input Employee Id.
1187: -- p_wip_entity_id -- Mandatory Workorder ID.
1188: -- p_operation_seq_num -- Mandatory Operation Seq Number
1189: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1190: --
1191: -- Description : This function returns the number of hours transacted by an employee
1192: -- accross all resources within an operation. If the employee id passed to the
1193: -- function is null then the calculations are based on the user currently logged
1195:
1196: FUNCTION Get_Op_Transacted_Hours (p_employee_id IN NUMBER := NULL,
1197: p_wip_entity_id IN NUMBER,
1198: p_operation_seq_num IN NUMBER,
1199: p_fnd_function_name IN VARCHAR2)
1200: RETURN NUMBER
1201: IS
1202: -- query to retrieve total hrs transacted by an employee.
1203: CURSOR c_get_res_txns_emp(p_wip_entity_id IN NUMBER,
1262: BEGIN
1263:
1264: l_total_hrs := 0;
1265: l_pending_hrs := 0;
1266: IF (p_fnd_function_name = G_TECH_MYWO OR p_fnd_function_name = G_LINE_TECH) THEN
1267:
1268: -- Get logged in user's emp ID if input employee ID is null.
1269: IF (p_employee_id IS NULL) THEN
1270: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1293: FETCH c_get_pend_res_txns_op INTO l_pending_hrs;
1294: CLOSE c_get_pend_res_txns_op;
1295:
1296: l_total_hrs := l_total_hrs + l_pending_hrs;
1297: END IF; -- p_fnd_function_name.
1298:
1299: RETURN round(l_total_hrs,3);
1300:
1301: END Get_Op_Transacted_Hours;
1308: -- p_employee_id -- Optional Input Employee Id.
1309: -- p_wip_entity_id -- Mandatory Workorder ID.
1310: -- p_operation_seq_num -- Mandatory Operation Seq Number
1311: -- p_resource_seq_num -- Mandatory Resource ID.
1312: -- p_fnd_function_name -- Mandatory fnd_function to identify user role.
1313: --
1314: -- Description : This function returns the number of hours transacted by an employee
1315: -- for a particular resource requirement within an operation if the user is
1316: -- has a role of a technician or line maintenance technician. It returns the
1321: FUNCTION Get_Res_Transacted_Hours (p_employee_id IN NUMBER := NULL,
1322: p_wip_entity_id IN NUMBER,
1323: p_operation_seq_num IN NUMBER,
1324: p_resource_seq_num IN NUMBER,
1325: p_fnd_function_name IN VARCHAR2)
1326: RETURN NUMBER
1327: IS
1328: -- query to retrieve total hrs transacted by an employee.
1329: CURSOR c_get_res_txns_emp(p_wip_entity_id IN NUMBER,
1397:
1398: l_total_hrs NUMBER;
1399: l_pending_hrs NUMBER;
1400: l_employee_id NUMBER;
1401: l_fnd_function_name VARCHAR2(80);
1402:
1403: BEGIN
1404:
1405: l_total_hrs := 0;
1404:
1405: l_total_hrs := 0;
1406: l_pending_hrs := 0;
1407:
1408: -- Though p_fnd_function_name is mandatory it cannot be passed from the OA Tech Search UI
1409: -- due to the limitation with OA inner table. Hence putting the code here.
1410: l_fnd_function_name := p_fnd_function_name;
1411: IF (l_fnd_function_name IS NULL) THEN
1412: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1406: l_pending_hrs := 0;
1407:
1408: -- Though p_fnd_function_name is mandatory it cannot be passed from the OA Tech Search UI
1409: -- due to the limitation with OA inner table. Hence putting the code here.
1410: l_fnd_function_name := p_fnd_function_name;
1411: IF (l_fnd_function_name IS NULL) THEN
1412: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1413: END IF;
1414:
1407:
1408: -- Though p_fnd_function_name is mandatory it cannot be passed from the OA Tech Search UI
1409: -- due to the limitation with OA inner table. Hence putting the code here.
1410: l_fnd_function_name := p_fnd_function_name;
1411: IF (l_fnd_function_name IS NULL) THEN
1412: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1413: END IF;
1414:
1415: -- Technician or Transit Technician
1408: -- Though p_fnd_function_name is mandatory it cannot be passed from the OA Tech Search UI
1409: -- due to the limitation with OA inner table. Hence putting the code here.
1410: l_fnd_function_name := p_fnd_function_name;
1411: IF (l_fnd_function_name IS NULL) THEN
1412: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1413: END IF;
1414:
1415: -- Technician or Transit Technician
1416: IF (l_fnd_function_name = G_TECH_MYWO OR l_fnd_function_name = G_LINE_TECH) THEN
1412: l_fnd_function_name := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
1413: END IF;
1414:
1415: -- Technician or Transit Technician
1416: IF (l_fnd_function_name = G_TECH_MYWO OR l_fnd_function_name = G_LINE_TECH) THEN
1417:
1418: -- Get logged in user's emp ID if input employee ID is null.
1419: IF (p_employee_id IS NULL) THEN
1420: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1445: FETCH c_get_pend_res_txns_res INTO l_pending_hrs;
1446: CLOSE c_get_pend_res_txns_res;
1447:
1448: l_total_hrs := l_total_hrs + l_pending_hrs;
1449: END IF; -- p_fnd_function_name.
1450:
1451: RETURN round(l_total_hrs,3);
1452:
1453: END Get_Res_Transacted_Hours;
1460: --
1461: -- p_employee_id -- Optional Input Employee Id.
1462: -- p_workorder_id -- Mandatory Workorder ID.
1463: -- p_operation_seq_num -- Mandatory Operation Seq Number
1464: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1465: --
1466: --
1467: -- Description : This function will be used to retrieve the Assigned Start Date for an
1468: -- operation as displayed on the Operations subtab of the Update Workorders
1480:
1481: FUNCTION Get_Op_Assigned_Start_Date(p_employee_id IN NUMBER := NULL,
1482: p_workorder_id IN NUMBER,
1483: p_operation_seq_num IN NUMBER,
1484: p_fnd_function_name IN VARCHAR2)
1485: RETURN DATE
1486:
1487: IS
1488:
1513: l_assigned_start DATE;
1514:
1515: BEGIN
1516:
1517: IF (p_fnd_function_name = G_TECH_MYWO) THEN -- Technician.
1518: -- Get logged in user's emp ID if input employee ID is null.
1519: IF (p_employee_id IS NULL) THEN
1520: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1521: ELSE
1544: --
1545: -- p_employee_id -- Optional Input Employee Id.
1546: -- p_workorder_id -- Mandatory Workorder ID.
1547: -- p_operation_seq_num -- Mandatory Operation Seq Number
1548: -- p_fnd_function_name -- Mandatory fnd_function to identify User role.
1549: --
1550: --
1551: -- Description : This function will be used to retrieve the Assigned End Date for an
1552: -- operation as displayed on the Operations subtab of the Update Workorders
1563:
1564: FUNCTION Get_Op_Assigned_End_Date(p_employee_id IN NUMBER := NULL,
1565: p_workorder_id IN NUMBER,
1566: p_operation_seq_num IN NUMBER,
1567: p_fnd_function_name IN VARCHAR2)
1568: RETURN DATE
1569:
1570: IS
1571:
1596: l_assigned_end DATE;
1597:
1598: BEGIN
1599:
1600: IF (p_fnd_function_name = G_TECH_MYWO) THEN -- Technician.
1601: -- Get logged in user's emp ID if input employee ID is null.
1602: IF (p_employee_id IS NULL) THEN
1603: l_employee_id := AHL_PRD_WO_LOGIN_PVT.Get_Employee_ID;
1604: ELSE