[Home] [Help]
PACKAGE: APPS.MRP_SOURCING_RULE_PUB
Source
1 PACKAGE MRP_Sourcing_Rule_PUB AUTHID CURRENT_USER AS
2 /* $Header: MRPPSRLS.pls 120.1 2005/06/16 11:49:27 ichoudhu noship $ */
3
4 -- Sourcing_Rule record type
5
6 TYPE Sourcing_Rule_Rec_Type IS RECORD
7 ( Sourcing_Rule_Id NUMBER := FND_API.G_MISS_NUM
8 , Attribute1 VARCHAR2(150) := FND_API.G_MISS_CHAR
9 , Attribute10 VARCHAR2(150) := FND_API.G_MISS_CHAR
10 , Attribute11 VARCHAR2(150) := FND_API.G_MISS_CHAR
11 , Attribute12 VARCHAR2(150) := FND_API.G_MISS_CHAR
12 , Attribute13 VARCHAR2(150) := FND_API.G_MISS_CHAR
13 , Attribute14 VARCHAR2(150) := FND_API.G_MISS_CHAR
14 , Attribute15 VARCHAR2(150) := FND_API.G_MISS_CHAR
15 , Attribute2 VARCHAR2(150) := FND_API.G_MISS_CHAR
16 , Attribute3 VARCHAR2(150) := FND_API.G_MISS_CHAR
17 , Attribute4 VARCHAR2(150) := FND_API.G_MISS_CHAR
18 , Attribute5 VARCHAR2(150) := FND_API.G_MISS_CHAR
19 , Attribute6 VARCHAR2(150) := FND_API.G_MISS_CHAR
20 , Attribute7 VARCHAR2(150) := FND_API.G_MISS_CHAR
21 , Attribute8 VARCHAR2(150) := FND_API.G_MISS_CHAR
22 , Attribute9 VARCHAR2(150) := FND_API.G_MISS_CHAR
23 , Attribute_Category VARCHAR2(30) := FND_API.G_MISS_CHAR
24 , Created_By NUMBER := FND_API.G_MISS_NUM
25 , Creation_Date DATE := FND_API.G_MISS_DATE
26 , Description VARCHAR2(80) := FND_API.G_MISS_CHAR
27 , Last_Updated_By NUMBER := FND_API.G_MISS_NUM
28 , Last_Update_Date DATE := FND_API.G_MISS_DATE
29 , Last_Update_Login NUMBER := FND_API.G_MISS_NUM
30 , Organization_Id NUMBER := FND_API.G_MISS_NUM
31 , Planning_Active NUMBER := FND_API.G_MISS_NUM
32 , Program_Application_Id NUMBER := FND_API.G_MISS_NUM
33 , Program_Id NUMBER := FND_API.G_MISS_NUM
34 , Program_Update_Date DATE := FND_API.G_MISS_DATE
35 , Request_Id NUMBER := FND_API.G_MISS_NUM
36 , Sourcing_Rule_Name VARCHAR2(50) := FND_API.G_MISS_CHAR
37 , Sourcing_Rule_Type NUMBER := FND_API.G_MISS_NUM
38 , Status NUMBER := FND_API.G_MISS_NUM
39 , return_status VARCHAR2(1) := FND_API.G_MISS_CHAR
40 , db_flag VARCHAR2(1) := FND_API.G_MISS_CHAR
41 , operation VARCHAR2(30) := FND_API.G_MISS_CHAR
42 );
43
44 TYPE Sourcing_Rule_Tbl_Type IS TABLE OF Sourcing_Rule_Rec_Type
45 INDEX BY BINARY_INTEGER;
46
47 -- Sourcing_Rule value record type
48
49 TYPE Sourcing_Rule_Val_Rec_Type IS RECORD
50 ( null_element NUMBER := NULL
51 );
52
53 TYPE Sourcing_Rule_Val_Tbl_Type IS TABLE OF Sourcing_Rule_Val_Rec_Type
54 INDEX BY BINARY_INTEGER;
55
56 -- Receiving_Org record type
57
58 TYPE Receiving_Org_Rec_Type IS RECORD
59 ( Sr_Receipt_Id NUMBER := FND_API.G_MISS_NUM
60 , Attribute1 VARCHAR2(150) := FND_API.G_MISS_CHAR
61 , Attribute10 VARCHAR2(150) := FND_API.G_MISS_CHAR
62 , Attribute11 VARCHAR2(150) := FND_API.G_MISS_CHAR
63 , Attribute12 VARCHAR2(150) := FND_API.G_MISS_CHAR
64 , Attribute13 VARCHAR2(150) := FND_API.G_MISS_CHAR
65 , Attribute14 VARCHAR2(150) := FND_API.G_MISS_CHAR
66 , Attribute15 VARCHAR2(150) := FND_API.G_MISS_CHAR
67 , Attribute2 VARCHAR2(150) := FND_API.G_MISS_CHAR
68 , Attribute3 VARCHAR2(150) := FND_API.G_MISS_CHAR
69 , Attribute4 VARCHAR2(150) := FND_API.G_MISS_CHAR
70 , Attribute5 VARCHAR2(150) := FND_API.G_MISS_CHAR
71 , Attribute6 VARCHAR2(150) := FND_API.G_MISS_CHAR
72 , Attribute7 VARCHAR2(150) := FND_API.G_MISS_CHAR
73 , Attribute8 VARCHAR2(150) := FND_API.G_MISS_CHAR
74 , Attribute9 VARCHAR2(150) := FND_API.G_MISS_CHAR
75 , Attribute_Category VARCHAR2(30) := FND_API.G_MISS_CHAR
76 , Created_By NUMBER := FND_API.G_MISS_NUM
77 , Creation_Date DATE := FND_API.G_MISS_DATE
78 , Disable_Date DATE := FND_API.G_MISS_DATE
79 , Effective_Date DATE := FND_API.G_MISS_DATE
80 , Last_Updated_By NUMBER := FND_API.G_MISS_NUM
81 , Last_Update_Date DATE := FND_API.G_MISS_DATE
82 , Last_Update_Login NUMBER := FND_API.G_MISS_NUM
83 , Program_Application_Id NUMBER := FND_API.G_MISS_NUM
84 , Program_Id NUMBER := FND_API.G_MISS_NUM
85 , Program_Update_Date DATE := FND_API.G_MISS_DATE
86 , Receipt_Organization_Id NUMBER := FND_API.G_MISS_NUM
87 , Request_Id NUMBER := FND_API.G_MISS_NUM
88 , Sourcing_Rule_Id NUMBER := FND_API.G_MISS_NUM
89 , return_status VARCHAR2(1) := FND_API.G_MISS_CHAR
90 , db_flag VARCHAR2(1) := FND_API.G_MISS_CHAR
91 , operation VARCHAR2(30) := FND_API.G_MISS_CHAR
92 );
93
94 TYPE Receiving_Org_Tbl_Type IS TABLE OF Receiving_Org_Rec_Type
95 INDEX BY BINARY_INTEGER;
96
97 -- Receiving_Org value record type
98
99 TYPE Receiving_Org_Val_Rec_Type IS RECORD
100 ( null_element NUMBER := NULL
101 );
102
103 TYPE Receiving_Org_Val_Tbl_Type IS TABLE OF Receiving_Org_Val_Rec_Type
104 INDEX BY BINARY_INTEGER;
105
106 -- Shipping_Org record type
107
108 TYPE Shipping_Org_Rec_Type IS RECORD
109 ( Sr_Source_Id NUMBER := FND_API.G_MISS_NUM
110 , Allocation_Percent NUMBER := FND_API.G_MISS_NUM
111 , Attribute1 VARCHAR2(150) := FND_API.G_MISS_CHAR
112 , Attribute10 VARCHAR2(150) := FND_API.G_MISS_CHAR
113 , Attribute11 VARCHAR2(150) := FND_API.G_MISS_CHAR
114 , Attribute12 VARCHAR2(150) := FND_API.G_MISS_CHAR
115 , Attribute13 VARCHAR2(150) := FND_API.G_MISS_CHAR
116 , Attribute14 VARCHAR2(150) := FND_API.G_MISS_CHAR
117 , Attribute15 VARCHAR2(150) := FND_API.G_MISS_CHAR
118 , Attribute2 VARCHAR2(150) := FND_API.G_MISS_CHAR
119 , Attribute3 VARCHAR2(150) := FND_API.G_MISS_CHAR
120 , Attribute4 VARCHAR2(150) := FND_API.G_MISS_CHAR
121 , Attribute5 VARCHAR2(150) := FND_API.G_MISS_CHAR
122 , Attribute6 VARCHAR2(150) := FND_API.G_MISS_CHAR
123 , Attribute7 VARCHAR2(150) := FND_API.G_MISS_CHAR
124 , Attribute8 VARCHAR2(150) := FND_API.G_MISS_CHAR
125 , Attribute9 VARCHAR2(150) := FND_API.G_MISS_CHAR
126 , Attribute_Category VARCHAR2(30) := FND_API.G_MISS_CHAR
127 , Created_By NUMBER := FND_API.G_MISS_NUM
128 , Creation_Date DATE := FND_API.G_MISS_DATE
129 , Last_Updated_By NUMBER := FND_API.G_MISS_NUM
130 , Last_Update_Date DATE := FND_API.G_MISS_DATE
131 , Last_Update_Login NUMBER := FND_API.G_MISS_NUM
132 , Program_Application_Id NUMBER := FND_API.G_MISS_NUM
133 , Program_Id NUMBER := FND_API.G_MISS_NUM
134 , Program_Update_Date DATE := FND_API.G_MISS_DATE
135 , Rank NUMBER := FND_API.G_MISS_NUM
136 , Request_Id NUMBER := FND_API.G_MISS_NUM
137 , Secondary_Inventory VARCHAR2(10) := FND_API.G_MISS_CHAR
138 , Ship_Method VARCHAR2(30) := FND_API.G_MISS_CHAR
139 , Source_Organization_Id NUMBER := FND_API.G_MISS_NUM
140 , Source_Type NUMBER := FND_API.G_MISS_NUM
141 , Sr_Receipt_Id NUMBER := FND_API.G_MISS_NUM
142 , Vendor_Id NUMBER := FND_API.G_MISS_NUM
143 , Vendor_Site_Id NUMBER := FND_API.G_MISS_NUM
144 , return_status VARCHAR2(1) := FND_API.G_MISS_CHAR
145 , db_flag VARCHAR2(1) := FND_API.G_MISS_CHAR
146 , operation VARCHAR2(30) := FND_API.G_MISS_CHAR
147 , Receiving_Org_index NUMBER := FND_API.G_MISS_NUM
148 );
149
150 TYPE Shipping_Org_Tbl_Type IS TABLE OF Shipping_Org_Rec_Type
151 INDEX BY BINARY_INTEGER;
152
153 -- Shipping_Org value record type
154
155 TYPE Shipping_Org_Val_Rec_Type IS RECORD
156 ( null_element NUMBER := NULL
157 );
158
159 TYPE Shipping_Org_Val_Tbl_Type IS TABLE OF Shipping_Org_Val_Rec_Type
160 INDEX BY BINARY_INTEGER;
161
162 -- Variables representing missing records and tables
163
164 G_MISS_SOURCING_RULE_REC Sourcing_Rule_Rec_Type;
165 G_MISS_SOURCING_RULE_VAL_REC Sourcing_Rule_Val_Rec_Type;
166 G_MISS_SOURCING_RULE_TBL Sourcing_Rule_Tbl_Type;
167 G_MISS_SOURCING_RULE_VAL_TBL Sourcing_Rule_Val_Tbl_Type;
168 G_MISS_RECEIVING_ORG_REC Receiving_Org_Rec_Type;
169 G_MISS_RECEIVING_ORG_VAL_REC Receiving_Org_Val_Rec_Type;
170 G_MISS_RECEIVING_ORG_TBL Receiving_Org_Tbl_Type;
171 G_MISS_RECEIVING_ORG_VAL_TBL Receiving_Org_Val_Tbl_Type;
172 G_MISS_SHIPPING_ORG_REC Shipping_Org_Rec_Type;
173 G_MISS_SHIPPING_ORG_VAL_REC Shipping_Org_Val_Rec_Type;
174 G_MISS_SHIPPING_ORG_TBL Shipping_Org_Tbl_Type;
175 G_MISS_SHIPPING_ORG_VAL_TBL Shipping_Org_Val_Tbl_Type;
176
177 -- Start of Comments
178 -- API name Process_Sourcing_Rule
179 -- Type Public
180 -- Function
181 --
182 -- Pre-reqs
183 --
184 -- Parameters
185 --
186 -- Version Current version = 1.0
187 -- Initial version = 1.0
188 --
189 -- Notes
190 --
191 -- End of Comments
192
193 PROCEDURE Process_Sourcing_Rule
194 ( p_api_version_number IN NUMBER
195 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
196 , p_return_values IN VARCHAR2 := FND_API.G_FALSE
197 , p_commit IN VARCHAR2 := FND_API.G_FALSE
198 , x_return_status OUT NOCOPY VARCHAR2
199 , x_msg_count OUT NOCOPY NUMBER
200 , x_msg_data OUT NOCOPY VARCHAR2
201 , p_Sourcing_Rule_rec IN Sourcing_Rule_Rec_Type :=
202 G_MISS_SOURCING_RULE_REC
203 , p_Sourcing_Rule_val_rec IN Sourcing_Rule_Val_Rec_Type :=
204 G_MISS_SOURCING_RULE_VAL_REC
205 , p_Receiving_Org_tbl IN Receiving_Org_Tbl_Type :=
206 G_MISS_RECEIVING_ORG_TBL
207 , p_Receiving_Org_val_tbl IN Receiving_Org_Val_Tbl_Type :=
208 G_MISS_RECEIVING_ORG_VAL_TBL
209 , p_Shipping_Org_tbl IN Shipping_Org_Tbl_Type :=
210 G_MISS_SHIPPING_ORG_TBL
211 , p_Shipping_Org_val_tbl IN Shipping_Org_Val_Tbl_Type :=
212 G_MISS_SHIPPING_ORG_VAL_TBL
213 , x_Sourcing_Rule_rec OUT NOCOPY Sourcing_Rule_Rec_Type
214 , x_Sourcing_Rule_val_rec OUT NOCOPY Sourcing_Rule_Val_Rec_Type
215 , x_Receiving_Org_tbl OUT NOCOPY Receiving_Org_Tbl_Type
216 , x_Receiving_Org_val_tbl OUT NOCOPY Receiving_Org_Val_Tbl_Type
217 , x_Shipping_Org_tbl OUT NOCOPY Shipping_Org_Tbl_Type
218 , x_Shipping_Org_val_tbl OUT NOCOPY Shipping_Org_Val_Tbl_Type
219 );
220
221 -- Start of Comments
222 -- API name Lock_Sourcing_Rule
223 -- Type Public
224 -- Function
225 --
226 -- Pre-reqs
227 --
228 -- Parameters
229 --
230 -- Version Current version = 1.0
231 -- Initial version = 1.0
232 --
233 -- Notes
234 --
235 -- End of Comments
236
237 PROCEDURE Lock_Sourcing_Rule
238 ( p_api_version_number IN NUMBER
239 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
240 , p_return_values IN VARCHAR2 := FND_API.G_FALSE
241 , x_return_status OUT NOCOPY VARCHAR2
242 , x_msg_count OUT NOCOPY NUMBER
243 , x_msg_data OUT NOCOPY VARCHAR2
244 , p_Sourcing_Rule_rec IN Sourcing_Rule_Rec_Type :=
245 G_MISS_SOURCING_RULE_REC
246 , p_Sourcing_Rule_val_rec IN Sourcing_Rule_Val_Rec_Type :=
247 G_MISS_SOURCING_RULE_VAL_REC
248 , p_Receiving_Org_tbl IN Receiving_Org_Tbl_Type :=
249 G_MISS_RECEIVING_ORG_TBL
250 , p_Receiving_Org_val_tbl IN Receiving_Org_Val_Tbl_Type :=
251 G_MISS_RECEIVING_ORG_VAL_TBL
252 , p_Shipping_Org_tbl IN Shipping_Org_Tbl_Type :=
253 G_MISS_SHIPPING_ORG_TBL
254 , p_Shipping_Org_val_tbl IN Shipping_Org_Val_Tbl_Type :=
255 G_MISS_SHIPPING_ORG_VAL_TBL
256 , x_Sourcing_Rule_rec OUT NOCOPY Sourcing_Rule_Rec_Type
257 , x_Sourcing_Rule_val_rec OUT NOCOPY Sourcing_Rule_Val_Rec_Type
258 , x_Receiving_Org_tbl OUT NOCOPY Receiving_Org_Tbl_Type
259 , x_Receiving_Org_val_tbl OUT NOCOPY Receiving_Org_Val_Tbl_Type
260 , x_Shipping_Org_tbl OUT NOCOPY Shipping_Org_Tbl_Type
261 , x_Shipping_Org_val_tbl OUT NOCOPY Shipping_Org_Val_Tbl_Type
262 );
263
264 -- Start of Comments
265 -- API name Get_Sourcing_Rule
266 -- Type Public
267 -- Function
268 --
269 -- Pre-reqs
270 --
271 -- Parameters
272 --
273 -- Version Current version = 1.0
274 -- Initial version = 1.0
275 --
276 -- Notes
277 --
278 -- End of Comments
279
280 PROCEDURE Get_Sourcing_Rule
281 ( p_api_version_number IN NUMBER
282 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
283 , p_return_values IN VARCHAR2 := FND_API.G_FALSE
284 , x_return_status OUT NOCOPY VARCHAR2
285 , x_msg_count OUT NOCOPY NUMBER
286 , x_msg_data OUT NOCOPY VARCHAR2
287 , p_Sourcing_Rule_Id IN NUMBER :=
288 FND_API.G_MISS_NUM
289 , x_Sourcing_Rule_rec OUT NOCOPY Sourcing_Rule_Rec_Type
290 , x_Sourcing_Rule_val_rec OUT NOCOPY Sourcing_Rule_Val_Rec_Type
291 , x_Receiving_Org_tbl OUT NOCOPY Receiving_Org_Tbl_Type
292 , x_Receiving_Org_val_tbl OUT NOCOPY Receiving_Org_Val_Tbl_Type
293 , x_Shipping_Org_tbl OUT NOCOPY Shipping_Org_Tbl_Type
294 , x_Shipping_Org_val_tbl OUT NOCOPY Shipping_Org_Val_Tbl_Type
295 );
296
297 END MRP_Sourcing_Rule_PUB;