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 1783: IF p_ECO_rec.transaction_type = ENG_GLOBALS.G_OPR_UPDATE

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

Line 2171: IF l_return_status = Eng_Globals.G_RECORD_FOUND AND

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

Line 2173: p_transaction_type = Eng_Globals.G_OPR_CREATE

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

Line 2183: ELSIF l_return_status = Eng_Globals.G_RECORD_FOUND AND

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

Line 2184: p_transaction_type = Eng_Globals.G_OPR_UPDATE AND

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

Line 2195: ELSIF l_return_status = Eng_Globals.G_RECORD_NOT_FOUND AND

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

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

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

Line 2208: ELSIF l_return_status = Eng_Globals.G_RECORD_NOT_FOUND AND

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

Line 2366: IF Eng_Globals.Is_Eco_Impl IS NULL AND

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

Line 2367: Eng_Globals.Is_Eco_Cancl IS NULL AND

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

Line 2368: Eng_Globals.Is_WKFL_Process IS NULL AND

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

Line 2369: Eng_Globals.Is_ECO_Access IS NULL

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

Line 2381: Eng_Globals.Set_Eco_Impl

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

Line 2385: Eng_Globals.Set_Eco_Cancl

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

Line 2389: Eng_Globals.Set_Eco_Impl

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

Line 2391: Eng_Globals.Set_Eco_Cancl

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

Line 2414: Eng_Globals.Set_WKFL_Process

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

Line 2417: Eng_Globals.Set_WKFL_Process

2413: THEN
2414: Eng_Globals.Set_WKFL_Process
2415: ( p_wkfl_process => TRUE);
2416: ELSE
2417: Eng_Globals.Set_WKFL_Process
2418: ( p_wkfl_process => FALSE);
2419: END IF;
2420:
2421:

Line 2483: IF Eng_Globals.Is_ECO_Access IS NULL

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

Line 2500: Eng_Globals.Set_Eco_Access

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

Line 2503: Eng_Globals.Set_Eco_Access

2499: --
2500: Eng_Globals.Set_Eco_Access
2501: ( p_eco_access => FALSE);
2502: ELSE
2503: Eng_Globals.Set_Eco_Access
2504: ( p_eco_access => TRUE);
2505: END IF;
2506: END IF;
2507:

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

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

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

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

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

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

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

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