DBA Data[Home] [Help]

APPS.MRP_SOURCING_RULE_PVT dependencies on MRP_GLOBALS

Line 12: , p_control_rec IN MRP_GLOBALS.Control_Rec_Type

8: -- Sourcing_Rule
9:
10: PROCEDURE Sourcing_Rule
11: ( p_validation_level IN NUMBER
12: , p_control_rec IN MRP_GLOBALS.Control_Rec_Type
13: , p_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
14: , p_old_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
15: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
16: , x_old_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type

Line 20: l_control_rec MRP_GLOBALS.Control_Rec_Type;

16: , x_old_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
17: )
18: IS
19: l_return_status VARCHAR2(1);
20: l_control_rec MRP_GLOBALS.Control_Rec_Type;
21: l_Sourcing_Rule_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type := p_Sourcing_Rule_rec;
22: -- Nocopy Change
23: l_Sourcing_Rule_out_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type ;
24: l_old_Sourcing_Rule_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type := p_old_Sourcing_Rule_rec;

Line 30: l_control_rec := MRP_GLOBALS.Init_Control_Rec

26:
27: -- Load API control record
28:
29: -- dbms_output.put_line ('Oper : ' || l_Sourcing_Rule_rec.operation);
30: l_control_rec := MRP_GLOBALS.Init_Control_Rec
31: ( p_operation => l_Sourcing_Rule_rec.operation
32: , p_control_rec => p_control_rec
33: );
34:

Line 41: IF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_CREATE THEN

37: l_Sourcing_Rule_rec.return_status := FND_API.G_RET_STS_SUCCESS;
38:
39: -- Prepare record.
40:
41: IF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_CREATE THEN
42:
43: l_Sourcing_Rule_rec.db_flag := FND_API.G_FALSE;
44:
45: -- Set missing old record elements to NULL.

Line 51: ELSIF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_UPDATE

47: l_old_Sourcing_Rule_rec :=
48: MRP_Sourcing_Rule_Util.Convert_Miss_To_Null (l_old_Sourcing_Rule_rec);
49:
50:
51: ELSIF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_UPDATE
52: OR l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_DELETE
53: THEN
54:
55: l_Sourcing_Rule_rec.db_flag := FND_API.G_TRUE;

Line 52: OR l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_DELETE

48: MRP_Sourcing_Rule_Util.Convert_Miss_To_Null (l_old_Sourcing_Rule_rec);
49:
50:
51: ELSIF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_UPDATE
52: OR l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_DELETE
53: THEN
54:
55: l_Sourcing_Rule_rec.db_flag := FND_API.G_TRUE;
56:

Line 156: IF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_DELETE THEN

152: -- Entity level validation.
153:
154: IF l_control_rec.validate_entity THEN
155:
156: IF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_DELETE THEN
157:
158: MRP_Validate_Sourcing_Rule.Entity_Delete
159: ( x_return_status => l_return_status
160: , p_Sourcing_Rule_rec => l_Sourcing_Rule_rec

Line 185: IF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_DELETE THEN

181: -- Step 4. Write to DB
182:
183: IF l_control_rec.write_to_db THEN
184:
185: IF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_DELETE THEN
186:
187: MRP_Sourcing_Rule_Handlers.Delete_Row
188: ( p_Sourcing_Rule_Id => l_Sourcing_Rule_rec.Sourcing_Rule_Id
189: );

Line 199: IF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_UPDATE THEN

195: l_Sourcing_Rule_rec.last_update_date := SYSDATE;
196: l_Sourcing_Rule_rec.last_updated_by := FND_GLOBAL.USER_ID;
197: l_Sourcing_Rule_rec.last_update_login := FND_GLOBAL.LOGIN_ID;
198:
199: IF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_UPDATE THEN
200:
201: MRP_Sourcing_Rule_Handlers.Update_Row (l_Sourcing_Rule_rec);
202:
203: ELSIF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_CREATE THEN

Line 203: ELSIF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_CREATE THEN

199: IF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_UPDATE THEN
200:
201: MRP_Sourcing_Rule_Handlers.Update_Row (l_Sourcing_Rule_rec);
202:
203: ELSIF l_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_CREATE THEN
204:
205: l_Sourcing_Rule_rec.creation_date := SYSDATE;
206: l_Sourcing_Rule_rec.created_by := FND_GLOBAL.USER_ID;
207:

Line 260: , p_control_rec IN MRP_GLOBALS.Control_Rec_Type

256: -- Receiving_Orgs
257:
258: PROCEDURE Receiving_Orgs
259: ( p_validation_level IN NUMBER
260: , p_control_rec IN MRP_GLOBALS.Control_Rec_Type
261: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
262: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
263: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
264: , x_old_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type

Line 268: l_control_rec MRP_GLOBALS.Control_Rec_Type;

264: , x_old_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
265: )
266: IS
267: l_return_status VARCHAR2(1);
268: l_control_rec MRP_GLOBALS.Control_Rec_Type;
269: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
270: l_Receiving_Org_out_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type; -- Nocopy Change
271: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
272: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;

Line 296: l_control_rec := MRP_GLOBALS.Init_Control_Rec

292: END IF;
293:
294: -- Load API control record
295:
296: l_control_rec := MRP_GLOBALS.Init_Control_Rec
297: ( p_operation => l_Receiving_Org_rec.operation
298: , p_control_rec => p_control_rec
299: );
300:

Line 307: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN

303: l_Receiving_Org_rec.return_status := FND_API.G_RET_STS_SUCCESS;
304:
305: -- Prepare record.
306:
307: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN
308:
309: l_Receiving_Org_rec.db_flag := FND_API.G_FALSE;
310:
311: -- Set missing old record elements to NULL.

Line 316: ELSIF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_UPDATE

312:
313: l_old_Receiving_Org_rec :=
314: MRP_Receiving_Org_Util.Convert_Miss_To_Null (l_old_Receiving_Org_rec);
315:
316: ELSIF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_UPDATE
317: OR l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_DELETE
318: THEN
319:
320: l_Receiving_Org_rec.db_flag := FND_API.G_TRUE;

Line 317: OR l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_DELETE

313: l_old_Receiving_Org_rec :=
314: MRP_Receiving_Org_Util.Convert_Miss_To_Null (l_old_Receiving_Org_rec);
315:
316: ELSIF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_UPDATE
317: OR l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_DELETE
318: THEN
319:
320: l_Receiving_Org_rec.db_flag := FND_API.G_TRUE;
321:

Line 419: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_DELETE THEN

415: -- Entity level validation.
416:
417: IF l_control_rec.validate_entity THEN
418:
419: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_DELETE THEN
420:
421: MRP_Validate_Receiving_Org.Entity_Delete
422: ( x_return_status => l_return_status
423: , p_Receiving_Org_rec => l_Receiving_Org_rec

Line 448: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_DELETE THEN

444: -- Step 4. Write to DB
445:
446: IF l_control_rec.write_to_db THEN
447:
448: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_DELETE THEN
449:
450: MRP_Receiving_Org_Handlers.Delete_Row
451: ( p_Sr_Receipt_Id => l_Receiving_Org_rec.Sr_Receipt_Id
452: );

Line 462: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_UPDATE THEN

458: l_Receiving_Org_rec.last_update_date := SYSDATE;
459: l_Receiving_Org_rec.last_updated_by := FND_GLOBAL.USER_ID;
460: l_Receiving_Org_rec.last_update_login := FND_GLOBAL.LOGIN_ID;
461:
462: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_UPDATE THEN
463:
464: MRP_Receiving_Org_Handlers.Update_Row (l_Receiving_Org_rec);
465:
466: ELSIF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN

Line 466: ELSIF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN

462: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_UPDATE THEN
463:
464: MRP_Receiving_Org_Handlers.Update_Row (l_Receiving_Org_rec);
465:
466: ELSIF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN
467:
468: l_Receiving_Org_rec.creation_date := SYSDATE;
469: l_Receiving_Org_rec.created_by := FND_GLOBAL.USER_ID;
470:

Line 557: , p_control_rec IN MRP_GLOBALS.Control_Rec_Type

553: -- Shipping_Orgs
554:
555: PROCEDURE Shipping_Orgs
556: ( p_validation_level IN NUMBER
557: , p_control_rec IN MRP_GLOBALS.Control_Rec_Type
558: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
559: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
560: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
561: , x_old_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type

Line 565: l_control_rec MRP_GLOBALS.Control_Rec_Type;

561: , x_old_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
562: )
563: IS
564: l_return_status VARCHAR2(1);
565: l_control_rec MRP_GLOBALS.Control_Rec_Type;
566: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
567: l_Shipping_Org_out_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type; -- Nocopy Change
568: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
569: l_old_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;

Line 593: l_control_rec := MRP_GLOBALS.Init_Control_Rec

589: END IF;
590:
591: -- Load API control record
592:
593: l_control_rec := MRP_GLOBALS.Init_Control_Rec
594: ( p_operation => l_Shipping_Org_rec.operation
595: , p_control_rec => p_control_rec
596: );
597:

Line 604: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN

600: l_Shipping_Org_rec.return_status := FND_API.G_RET_STS_SUCCESS;
601:
602: -- Prepare record.
603:
604: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN
605:
606: l_Shipping_Org_rec.db_flag := FND_API.G_FALSE;
607:
608: -- Set missing old record elements to NULL.

Line 613: ELSIF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_UPDATE

609:
610: l_old_Shipping_Org_rec :=
611: MRP_Shipping_Org_Util.Convert_Miss_To_Null (l_old_Shipping_Org_rec);
612:
613: ELSIF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_UPDATE
614: OR l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_DELETE
615: THEN
616:
617: l_Shipping_Org_rec.db_flag := FND_API.G_TRUE;

Line 614: OR l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_DELETE

610: l_old_Shipping_Org_rec :=
611: MRP_Shipping_Org_Util.Convert_Miss_To_Null (l_old_Shipping_Org_rec);
612:
613: ELSIF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_UPDATE
614: OR l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_DELETE
615: THEN
616:
617: l_Shipping_Org_rec.db_flag := FND_API.G_TRUE;
618:

Line 716: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_DELETE THEN

712: -- Entity level validation.
713:
714: IF l_control_rec.validate_entity THEN
715:
716: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_DELETE THEN
717:
718: MRP_Validate_Shipping_Org.Entity_Delete
719: ( x_return_status => l_return_status
720: , p_Shipping_Org_rec => l_Shipping_Org_rec

Line 745: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_DELETE THEN

741: -- Step 4. Write to DB
742:
743: IF l_control_rec.write_to_db THEN
744:
745: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_DELETE THEN
746:
747: MRP_Shipping_Org_Handlers.Delete_Row
748: ( p_Sr_Source_Id => l_Shipping_Org_rec.Sr_Source_Id
749: );

Line 759: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_UPDATE THEN

755: l_Shipping_Org_rec.last_update_date := SYSDATE;
756: l_Shipping_Org_rec.last_updated_by := FND_GLOBAL.USER_ID;
757: l_Shipping_Org_rec.last_update_login := FND_GLOBAL.LOGIN_ID;
758:
759: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_UPDATE THEN
760:
761: MRP_Shipping_Org_Handlers.Update_Row (l_Shipping_Org_rec);
762:
763: ELSIF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN

Line 763: ELSIF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN

759: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_UPDATE THEN
760:
761: MRP_Shipping_Org_Handlers.Update_Row (l_Shipping_Org_rec);
762:
763: ELSIF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_CREATE THEN
764:
765: l_Shipping_Org_rec.creation_date := SYSDATE;
766: l_Shipping_Org_rec.created_by := FND_GLOBAL.USER_ID;
767:

Line 870: , p_control_rec IN MRP_GLOBALS.Control_Rec_Type :=

866: ( p_api_version_number IN NUMBER
867: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
868: , p_commit IN VARCHAR2 := FND_API.G_FALSE
869: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
870: , p_control_rec IN MRP_GLOBALS.Control_Rec_Type :=
871: MRP_GLOBALS.G_MISS_CONTROL_REC
872: , x_return_status OUT NOCOPY VARCHAR2
873: , x_msg_count OUT NOCOPY NUMBER
874: , x_msg_data OUT NOCOPY VARCHAR2

Line 871: MRP_GLOBALS.G_MISS_CONTROL_REC

867: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
868: , p_commit IN VARCHAR2 := FND_API.G_FALSE
869: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
870: , p_control_rec IN MRP_GLOBALS.Control_Rec_Type :=
871: MRP_GLOBALS.G_MISS_CONTROL_REC
872: , x_return_status OUT NOCOPY VARCHAR2
873: , x_msg_count OUT NOCOPY NUMBER
874: , x_msg_data OUT NOCOPY VARCHAR2
875: , p_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=

Line 895: l_control_rec MRP_GLOBALS.Control_Rec_Type;

891: IS
892: l_api_version_number CONSTANT NUMBER := 1.0;
893: l_api_name CONSTANT VARCHAR2(30):= 'Process_Sourcing_Rule';
894: l_return_status VARCHAR2(1);
895: l_control_rec MRP_GLOBALS.Control_Rec_Type;
896: l_Sourcing_Rule_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type := p_Sourcing_Rule_rec;
897: l_Sourcing_Rule_out_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type ; -- Nocopy Change
898: l_old_Sourcing_Rule_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type := p_old_Sourcing_Rule_rec;
899: l_old_Sourcing_Rule_out_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type ; -- Nocopy Change

Line 970: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR

966:
967: -- Perform Sourcing_Rule group requests.
968:
969: IF p_control_rec.process AND
970: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR
971: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_SOURCING_RULE)
972: THEN
973:
974: NULL;

Line 971: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_SOURCING_RULE)

967: -- Perform Sourcing_Rule group requests.
968:
969: IF p_control_rec.process AND
970: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR
971: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_SOURCING_RULE)
972: THEN
973:
974: NULL;
975:

Line 984: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_CREATE

980: FOR I IN 1..l_Receiving_Org_tbl.COUNT LOOP
981:
982: l_Receiving_Org_rec := l_Receiving_Org_tbl(I);
983:
984: IF l_Receiving_Org_rec.operation = MRP_Globals.G_OPR_CREATE
985: AND (l_Receiving_Org_rec.Sourcing_Rule_Id IS NULL OR
986: l_Receiving_Org_rec.Sourcing_Rule_Id = FND_API.G_MISS_NUM)
987: THEN
988:

Line 1013: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR

1009:
1010: -- Perform Receiving_Org group requests.
1011:
1012: IF p_control_rec.process AND
1013: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR
1014: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_RECEIVING_ORG) AND
1015: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE
1016: THEN
1017:

Line 1014: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_RECEIVING_ORG) AND

1010: -- Perform Receiving_Org group requests.
1011:
1012: IF p_control_rec.process AND
1013: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR
1014: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_RECEIVING_ORG) AND
1015: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE
1016: THEN
1017:
1018: FOR I IN 1..l_Receiving_Org_tbl.COUNT LOOP

Line 1015: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE

1011:
1012: IF p_control_rec.process AND
1013: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR
1014: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_RECEIVING_ORG) AND
1015: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE
1016: THEN
1017:
1018: FOR I IN 1..l_Receiving_Org_tbl.COUNT LOOP
1019:

Line 1086: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_CREATE

1082: FOR I IN 1..l_Shipping_Org_tbl.COUNT LOOP
1083:
1084: l_Shipping_Org_rec := l_Shipping_Org_tbl(I);
1085:
1086: IF l_Shipping_Org_rec.operation = MRP_Globals.G_OPR_CREATE
1087: AND (l_Shipping_Org_rec.Sr_Receipt_Id IS NULL OR
1088: l_Shipping_Org_rec.Sr_Receipt_Id = FND_API.G_MISS_NUM)
1089: THEN
1090:

Line 1152: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR

1148: = 2 (Make At)
1149: **/
1150:
1151: IF p_control_rec.process AND
1152: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR
1153: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_SHIPPING_ORG) AND
1154: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE
1155: THEN
1156:

Line 1153: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_SHIPPING_ORG) AND

1149: **/
1150:
1151: IF p_control_rec.process AND
1152: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR
1153: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_SHIPPING_ORG) AND
1154: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE
1155: THEN
1156:
1157: l_tot_alloc_percent := 0;

Line 1154: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE

1150:
1151: IF p_control_rec.process AND
1152: (p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL OR
1153: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_SHIPPING_ORG) AND
1154: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE
1155: THEN
1156:
1157: l_tot_alloc_percent := 0;
1158: l_curr_rco_index := 0;

Line 1340: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL AND

1336:
1337: -- Step 6. Perform Object group logic
1338:
1339: IF p_control_rec.process AND
1340: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL AND
1341: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE
1342: THEN
1343:
1344: -- Every sourcing rule should have at least one receiving org

Line 1341: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE

1337: -- Step 6. Perform Object group logic
1338:
1339: IF p_control_rec.process AND
1340: p_control_rec.process_entity = MRP_GLOBALS.G_ENTITY_ALL AND
1341: l_sourcing_rule_rec.operation <> MRP_GLOBALS.G_OPR_DELETE
1342: THEN
1343:
1344: -- Every sourcing rule should have at least one receiving org
1345: -- and every receiving org should have at least one source org

Line 1547: IF p_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_LOCK THEN

1543: SAVEPOINT Lock_Sourcing_Rule_PVT;
1544:
1545: -- Lock Sourcing_Rule
1546:
1547: IF p_Sourcing_Rule_rec.operation = MRP_Globals.G_OPR_LOCK THEN
1548:
1549: MRP_Sourcing_Rule_Handlers.Lock_Row
1550: ( p_Sourcing_Rule_rec => p_Sourcing_Rule_rec
1551: , x_Sourcing_Rule_rec => x_Sourcing_Rule_rec

Line 1568: IF p_Receiving_Org_tbl(I).operation = MRP_Globals.G_OPR_LOCK THEN

1564: -- Lock Receiving_Org
1565:
1566: FOR I IN 1..p_Receiving_Org_tbl.COUNT LOOP
1567:
1568: IF p_Receiving_Org_tbl(I).operation = MRP_Globals.G_OPR_LOCK THEN
1569:
1570: MRP_Receiving_Org_Handlers.Lock_Row
1571: ( p_Receiving_Org_rec => p_Receiving_Org_tbl(I)
1572: , x_Receiving_Org_rec => l_Receiving_Org_rec

Line 1592: IF p_Shipping_Org_tbl(I).operation = MRP_Globals.G_OPR_LOCK THEN

1588: -- Lock Shipping_Org
1589:
1590: FOR I IN 1..p_Shipping_Org_tbl.COUNT LOOP
1591:
1592: IF p_Shipping_Org_tbl(I).operation = MRP_Globals.G_OPR_LOCK THEN
1593:
1594: MRP_Shipping_Org_Handlers.Lock_Row
1595: ( p_Shipping_Org_rec => p_Shipping_Org_tbl(I)
1596: , x_Shipping_Org_rec => l_Shipping_Org_rec