DBA Data[Home] [Help]

APPS.AHL_PRD_WO_LOGIN_PVT dependencies on AHL_PRD_UTIL_PKG

Line 196: (l_user_role = AHL_PRD_UTIL_PKG.G_DATA_CLERK) THEN

192: -- Check if login/logout enabled.
193: l_user_role := get_user_role();
194:
195: IF (NVL(FND_PROFILE.value('AHL_MANUAL_RES_TXN'),'N') = 'Y') OR
196: (l_user_role = AHL_PRD_UTIL_PKG.G_DATA_CLERK) THEN
197: FND_MESSAGE.set_name('AHL', 'AHL_PRD_LGN_AUTOTXN_DSBLD');
198: FND_MSG_PUB.ADD;
199: RAISE FND_API.G_EXC_ERROR;
200: END IF;

Line 678: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN

674:
675: -- process for technician and transit tech roles.
676: -- Commented out user_role condn to fix bug 5015149.
677: --
678: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN
679:
680: -- Create assignment and login record.
681: -- login into a specific resource.
682: OPEN c_qualified_req(p_employee_id => p_employee_id,

Line 1016: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN

1012: RAISE FND_API.G_EXC_ERROR;
1013: END IF;
1014:
1015: -- Commented out user_role condn to fix bug 5015149.
1016: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN
1017:
1018: -- For creating assignment user needs to be qualified.
1019: -- Initialize resource assignment table index.
1020: i := 1;

Line 1308: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN

1304: RAISE FND_API.G_EXC_ERROR;
1305: END IF;
1306:
1307: -- Commented out user_role condn to fix bug 5015149.
1308: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN
1309:
1310: -- to create assignment, user needs to be qualified.
1311: -- Initialize resource assignment table index.
1312: i := 1;

Line 1571: (l_user_role = AHL_PRD_UTIL_PKG.G_DATA_CLERK) THEN

1567:
1568: /* THis validation is not needed. Data Clerk can complete WO in which case all users
1569: should be logged out
1570: IF (NVL(FND_PROFILE.value('AHL_MANUAL_RES_TXN'),'N') = 'Y') OR
1571: (l_user_role = AHL_PRD_UTIL_PKG.G_DATA_CLERK) THEN
1572: FND_MESSAGE.set_name('AHL', 'AHL_PRD_LGN_AUTOTXN_DSBLD');
1573: FND_MSG_PUB.ADD;
1574: RAISE FND_API.G_EXC_ERROR;
1575: END IF; */

Line 2064: IF AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_workorder_id => p_workorder_id,

2060: 'After check for resource login');
2061: END IF;
2062:
2063: -- Check Unit locked.
2064: IF AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_workorder_id => p_workorder_id,
2065: p_ue_id => null,
2066: p_visit_id => null,
2067: p_item_instance_id => null) = FND_API.g_true THEN
2068: -- Unit is locked, therefore cannot perform resource transactions

Line 2097: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN

2093: 'processing resource txns for RES login:Emp:WE:OP:RES' || p_employee_id || ':'|| l_wip_entity_id || ':' || l_operation_seq_num || ':' || l_resource_seq_num);
2094: END IF;
2095:
2096: -- Commented out user_role condn to fix bug 5015149.
2097: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN
2098: FOR qual_res_rec IN c_qualified_req_RES(p_employee_id, l_wip_entity_id,
2099: l_operation_seq_num, l_resource_seq_num)
2100: LOOP
2101: i := i + 1;

Line 2152: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN

2148: 'processing resource txns for OP login:Emp:WE:OP:' || p_employee_id || ':'|| l_wip_entity_id || ':' || l_operation_seq_num);
2149: END IF;
2150:
2151: -- Commented out user_role condn to fix bug 5015149.
2152: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN
2153: FOR qual_res_rec IN c_qualified_req_OP(p_employee_id, l_wip_entity_id,
2154: l_operation_seq_num)
2155: LOOP
2156: i := i + 1;

Line 2206: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN

2202: 'processing resource txns for WO login:Emp:WE:' || p_employee_id || ':'|| l_wip_entity_id );
2203: END IF;
2204:
2205: -- Commented out user_role condn to fix bug 5015149.
2206: --IF (p_user_role = ahl_prd_util_pkg.G_TECH_MYWO) THEN
2207: FOR qual_res_rec IN c_qualified_req_WO(p_employee_id, l_wip_entity_id)
2208: LOOP
2209: i := i + 1;
2210:

Line 2339: IF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_TECH_MYWO)

2335: 'At Start of procedure AHL_PRD_WO_LOGIN_PVT.Get_User_Role');
2336: END IF;
2337: --Kasridha: Added for Component Maintenance Planning
2338: -- Treat component Technician role similar to technician role
2339: IF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_TECH_MYWO)
2340: OR FND_FUNCTION.TEST(G_CMP_TECH_MYWO)) THEN
2341: -- Technician Role.
2342: l_user_role := AHL_PRD_UTIL_PKG.G_TECH_MYWO;
2343: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_DATA_CLERK)) THEN

Line 2342: l_user_role := AHL_PRD_UTIL_PKG.G_TECH_MYWO;

2338: -- Treat component Technician role similar to technician role
2339: IF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_TECH_MYWO)
2340: OR FND_FUNCTION.TEST(G_CMP_TECH_MYWO)) THEN
2341: -- Technician Role.
2342: l_user_role := AHL_PRD_UTIL_PKG.G_TECH_MYWO;
2343: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_DATA_CLERK)) THEN
2344: -- Data Clerk Role.
2345: l_user_role := AHL_PRD_UTIL_PKG.G_DATA_CLERK;
2346: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_LINE_TECH)) THEN

Line 2343: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_DATA_CLERK)) THEN

2339: IF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_TECH_MYWO)
2340: OR FND_FUNCTION.TEST(G_CMP_TECH_MYWO)) THEN
2341: -- Technician Role.
2342: l_user_role := AHL_PRD_UTIL_PKG.G_TECH_MYWO;
2343: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_DATA_CLERK)) THEN
2344: -- Data Clerk Role.
2345: l_user_role := AHL_PRD_UTIL_PKG.G_DATA_CLERK;
2346: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_LINE_TECH)) THEN
2347: -- Transit Check Role.

Line 2345: l_user_role := AHL_PRD_UTIL_PKG.G_DATA_CLERK;

2341: -- Technician Role.
2342: l_user_role := AHL_PRD_UTIL_PKG.G_TECH_MYWO;
2343: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_DATA_CLERK)) THEN
2344: -- Data Clerk Role.
2345: l_user_role := AHL_PRD_UTIL_PKG.G_DATA_CLERK;
2346: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_LINE_TECH)) THEN
2347: -- Transit Check Role.
2348: l_user_role := AHL_PRD_UTIL_PKG.G_LINE_TECH;
2349: END IF;

Line 2346: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_LINE_TECH)) THEN

2342: l_user_role := AHL_PRD_UTIL_PKG.G_TECH_MYWO;
2343: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_DATA_CLERK)) THEN
2344: -- Data Clerk Role.
2345: l_user_role := AHL_PRD_UTIL_PKG.G_DATA_CLERK;
2346: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_LINE_TECH)) THEN
2347: -- Transit Check Role.
2348: l_user_role := AHL_PRD_UTIL_PKG.G_LINE_TECH;
2349: END IF;
2350:

Line 2348: l_user_role := AHL_PRD_UTIL_PKG.G_LINE_TECH;

2344: -- Data Clerk Role.
2345: l_user_role := AHL_PRD_UTIL_PKG.G_DATA_CLERK;
2346: ELSIF (FND_FUNCTION.TEST(AHL_PRD_UTIL_PKG.G_LINE_TECH)) THEN
2347: -- Transit Check Role.
2348: l_user_role := AHL_PRD_UTIL_PKG.G_LINE_TECH;
2349: END IF;
2350:
2351: -- log debug message.
2352: IF (G_DEBUG_PROC >= G_DEBUG_LEVEL) THEN

Line 2907: (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_DATA_CLERK) THEN

2903: END IF;
2904:
2905: -- Check if login enabled.
2906: IF (NVL(FND_PROFILE.value('AHL_PRD_MANUAL_RES_TXN'),'N') = 'Y') OR
2907: (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_DATA_CLERK) THEN
2908: FND_MESSAGE.set_name('AHL', 'AHL_PRD_LGN_AUTOTXN_DSBLD');
2909: FND_MSG_PUB.ADD;
2910: Return FND_API.G_FALSE;
2911: END IF;

Line 3011: IF AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_workorder_id => p_workorder_id,

3007: 'After login check successful');
3008: END IF;
3009:
3010: -- Check Unit locked.
3011: IF AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_workorder_id => p_workorder_id,
3012: p_ue_id => null,
3013: p_visit_id => null,
3014: p_item_instance_id => null) = FND_API.g_true THEN
3015: -- Unit is locked, therefore cannot perform resource transactions

Line 3078: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN

3074: CLOSE c_check_res_reqd;
3075:
3076: -- Validate qualification to login into a WO in Technician case.
3077: -- Commented l_fnd_function_name validation to fix bug# 5015149.
3078: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN
3079: -- validate user qualifies for at least one resource requirement within each operation.
3080: FOR operation_rec IN c_get_workorder_oper(l_wip_entity_id) LOOP
3081: OPEN c_qualified_for_one_res(l_employee_id, l_wip_entity_id, operation_rec.operation_seq_num);
3082: FETCH c_qualified_for_one_res INTO l_junk;

Line 3092: -- END IF; -- l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO

3088: RETURN FND_API.G_FALSE;
3089: END IF; -- c_qualified_for_one_ops
3090: CLOSE c_qualified_for_one_res;
3091: END LOOP; -- operation_rec
3092: -- END IF; -- l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO
3093:
3094: /*
3095: -- If user qualifies for multiple resource requirements within the same operation and
3096: -- profile 'AHL_ALLOW_MULTI_RESRC_LOGIN' = 'Y then do not allow WO login.

Line 3151: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN

3147:
3148:
3149: -- Validate qualification to login into a Operation in Technician case.
3150: -- Commented l_fnd_function_name validation to fix bug# 5015149.
3151: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN
3152: -- validate user qualifies for at least one resource requirement for the operation.
3153: OPEN c_qualified_for_one_res(l_employee_id, l_wip_entity_id, p_operation_seq_num);
3154: FETCH c_qualified_for_one_res INTO l_junk;
3155: IF (c_qualified_for_one_res%NOTFOUND) THEN

Line 3164: -- END IF; -- l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO

3160: FND_MSG_PUB.ADD;
3161: RETURN FND_API.G_FALSE;
3162: END IF; -- c_qualified_for_one_res
3163: CLOSE c_qualified_for_one_res;
3164: -- END IF; -- l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO
3165:
3166: /*
3167: -- If user qualifies for multiple resource requirements within the same operation and
3168: -- profile 'AHL_ALLOW_MULTI_RESRC_LOGIN' = 'Y then do not allow WO-OP login.

Line 3226: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN

3222: CLOSE c_is_resource_valid;
3223:
3224: -- Validate qualification in case of technician.
3225: -- Commented l_fnd_function_name validation to fix bug# 5015149.
3226: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN
3227: OPEN c_qualify_res(l_employee_id, l_wip_entity_id, p_operation_seq_num,
3228: l_resource_id);
3229: FETCH c_qualify_res INTO l_junk;
3230: IF (c_qualify_res%FOUND) THEN

Line 3240: -- END IF; -- l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO

3236: FND_MSG_PUB.ADD;
3237: RETURN FND_API.G_FALSE;
3238: END IF;
3239: CLOSE c_qualify_res;
3240: -- END IF; -- l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO
3241:
3242: END IF; -- p_resource_id IS NULL
3243:
3244: END IF; -- operation_seq_num is not null.

Line 3609: IF AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_workorder_id => p_workorder_id,

3605: END IF;
3606:
3607:
3608: -- Check Unit locked.
3609: IF AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_workorder_id => p_workorder_id,
3610: p_ue_id => null,
3611: p_visit_id => null,
3612: p_item_instance_id => null) = FND_API.g_true THEN
3613: -- Unit is locked, therefore cannot perform resource transactions

Line 3643: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN

3639: CLOSE c_check_res_reqd;
3640:
3641: -- Validate qualification to login into a WO in Technician case.
3642: -- Commented l_fnd_function_name validation to fix bug# 5015149.
3643: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN
3644: -- validate user qualifies for at least one resource requirement within each operation.
3645: FOR operation_rec IN c_get_workorder_oper(l_wip_entity_id) LOOP
3646: OPEN c_qualified_for_one_res(l_employee_id, l_wip_entity_id, operation_rec.operation_seq_num);
3647: FETCH c_qualified_for_one_res INTO l_junk;

Line 3675: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN

3671:
3672: -- Login into operation only.
3673: -- Validate qualification to login into a Operation in Technician case.
3674: -- Commented l_fnd_function_name validation to fix bug# 5015149.
3675: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN
3676: -- validate user qualifies for at least one resource requirement for the operation.
3677: OPEN c_qualified_for_one_res(l_employee_id, l_wip_entity_id, p_operation_seq_num);
3678: FETCH c_qualified_for_one_res INTO l_junk;
3679: IF (c_qualified_for_one_res%NOTFOUND) THEN

Line 3709: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN

3705: CLOSE c_is_resource_valid;
3706:
3707: -- Validate qualification in case of technician.
3708: -- Commented l_fnd_function_name validation to fix bug# 5015149.
3709: -- IF (l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO) THEN
3710: OPEN c_qualify_res(l_employee_id, l_wip_entity_id, p_operation_seq_num,
3711: l_resource_id);
3712: FETCH c_qualify_res INTO l_junk;
3713: IF (c_qualify_res%FOUND) THEN

Line 3718: -- END IF; -- l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO

3714: CLOSE c_qualify_res;
3715: RETURN FND_API.G_FALSE;
3716: END IF;
3717: CLOSE c_qualify_res;
3718: -- END IF; -- l_fnd_function_name = AHL_PRD_UTIL_PKG.G_TECH_MYWO
3719:
3720: END IF; -- p_resource_id IS NULL
3721:
3722: END IF; -- operation_seq_num is not null.