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
17: )
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
17: )
18: IS
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
17: )
18: IS
19: l_return_status VARCHAR2(1);
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
17: )
18: IS
19: l_return_status VARCHAR2(1);
20: l_control_rec MRP_GLOBALS.Control_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;
25: BEGIN
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;
25: BEGIN
26:
27: -- Load API control record
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;
25: BEGIN
26:
27: -- Load API control record
28:
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
265: )
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
265: )
266: IS
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
265: )
266: IS
267: l_return_status VARCHAR2(1);
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
265: )
266: IS
267: l_return_status VARCHAR2(1);
268: l_control_rec MRP_GLOBALS.Control_Rec_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;
273: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
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;
273: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
274: BEGIN
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;
273: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
274: BEGIN
275:
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;
273: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
274: BEGIN
275:
276: -- Init local table variables.
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;
273: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
274: BEGIN
275:
276: -- Init local table variables.
277:
287:
288: IF l_old_Receiving_Org_tbl.EXISTS(I) THEN
289: l_old_Receiving_Org_rec := l_old_Receiving_Org_tbl(I);
290: ELSE
291: l_old_Receiving_Org_rec := MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_REC;
292: END IF;
293:
294: -- Load API control record
295:
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
562: )
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
562: )
563: IS
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
562: )
563: IS
564: l_return_status VARCHAR2(1);
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
562: )
563: IS
564: l_return_status VARCHAR2(1);
565: l_control_rec MRP_GLOBALS.Control_Rec_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;
570: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
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;
570: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
571: BEGIN
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;
570: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
571: BEGIN
572:
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;
570: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
571: BEGIN
572:
573: -- Init local table variables.
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;
570: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
571: BEGIN
572:
573: -- Init local table variables.
574:
584:
585: IF l_old_Shipping_Org_tbl.EXISTS(I) THEN
586: l_old_Shipping_Org_rec := l_old_Shipping_Org_tbl(I);
587: ELSE
588: l_old_Shipping_Org_rec := MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_REC;
589: END IF;
590:
591: -- Load API control record
592:
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 :=
876: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
877: , p_old_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
878: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
879: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
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 :=
876: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
877: , p_old_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
878: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
879: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
880: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
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 :=
876: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
877: , p_old_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
878: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
879: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
880: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
881: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
874: , x_msg_data OUT NOCOPY VARCHAR2
875: , p_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
876: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
877: , p_old_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
878: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
879: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
880: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
881: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
882: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
875: , p_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
876: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
877: , p_old_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
878: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
879: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
880: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
881: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
882: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
883: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
876: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
877: , p_old_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
878: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
879: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
880: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
881: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
882: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
883: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
884: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
877: , p_old_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
878: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
879: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
880: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
881: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
882: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
883: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
884: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
885: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
878: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
879: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
880: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
881: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
882: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
883: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
884: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
885: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
886: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
879: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
880: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
881: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
882: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
883: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
884: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
885: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
886: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
887: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
880: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
881: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
882: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
883: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
884: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
885: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
886: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
887: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
888: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
881: , p_old_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
882: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
883: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
884: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
885: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
886: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
887: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
888: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
889: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
882: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
883: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
884: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
885: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
886: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
887: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
888: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
889: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
890: )
883: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
884: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
885: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
886: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
887: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
888: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
889: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
890: )
891: IS
884: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
885: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
886: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
887: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
888: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
889: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
890: )
891: IS
892: l_api_version_number CONSTANT NUMBER := 1.0;
885: , p_old_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
886: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
887: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
888: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
889: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
890: )
891: IS
892: l_api_version_number CONSTANT NUMBER := 1.0;
893: l_api_name CONSTANT VARCHAR2(30):= 'Process_Sourcing_Rule';
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
900: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
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
900: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
901: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
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
900: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
901: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
902: l_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
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
900: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
901: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
902: l_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
903: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_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
900: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
901: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
902: l_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
903: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
904: l_old_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
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
900: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
901: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
902: l_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
903: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
904: l_old_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
905: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
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
900: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
901: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
902: l_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
903: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
904: l_old_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
905: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
906: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
899: l_old_Sourcing_Rule_out_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type ; -- Nocopy Change
900: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
901: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
902: l_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
903: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
904: l_old_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
905: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
906: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
907: l_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; --Nocopy Change
900: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
901: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
902: l_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
903: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
904: l_old_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
905: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
906: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
907: l_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; --Nocopy Change
908: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
901: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
902: l_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
903: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
904: l_old_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
905: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
906: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
907: l_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; --Nocopy Change
908: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
909: l_old_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
902: l_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
903: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
904: l_old_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
905: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
906: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
907: l_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; --Nocopy Change
908: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
909: l_old_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
910: l_old_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; -- Nocopy Change
903: l_old_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
904: l_old_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
905: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
906: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
907: l_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; --Nocopy Change
908: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
909: l_old_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
910: l_old_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; -- Nocopy Change
911: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
904: l_old_Receiving_Org_out_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type; -- Nocopy Change
905: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
906: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
907: l_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; --Nocopy Change
908: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
909: l_old_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
910: l_old_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; -- Nocopy Change
911: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
912:
905: l_old_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
906: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
907: l_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; --Nocopy Change
908: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
909: l_old_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
910: l_old_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; -- Nocopy Change
911: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
912:
913: l_tot_alloc_percent NUMBER;
906: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
907: l_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; --Nocopy Change
908: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
909: l_old_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
910: l_old_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; -- Nocopy Change
911: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
912:
913: l_tot_alloc_percent NUMBER;
914: l_curr_rco_index NUMBER;
907: l_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; --Nocopy Change
908: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
909: l_old_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
910: l_old_Shipping_Org_out_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type; -- Nocopy Change
911: l_old_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
912:
913: l_tot_alloc_percent NUMBER;
914: l_curr_rco_index NUMBER;
915: l_curr_rank NUMBER;
1501: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1502: , x_return_status OUT NOCOPY VARCHAR2
1503: , x_msg_count OUT NOCOPY NUMBER
1504: , x_msg_data OUT NOCOPY VARCHAR2
1505: , p_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
1506: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
1507: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
1508: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
1509: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
1502: , x_return_status OUT NOCOPY VARCHAR2
1503: , x_msg_count OUT NOCOPY NUMBER
1504: , x_msg_data OUT NOCOPY VARCHAR2
1505: , p_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
1506: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
1507: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
1508: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
1509: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
1510: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
1503: , x_msg_count OUT NOCOPY NUMBER
1504: , x_msg_data OUT NOCOPY VARCHAR2
1505: , p_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
1506: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
1507: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
1508: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
1509: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
1510: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
1511: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1504: , x_msg_data OUT NOCOPY VARCHAR2
1505: , p_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
1506: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
1507: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
1508: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
1509: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
1510: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
1511: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1512: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
1505: , p_Sourcing_Rule_rec IN MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
1506: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
1507: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
1508: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
1509: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
1510: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
1511: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1512: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
1513: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
1506: MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
1507: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
1508: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
1509: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
1510: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
1511: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1512: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
1513: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
1514: )
1507: , p_Receiving_Org_tbl IN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
1508: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
1509: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
1510: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
1511: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1512: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
1513: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
1514: )
1515: IS
1508: MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
1509: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
1510: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
1511: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1512: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
1513: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
1514: )
1515: IS
1516: l_api_version_number CONSTANT NUMBER := 1.0;
1509: , p_Shipping_Org_tbl IN MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
1510: MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
1511: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1512: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
1513: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
1514: )
1515: IS
1516: l_api_version_number CONSTANT NUMBER := 1.0;
1517: l_api_name CONSTANT VARCHAR2(30):= 'Lock_Sourcing_Rule';
1515: IS
1516: l_api_version_number CONSTANT NUMBER := 1.0;
1517: l_api_name CONSTANT VARCHAR2(30):= 'Lock_Sourcing_Rule';
1518: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1519: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
1520: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
1521: BEGIN
1522:
1523: -- Standard call to check for call compatibility
1516: l_api_version_number CONSTANT NUMBER := 1.0;
1517: l_api_name CONSTANT VARCHAR2(30):= 'Lock_Sourcing_Rule';
1518: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1519: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
1520: l_Shipping_Org_rec MRP_Sourcing_Rule_PUB.Shipping_Org_Rec_Type;
1521: BEGIN
1522:
1523: -- Standard call to check for call compatibility
1524:
1700: , x_return_status OUT NOCOPY VARCHAR2
1701: , x_msg_count OUT NOCOPY NUMBER
1702: , x_msg_data OUT NOCOPY VARCHAR2
1703: , p_Sourcing_Rule_Id IN NUMBER
1704: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1705: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
1706: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
1707: )
1708: IS
1701: , x_msg_count OUT NOCOPY NUMBER
1702: , x_msg_data OUT NOCOPY VARCHAR2
1703: , p_Sourcing_Rule_Id IN NUMBER
1704: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1705: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
1706: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
1707: )
1708: IS
1709: l_api_version_number CONSTANT NUMBER := 1.0;
1702: , x_msg_data OUT NOCOPY VARCHAR2
1703: , p_Sourcing_Rule_Id IN NUMBER
1704: , x_Sourcing_Rule_rec OUT NOCOPY MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
1705: , x_Receiving_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
1706: , x_Shipping_Org_tbl OUT NOCOPY MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
1707: )
1708: IS
1709: l_api_version_number CONSTANT NUMBER := 1.0;
1710: l_api_name CONSTANT VARCHAR2(30):= 'Get_Sourcing_Rule';
1707: )
1708: IS
1709: l_api_version_number CONSTANT NUMBER := 1.0;
1710: l_api_name CONSTANT VARCHAR2(30):= 'Get_Sourcing_Rule';
1711: l_Sourcing_Rule_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type;
1712: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
1713: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
1714: l_x_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
1715: BEGIN
1708: IS
1709: l_api_version_number CONSTANT NUMBER := 1.0;
1710: l_api_name CONSTANT VARCHAR2(30):= 'Get_Sourcing_Rule';
1711: l_Sourcing_Rule_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type;
1712: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
1713: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
1714: l_x_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
1715: BEGIN
1716:
1709: l_api_version_number CONSTANT NUMBER := 1.0;
1710: l_api_name CONSTANT VARCHAR2(30):= 'Get_Sourcing_Rule';
1711: l_Sourcing_Rule_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type;
1712: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
1713: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
1714: l_x_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
1715: BEGIN
1716:
1717: -- Standard call to check for call compatibility
1710: l_api_name CONSTANT VARCHAR2(30):= 'Get_Sourcing_Rule';
1711: l_Sourcing_Rule_rec MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type;
1712: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
1713: l_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
1714: l_x_Shipping_Org_tbl MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type;
1715: BEGIN
1716:
1717: -- Standard call to check for call compatibility
1718: