DBA Data[Home] [Help]

PACKAGE: APPS.MRP_SOURCING_RULE_PVT

Source


1 PACKAGE MRP_Sourcing_Rule_PVT AUTHID CURRENT_USER AS
2 /* $Header: MRPVSRLS.pls 115.1 99/07/16 12:41:45 porting ship $ */
3 
4 --  Start of Comments
5 --  API name    Process_Sourcing_Rule
6 --  Type        Private
7 --  Function
8 --
9 --  Pre-reqs
10 --
11 --  Parameters
12 --
13 --  Version     Current version = 1.0
14 --              Initial version = 1.0
15 --
16 --  Notes
17 --
18 --  End of Comments
19 
20 PROCEDURE Process_Sourcing_Rule
21 (   p_api_version_number            IN  NUMBER
22 ,   p_init_msg_list                 IN  VARCHAR2 := FND_API.G_FALSE
23 ,   p_commit                        IN  VARCHAR2 := FND_API.G_FALSE
24 ,   p_validation_level              IN  NUMBER := FND_API.G_VALID_LEVEL_FULL
25 ,   p_control_rec                   IN  MRP_GLOBALS.Control_Rec_Type :=
26                                         MRP_GLOBALS.G_MISS_CONTROL_REC
27 ,   x_return_status                 OUT VARCHAR2
28 ,   x_msg_count                     OUT NUMBER
29 ,   x_msg_data                      OUT VARCHAR2
30 ,   p_Sourcing_Rule_rec             IN  MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
31                                         MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
32 ,   p_old_Sourcing_Rule_rec         IN  MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
33                                         MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
34 ,   p_Receiving_Org_tbl             IN  MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
35                                         MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
36 ,   p_old_Receiving_Org_tbl         IN  MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
37                                         MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
38 ,   p_Shipping_Org_tbl              IN  MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
39                                         MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
40 ,   p_old_Shipping_Org_tbl          IN  MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
41                                         MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
42 ,   x_Sourcing_Rule_rec             OUT MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
43 ,   x_Receiving_Org_tbl             OUT MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
44 ,   x_Shipping_Org_tbl              OUT MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
45 );
46 
47 --  Start of Comments
48 --  API name    Lock_Sourcing_Rule
49 --  Type        Private
50 --  Function
51 --
52 --  Pre-reqs
53 --
54 --  Parameters
55 --
56 --  Version     Current version = 1.0
57 --              Initial version = 1.0
58 --
59 --  Notes
60 --
61 --  End of Comments
62 
63 PROCEDURE Lock_Sourcing_Rule
64 (   p_api_version_number            IN  NUMBER
65 ,   p_init_msg_list                 IN  VARCHAR2 := FND_API.G_FALSE
66 ,   x_return_status                 OUT VARCHAR2
67 ,   x_msg_count                     OUT NUMBER
68 ,   x_msg_data                      OUT VARCHAR2
69 ,   p_Sourcing_Rule_rec             IN  MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type :=
70                                         MRP_Sourcing_Rule_PUB.G_MISS_SOURCING_RULE_REC
71 ,   p_Receiving_Org_tbl             IN  MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type :=
72                                         MRP_Sourcing_Rule_PUB.G_MISS_RECEIVING_ORG_TBL
73 ,   p_Shipping_Org_tbl              IN  MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type :=
74                                         MRP_Sourcing_Rule_PUB.G_MISS_SHIPPING_ORG_TBL
75 ,   x_Sourcing_Rule_rec             OUT MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
76 ,   x_Receiving_Org_tbl             OUT MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
77 ,   x_Shipping_Org_tbl              OUT MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
78 );
79 
80 --  Start of Comments
81 --  API name    Get_Sourcing_Rule
82 --  Type        Private
83 --  Function
84 --
85 --  Pre-reqs
86 --
87 --  Parameters
88 --
89 --  Version     Current version = 1.0
90 --              Initial version = 1.0
91 --
92 --  Notes
93 --
94 --  End of Comments
95 
96 PROCEDURE Get_Sourcing_Rule
97 (   p_api_version_number            IN  NUMBER
98 ,   p_init_msg_list                 IN  VARCHAR2 := FND_API.G_FALSE
99 ,   x_return_status                 OUT VARCHAR2
100 ,   x_msg_count                     OUT NUMBER
101 ,   x_msg_data                      OUT VARCHAR2
102 ,   p_Sourcing_Rule_Id              IN  NUMBER
103 ,   x_Sourcing_Rule_rec             OUT MRP_Sourcing_Rule_PUB.Sourcing_Rule_Rec_Type
104 ,   x_Receiving_Org_tbl             OUT MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
105 ,   x_Shipping_Org_tbl              OUT MRP_Sourcing_Rule_PUB.Shipping_Org_Tbl_Type
106 );
107 
108 END MRP_Sourcing_Rule_PVT;