DBA Data[Home] [Help]

APPS.ENG_VALIDATE_ECO dependencies on ENG_GLOBALS

Line 189: l_assembly_type := ENG_Globals.Get_ECO_Assembly_Type ( p_change_notice => p_change_notice

185: and organization_id = organization_id)
186: AND organization_id = p_organization_id
187: AND eng_item_flag = 'Y';
188: BEGIN
189: l_assembly_type := ENG_Globals.Get_ECO_Assembly_Type ( p_change_notice => p_change_notice
190: , p_organization_id => p_organization_id
191: );
192: select assembly_type
193: into l_new_assembly_type

Line 265: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_DELETE AND

261: END LOOP;
262:
263: -- ECO cannot be deleted if revised items exist
264:
265: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_DELETE AND
266: (l_ri_exists = 1 OR p_unexp_eco_rec.approval_status_type in (2,3,5))
267: THEN
268: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
269: THEN

Line 532: ENG_GLOBALS.Init_Process_Name

528:
529: -- Get Workflow Process name
530:
531: stmt_num := 1;
532: ENG_GLOBALS.Init_Process_Name
533: ( p_change_order_type_id => p_unexp_ECO_rec.change_order_type_id
534: , p_priority_code => p_ECO_rec.priority_code
535: , p_organization_id => p_unexp_ECO_rec.organization_id
536: );

Line 538: l_process_name := ENG_Globals.Get_Process_Name;

534: , p_priority_code => p_ECO_rec.priority_code
535: , p_organization_id => p_unexp_ECO_rec.organization_id
536: );
537:
538: l_process_name := ENG_Globals.Get_Process_Name;
539:
540: --
541: -- Check required attributes.
542: --

Line 572: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_DELETE AND

568:
569:
570: -- ECO cannot be deleted if revised items/change line/change revision exist (irrespective of the CO status).
571:
572: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_DELETE AND
573: l_ri_exists = 1
574: THEN
575: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
576: THEN

Line 588: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_DELETE AND

584: l_return_status := FND_API.G_RET_STS_ERROR;
585: END IF;
586:
587: --Bug 2921474
588: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_DELETE AND
589: l_cl_exists =1
590: THEN
591: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
592: THEN

Line 604: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_DELETE AND

600: l_return_status := FND_API.G_RET_STS_ERROR;
601: END IF;
602:
603:
604: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_DELETE AND
605: l_er_exists =1
606: THEN
607: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
608: THEN

Line 626: p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_CREATE

622: -- Put in for fix to bug 622498
623: -- Creates of records marked Cancelled are not allowed
624:
625: IF p_Unexp_ECO_rec.status_type = 5 AND
626: p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_CREATE
627: THEN
628: l_Token_Tbl(2).token_name := 'STATUS_TYPE';
629: l_Token_Tbl(2).token_value := p_Unexp_ECO_rec.status_type;
630:

Line 651: p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE

647: -- un-implemented revised component in other ECO
648: --
649:
650: IF p_Unexp_ECO_rec.status_type = 5 AND
651: p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE
652: THEN
653:
654: IF NOT Check_Ref_Rev_Comp_For_ECO( p_eco_name => p_eco_rec.ECO_Name
655: , p_organization_id => p_unexp_ECO_rec.organization_id

Line 779: (p_ECO_rec.Transaction_Type = ENG_GLOBALS.G_OPR_UPDATE AND

775:
776: -- Approval list must not be changed if Approval Requested
777:
778: IF p_old_Unexp_ECO_rec.approval_status_type = 3 AND
779: (p_ECO_rec.Transaction_Type = ENG_GLOBALS.G_OPR_UPDATE AND
780: NVL(p_Unexp_ECO_rec.approval_list_id, 0) <> NVL(p_old_Unexp_ECO_rec.approval_list_id, 0))
781: THEN
782: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
783: THEN

Line 798: (p_ECO_rec.Transaction_Type = ENG_GLOBALS.G_OPR_UPDATE AND

794: -- Status Type must not be changed if Approval Requested
795: -- FROM ENGFMECO.pld (Procedure Initialize_Row)
796:
797: IF p_old_Unexp_ECO_rec.approval_status_type = 3 AND
798: (p_ECO_rec.Transaction_Type = ENG_GLOBALS.G_OPR_UPDATE AND
799: p_Unexp_ECO_rec.status_type <> p_old_Unexp_ECO_rec.status_type)
800: THEN
801: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
802: THEN

Line 826: (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_CREATE

822: -- Approval status must not be Approval Requested, Rejected, Approved,
823: -- or Processing Error
824:
825: IF p_control_rec.caller_type <> 'FORM' AND
826: (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_CREATE
827: OR
828: (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE AND
829: p_Unexp_ECO_rec.approval_status_type <> p_old_Unexp_ECO_rec.approval_status_type))
830: AND

Line 828: (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE AND

824:
825: IF p_control_rec.caller_type <> 'FORM' AND
826: (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_CREATE
827: OR
828: (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE AND
829: p_Unexp_ECO_rec.approval_status_type <> p_old_Unexp_ECO_rec.approval_status_type))
830: AND
831: p_Unexp_ECO_rec.approval_status_type IN (2,3,4,5,7)
832: THEN

Line 849: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE AND

845: END IF;
846:
847: -- Cannot update status to 'Scheduled'
848:
849: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE AND
850: p_Unexp_ECO_rec.status_type <> p_old_Unexp_ECO_rec.status_type AND
851: p_Unexp_ECO_rec.status_type = 4
852: THEN
853: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 866: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE AND

862: END IF;
863:
864: -- Cannot update priority if the ECO or any of its revised items have been scheduled
865:
866: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE AND
867: NVL(p_ECO_rec.priority_code, 'NONE') <> NVL(p_old_ECO_rec.priority_code, 'NONE') AND
868: (p_old_Unexp_ECO_rec.status_type = 4
869: OR l_ri_sched_exists = 1)
870: THEN

Line 908: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE

904: END IF;
905: l_return_status := FND_API.G_RET_STS_ERROR;
906: END IF;
907:
908: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE
909: AND
910: NVL(p_Unexp_ECO_rec.change_order_type_id, 0) <> p_old_Unexp_ECO_rec.change_order_type_id
911: THEN
912:

Line 948: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE

944: /* Added by MK on 11/29/00 Bug #1508078
945: -- Entity validation for hierarchy_flag and organization_hierarchy
946: -- If approval_status_type is 5:Approved, these columns are not updatable
947: */
948: IF p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE
949: -- AND p_ECO_rec.approval_status_type = 5
950: AND ( --NVL(p_ECO_rec.hierarchy_flag, 2) <> NVL(p_old_ECO_rec.hierarchy_flag,2) OR
951: NVL(p_ECO_rec.organization_hierarchy, FND_API.G_MISS_CHAR) <>
952: NVL(p_old_ECO_rec.organization_hierarchy, FND_API.G_MISS_CHAR)

Line 970: AND ( p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_CREATE

966:
967: END IF ;
968:
969: IF p_ECO_rec.organization_hierarchy IS NOT NULL
970: AND ( p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_CREATE
971: OR (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE
972: AND NVL(p_ECO_rec.organization_hierarchy, FND_API.G_MISS_CHAR) <>
973: NVL(p_old_ECO_rec.organization_hierarchy, FND_API.G_MISS_CHAR)
974: )

Line 971: OR (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE

967: END IF ;
968:
969: IF p_ECO_rec.organization_hierarchy IS NOT NULL
970: AND ( p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_CREATE
971: OR (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE
972: AND NVL(p_ECO_rec.organization_hierarchy, FND_API.G_MISS_CHAR) <>
973: NVL(p_old_ECO_rec.organization_hierarchy, FND_API.G_MISS_CHAR)
974: )
975: )

Line 997: IF (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE

993:
994: -- Eng Change New Validations for Change Mgmt Type and Assignee
995:
996: -- Change Mgmt Type can not be changed thr BO
997: IF (p_ECO_rec.Transaction_Type = ENG_Globals.G_OPR_UPDATE
998: AND NVL(p_Unexp_ECO_rec.Change_Mgmt_Type_Code, FND_API.G_MISS_CHAR) <>
999: NVL(p_old_Unexp_ECO_rec.Change_Mgmt_Type_Code, FND_API.G_MISS_CHAR)
1000: )
1001: THEN

Line 1024: IF p_ECO_rec.transaction_type = Eng_Globals.G_OPR_CREATE

1020:
1021: END IF ;
1022:
1023: /* commented as assignee_role_id ,requestor_role_id don't exist in ENG_CHANGE_ORDER_TYPES table
1024: IF p_ECO_rec.transaction_type = Eng_Globals.G_OPR_CREATE
1025: THEN
1026:
1027: IF p_Unexp_ECO_Rec.Requestor_Id IS NULL AND p_Unexp_ECO_Rec.Assignee_Id IS NULL
1028: THEN

Line 1780: IF p_ECO_rec.transaction_type = ENG_GLOBALS.G_OPR_UPDATE

1776: -- Hence following logic is commented out.
1777: -- Set 2:No to hierarchy_flag in Entity Defaulting
1778: -- when hierarchy_flag = FND_API.G_MISS_NUM
1779: --
1780: IF p_ECO_rec.transaction_type = ENG_GLOBALS.G_OPR_UPDATE
1781: THEN
1782: IF p_ECO_rec.hierarchy_flag = FND_API.G_MISS_NUM
1783: THEN
1784: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 2168: IF l_return_status = Eng_Globals.G_RECORD_FOUND AND

2164: , x_return_status => l_return_status
2165: , x_err_text => l_err_text
2166: );
2167:
2168: IF l_return_status = Eng_Globals.G_RECORD_FOUND AND
2169: p_calling_entity = 'ECO' AND
2170: p_transaction_type = Eng_Globals.G_OPR_CREATE
2171: THEN
2172: l_return_status := FND_API.G_RET_STS_ERROR;

Line 2170: p_transaction_type = Eng_Globals.G_OPR_CREATE

2166: );
2167:
2168: IF l_return_status = Eng_Globals.G_RECORD_FOUND AND
2169: p_calling_entity = 'ECO' AND
2170: p_transaction_type = Eng_Globals.G_OPR_CREATE
2171: THEN
2172: l_return_status := FND_API.G_RET_STS_ERROR;
2173: Error_Handler.Add_Error_Token
2174: ( p_Message_Name => 'ENG_ECO_ALREADY_EXISTS'

Line 2180: ELSIF l_return_status = Eng_Globals.G_RECORD_FOUND AND

2176: , x_Mesg_Token_Tbl => l_mesg_token_tbl
2177: , p_Token_Tbl => l_token_tbl
2178: );
2179: /* Commenting the following Code for Bug 3127841 as per Mani's suggestion
2180: ELSIF l_return_status = Eng_Globals.G_RECORD_FOUND AND
2181: p_transaction_type = Eng_Globals.G_OPR_UPDATE AND
2182: x_eco_unexp_rec.approval_status_type in (3, 5) -- approved or approval requested
2183: THEN
2184: l_return_status := FND_API.G_RET_STS_ERROR;

Line 2181: p_transaction_type = Eng_Globals.G_OPR_UPDATE AND

2177: , p_Token_Tbl => l_token_tbl
2178: );
2179: /* Commenting the following Code for Bug 3127841 as per Mani's suggestion
2180: ELSIF l_return_status = Eng_Globals.G_RECORD_FOUND AND
2181: p_transaction_type = Eng_Globals.G_OPR_UPDATE AND
2182: x_eco_unexp_rec.approval_status_type in (3, 5) -- approved or approval requested
2183: THEN
2184: l_return_status := FND_API.G_RET_STS_ERROR;
2185: Error_Handler.Add_Error_Token

Line 2192: ELSIF l_return_status = Eng_Globals.G_RECORD_NOT_FOUND AND

2188: , x_Mesg_Token_Tbl => l_mesg_token_tbl
2189: , p_Token_Tbl => l_token_tbl
2190: );
2191: */
2192: ELSIF l_return_status = Eng_Globals.G_RECORD_NOT_FOUND AND
2193: p_calling_entity = 'ECO' AND
2194: p_transaction_type IN
2195: ( Eng_Globals.G_OPR_UPDATE, Eng_Globals.G_OPR_DELETE)
2196: THEN

Line 2195: ( Eng_Globals.G_OPR_UPDATE, Eng_Globals.G_OPR_DELETE)

2191: */
2192: ELSIF l_return_status = Eng_Globals.G_RECORD_NOT_FOUND AND
2193: p_calling_entity = 'ECO' AND
2194: p_transaction_type IN
2195: ( Eng_Globals.G_OPR_UPDATE, Eng_Globals.G_OPR_DELETE)
2196: THEN
2197: l_return_status := FND_API.G_RET_STS_ERROR;
2198: Error_Handler.Add_Error_Token
2199: ( p_Message_Name => 'ENG_ECO_DOES_NOT_EXIST'

Line 2205: ELSIF l_return_status = Eng_Globals.G_RECORD_NOT_FOUND AND

2201: , x_Mesg_Token_Tbl => l_mesg_token_tbl
2202: , p_Token_Tbl => l_token_tbl
2203: );
2204:
2205: ELSIF l_return_status = Eng_Globals.G_RECORD_NOT_FOUND AND
2206: p_calling_entity = 'CHILD'
2207: THEN
2208: l_return_status := FND_API.G_RET_STS_ERROR;
2209:

Line 2363: IF Eng_Globals.Is_Eco_Impl IS NULL AND

2359: l_Token_Tbl(1).token_value := p_change_notice;
2360: --
2361: -- Check that the ECO is not Implemented or Cancelled.
2362: --
2363: IF Eng_Globals.Is_Eco_Impl IS NULL AND
2364: Eng_Globals.Is_Eco_Cancl IS NULL AND
2365: Eng_Globals.Is_WKFL_Process IS NULL AND
2366: Eng_Globals.Is_ECO_Access IS NULL
2367: THEN

Line 2364: Eng_Globals.Is_Eco_Cancl IS NULL AND

2360: --
2361: -- Check that the ECO is not Implemented or Cancelled.
2362: --
2363: IF Eng_Globals.Is_Eco_Impl IS NULL AND
2364: Eng_Globals.Is_Eco_Cancl IS NULL AND
2365: Eng_Globals.Is_WKFL_Process IS NULL AND
2366: Eng_Globals.Is_ECO_Access IS NULL
2367: THEN
2368: FOR ECO IN c_CheckECO

Line 2365: Eng_Globals.Is_WKFL_Process IS NULL AND

2361: -- Check that the ECO is not Implemented or Cancelled.
2362: --
2363: IF Eng_Globals.Is_Eco_Impl IS NULL AND
2364: Eng_Globals.Is_Eco_Cancl IS NULL AND
2365: Eng_Globals.Is_WKFL_Process IS NULL AND
2366: Eng_Globals.Is_ECO_Access IS NULL
2367: THEN
2368: FOR ECO IN c_CheckECO
2369: LOOP

Line 2366: Eng_Globals.Is_ECO_Access IS NULL

2362: --
2363: IF Eng_Globals.Is_Eco_Impl IS NULL AND
2364: Eng_Globals.Is_Eco_Cancl IS NULL AND
2365: Eng_Globals.Is_WKFL_Process IS NULL AND
2366: Eng_Globals.Is_ECO_Access IS NULL
2367: THEN
2368: FOR ECO IN c_CheckECO
2369: LOOP
2370: IF p_change_order_type_id IS NULL

Line 2378: Eng_Globals.Set_Eco_Impl

2374: END IF;
2375:
2376: IF ECO.status_type = 6
2377: THEN
2378: Eng_Globals.Set_Eco_Impl
2379: ( p_eco_impl => TRUE);
2380: ELSIF ECO.status_type = 5
2381: THEN
2382: Eng_Globals.Set_Eco_Cancl

Line 2382: Eng_Globals.Set_Eco_Cancl

2378: Eng_Globals.Set_Eco_Impl
2379: ( p_eco_impl => TRUE);
2380: ELSIF ECO.status_type = 5
2381: THEN
2382: Eng_Globals.Set_Eco_Cancl
2383: ( p_eco_cancl => TRUE);
2384: ELSIF ECO.status_type NOT IN (5,6)
2385: THEN
2386: Eng_Globals.Set_Eco_Impl

Line 2386: Eng_Globals.Set_Eco_Impl

2382: Eng_Globals.Set_Eco_Cancl
2383: ( p_eco_cancl => TRUE);
2384: ELSIF ECO.status_type NOT IN (5,6)
2385: THEN
2386: Eng_Globals.Set_Eco_Impl
2387: ( p_eco_impl => FALSE);
2388: Eng_Globals.Set_Eco_Cancl
2389: ( p_eco_cancl => FALSE);
2390:

Line 2388: Eng_Globals.Set_Eco_Cancl

2384: ELSIF ECO.status_type NOT IN (5,6)
2385: THEN
2386: Eng_Globals.Set_Eco_Impl
2387: ( p_eco_impl => FALSE);
2388: Eng_Globals.Set_Eco_Cancl
2389: ( p_eco_cancl => FALSE);
2390:
2391: --
2392: -- Check if the ECO has a process

Line 2411: Eng_Globals.Set_WKFL_Process

2407:
2408: IF l_ProcessExists AND
2409: ECO.approval_status_type = 3
2410: THEN
2411: Eng_Globals.Set_WKFL_Process
2412: ( p_wkfl_process => TRUE);
2413: ELSE
2414: Eng_Globals.Set_WKFL_Process
2415: ( p_wkfl_process => FALSE);

Line 2414: Eng_Globals.Set_WKFL_Process

2410: THEN
2411: Eng_Globals.Set_WKFL_Process
2412: ( p_wkfl_process => TRUE);
2413: ELSE
2414: Eng_Globals.Set_WKFL_Process
2415: ( p_wkfl_process => FALSE);
2416: END IF;
2417:
2418:

Line 2480: IF Eng_Globals.Is_ECO_Access IS NULL

2476: -- Access is NO, then the user cannot access this
2477: -- ECO.
2478: --
2479: *****************************************************/
2480: IF Eng_Globals.Is_ECO_Access IS NULL
2481: THEN
2482: SELECT assembly_type
2483: INTO l_change_order_assembly_Type
2484: FROM eng_change_order_types

Line 2497: Eng_Globals.Set_Eco_Access

2493: THEN
2494: --
2495: -- User does not have access.
2496: --
2497: Eng_Globals.Set_Eco_Access
2498: ( p_eco_access => FALSE);
2499: ELSE
2500: Eng_Globals.Set_Eco_Access
2501: ( p_eco_access => TRUE);

Line 2500: Eng_Globals.Set_Eco_Access

2496: --
2497: Eng_Globals.Set_Eco_Access
2498: ( p_eco_access => FALSE);
2499: ELSE
2500: Eng_Globals.Set_Eco_Access
2501: ( p_eco_access => TRUE);
2502: END IF;
2503: END IF;
2504:

Line 2505: IF NVL(Eng_Globals.Is_Eco_Impl, FALSE) = TRUE

2501: ( p_eco_access => TRUE);
2502: END IF;
2503: END IF;
2504:
2505: IF NVL(Eng_Globals.Is_Eco_Impl, FALSE) = TRUE
2506: THEN
2507: l_return_status := FND_API.G_RET_STS_ERROR;
2508: Error_Handler.Add_Error_Token
2509: ( p_Message_Name => 'ENG_ECO_IMPLEMENTED'

Line 2514: ELSIF NVL(Eng_Globals.Is_Eco_Cancl, FALSE) = TRUE

2510: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2511: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2512: , p_Token_Tbl => l_Token_Tbl
2513: );
2514: ELSIF NVL(Eng_Globals.Is_Eco_Cancl, FALSE) = TRUE
2515: THEN
2516: l_return_status := FND_API.G_RET_STS_ERROR;
2517: Error_Handler.Add_Error_Token
2518: ( p_Message_Name => 'ENG_ECO_CANCELLED'

Line 2523: ELSIF NVL(Eng_Globals.Is_WKFL_Process, FALSE) = TRUE

2519: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2520: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2521: , p_Token_Tbl => l_Token_Tbl
2522: );
2523: ELSIF NVL(Eng_Globals.Is_WKFL_Process, FALSE) = TRUE
2524: THEN
2525: l_return_status := FND_API.G_RET_STS_ERROR;
2526: Error_Handler.Add_Error_Token
2527: ( p_Message_Name => 'ENG_ECO_WKFL_EXISTS'

Line 2532: ELSIF NVL(Eng_Globals.Is_Eco_Access, TRUE) = FALSE

2528: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2529: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2530: , p_Token_Tbl => l_Token_Tbl
2531: );
2532: ELSIF NVL(Eng_Globals.Is_Eco_Access, TRUE) = FALSE
2533: THEN
2534: l_return_status := FND_API.G_RET_STS_ERROR;
2535: l_token_tbl(2).token_name := 'CHANGE_TYPE_CODE';
2536: l_token_tbl(2).token_value := p_change_type_code;