[Home] [Help]
PACKAGE BODY: APPS.MTL_LOT_NUMBERS_PKG
Source
1 PACKAGE BODY MTL_LOT_NUMBERS_PKG as
2 /* $Header: INVTDILB.pls 120.1.12010000.3 2008/11/04 08:48:49 ksivasa ship $ */
3
4
5 PROCEDURE Lock_Row(X_Rowid VARCHAR2,
6
7 X_Inventory_Item_Id NUMBER,
8 X_Organization_Id NUMBER,
9 X_Lot_Number VARCHAR2,
10 X_Expiration_Date DATE,
11 X_Disable_Flag NUMBER,
12 X_Attribute_Category VARCHAR2,
13 X_Attribute1 VARCHAR2,
14 X_Attribute2 VARCHAR2,
15 X_Attribute3 VARCHAR2,
16 X_Attribute4 VARCHAR2,
17 X_Attribute5 VARCHAR2,
18 X_Attribute6 VARCHAR2,
19 X_Attribute7 VARCHAR2,
20 X_Attribute8 VARCHAR2,
21 X_Attribute9 VARCHAR2,
22 X_Attribute10 VARCHAR2,
23 X_Attribute11 VARCHAR2,
24 X_Attribute12 VARCHAR2,
25 X_Attribute13 VARCHAR2,
26 X_Attribute14 VARCHAR2,
27 X_Attribute15 VARCHAR2,
28 X_Status_ID NUMBER,
29 X_Description VARCHAR2,
30 X_Vendor_Id NUMBER,
31 X_Grade_Code VARCHAR2,
32 X_Origination_Date DATE,
33 X_Date_Code VARCHAR2,
34 X_Change_Date DATE,
35 X_Age NUMBER,
36 X_Retest_Date DATE,
37 X_Maturity_Date DATE,
38 X_Lot_Attribute_Category VARCHAR2,
39 X_Item_Size NUMBER,
40 X_Color VARCHAR2,
41 X_Volume NUMBER,
42 X_Volume_UOM VARCHAR2,
43 X_Place_of_Origin VARCHAR2,
44 X_Best_by_Date DATE,
45 X_Length NUMBER,
46 X_Length_UOM VARCHAR2,
47 X_Recycled_Content NUMBER,
48 X_Thickness NUMBER,
49 X_Thickness_UOM VARCHAR2,
50 X_Width NUMBER,
51 X_Width_UOM VARCHAR2,
52 X_Curl_Wrinkle_Fold VARCHAR2,
53 X_C_Attribute1 VARCHAR2,
54 X_C_Attribute2 VARCHAR2,
55 X_C_Attribute3 VARCHAR2,
56 X_C_Attribute4 VARCHAR2,
57 X_C_Attribute5 VARCHAR2,
58 X_C_Attribute6 VARCHAR2,
59 X_C_Attribute7 VARCHAR2,
60 X_C_Attribute8 VARCHAR2,
61 X_C_Attribute9 VARCHAR2,
62 X_C_Attribute10 VARCHAR2,
63 X_C_Attribute11 VARCHAR2,
64 X_C_Attribute12 VARCHAR2,
65 X_C_Attribute13 VARCHAR2,
66 X_C_Attribute14 VARCHAR2,
67 X_C_Attribute15 VARCHAR2,
68 X_C_Attribute16 VARCHAR2,
69 X_C_Attribute17 VARCHAR2,
70 X_C_Attribute18 VARCHAR2,
71 X_C_Attribute19 VARCHAR2,
72 X_C_Attribute20 VARCHAR2,
73 X_D_Attribute1 DATE,
74 X_D_Attribute2 DATE,
75 X_D_Attribute3 DATE,
76 X_D_Attribute4 DATE,
77 X_D_Attribute5 DATE,
78 X_D_Attribute6 DATE,
79 X_D_Attribute7 DATE,
80 X_D_Attribute8 DATE,
81 X_D_Attribute9 DATE,
82 X_D_Attribute10 DATE,
83 X_N_Attribute1 NUMBER,
84 X_N_Attribute2 NUMBER,
85 X_N_Attribute3 NUMBER,
86 X_N_Attribute4 NUMBER,
87 X_N_Attribute5 NUMBER,
88 X_N_Attribute6 NUMBER,
89 X_N_Attribute7 NUMBER,
90 X_N_Attribute8 NUMBER,
91 X_N_Attribute10 NUMBER,
92 X_Supplier_Lot_Number VARCHAR2,
93 X_N_Attribute9 NUMBER,
94 X_Territory_Code VARCHAR2,
95 X_Parent_Lot_Number VARCHAR2,
96 X_Origination_Type NUMBER,
97 X_Expiration_Action_Date DATE,
98 X_Expiration_Action_Code VARCHAR2,
99 X_Hold_Date DATE
100
101 ) IS
102 CURSOR C IS
103 SELECT *
104 FROM mtl_lot_numbers
105 WHERE rowid = X_Rowid
106 FOR UPDATE of Organization_Id NOWAIT;
107 Recinfo C%ROWTYPE;
108
109
110 BEGIN
111 OPEN C;
112 FETCH C INTO Recinfo;
113 if (C%NOTFOUND) then
114 CLOSE C;
115 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
116 APP_EXCEPTION.Raise_Exception;
117 end if;
118 CLOSE C;
119 if (
120
121 (Recinfo.inventory_item_id = X_Inventory_Item_Id)
122 AND (Recinfo.organization_id = X_Organization_Id)
123 AND (Recinfo.lot_number = X_Lot_Number)
124 AND ( (Recinfo.expiration_date = X_Expiration_Date)
125 OR ( (Recinfo.expiration_date IS NULL)
126 AND (X_Expiration_Date IS NULL)))
127 AND ( (Recinfo.disable_flag = X_Disable_Flag)
128 OR ( (Recinfo.disable_flag IS NULL)
129 AND (X_Disable_Flag IS NULL)))
130 AND ( (Recinfo.attribute_category = X_Attribute_Category)
131 OR ( (Recinfo.attribute_category IS NULL)
132 AND (X_Attribute_Category IS NULL)))
133 AND ( (Recinfo.attribute1 = X_Attribute1)
134 OR ( (Recinfo.attribute1 IS NULL)
135 AND (X_Attribute1 IS NULL)))
136 AND ( (Recinfo.attribute2 = X_Attribute2)
137 OR ( (Recinfo.attribute2 IS NULL)
138 AND (X_Attribute2 IS NULL)))
139 AND ( (Recinfo.attribute3 = X_Attribute3)
140 OR ( (Recinfo.attribute3 IS NULL)
141 AND (X_Attribute3 IS NULL)))
142 AND ( (Recinfo.attribute4 = X_Attribute4)
143 OR ( (Recinfo.attribute4 IS NULL)
144 AND (X_Attribute4 IS NULL)))
145 AND ( (Recinfo.attribute5 = X_Attribute5)
146 OR ( (Recinfo.attribute5 IS NULL)
147 AND (X_Attribute5 IS NULL)))
148 AND ( (Recinfo.attribute6 = X_Attribute6)
149 OR ( (Recinfo.attribute6 IS NULL)
150 AND (X_Attribute6 IS NULL)))
151 AND ( (Recinfo.attribute7 = X_Attribute7)
152 OR ( (Recinfo.attribute7 IS NULL)
153 AND (X_Attribute7 IS NULL)))
154 AND ( (Recinfo.attribute8 = X_Attribute8)
155 OR ( (Recinfo.attribute8 IS NULL)
156 AND (X_Attribute8 IS NULL)))
157 AND ( (Recinfo.attribute9 = X_Attribute9)
158 OR ( (Recinfo.attribute9 IS NULL)
159 AND (X_Attribute9 IS NULL)))
160 AND ( (Recinfo.attribute10 = X_Attribute10)
161 OR ( (Recinfo.attribute10 IS NULL)
162 AND (X_Attribute10 IS NULL)))
163 AND ( (Recinfo.attribute11 = X_Attribute11)
164 OR ( (Recinfo.attribute11 IS NULL)
165 AND (X_Attribute11 IS NULL)))
166 AND ( (Recinfo.attribute12 = X_Attribute12)
167 OR ( (Recinfo.attribute12 IS NULL)
168 AND (X_Attribute12 IS NULL)))
169 AND ( (Recinfo.attribute13 = X_Attribute13)
170 OR ( (Recinfo.attribute13 IS NULL)
171 AND (X_Attribute13 IS NULL)))
172 AND ( (Recinfo.attribute14 = X_Attribute14)
173 OR ( (Recinfo.attribute14 IS NULL)
174 AND (X_Attribute14 IS NULL)))
175 AND ( (Recinfo.attribute15 = X_Attribute15)
176 OR ( (Recinfo.attribute15 IS NULL)
177 AND (X_Attribute15 IS NULL)))
178 AND ( (Recinfo.status_id = X_status_id)
179 OR ( (Recinfo.status_id IS NULL)
180 AND (X_status_id IS NULL)))
181 AND ( (Recinfo.Description = X_Description)
182 OR ( (Recinfo.description IS NULL)
183 AND (X_Description IS NULL)))
184 AND ( (Recinfo.Vendor_Id = X_Vendor_id)
185 OR ( (Recinfo.vendor_id IS NULL)
186 AND (X_vendor_id IS NULL)))
187 AND ( (Recinfo.Grade_Code = X_Grade_Code)
188 OR ( (Recinfo.Grade_Code IS NULL)
189 AND (X_Grade_Code IS NULL)))
190 AND ( (Recinfo.Origination_date = X_Origination_date)
191 OR ( (Recinfo.Origination_date IS NULL)
192 AND (X_Origination_date IS NULL)))
193 AND ( (Recinfo.Date_Code = X_Date_Code)
194 OR ( (Recinfo.Date_Code IS NULL)
195 AND (X_Date_Code IS NULL)))
196 AND ( (Recinfo.Change_Date = X_Change_Date)
197 OR ( (Recinfo.Change_Date IS NULL)
198 AND (X_Change_Date IS NULL)))
199 AND ( (Recinfo.Age = X_Age)
200 OR ( (Recinfo.Age IS NULL)
201 AND (X_Age IS NULL)))
202 AND ( (Recinfo.Retest_Date = X_Retest_Date)
203 OR ( (Recinfo.Retest_Date IS NULL)
204 AND (X_Retest_Date IS NULL)))
205 AND ( (Recinfo.Maturity_Date = X_Maturity_Date)
206 OR ( (Recinfo.Maturity_Date IS NULL)
207 AND (X_Maturity_Date IS NULL)))
208 AND ( (Recinfo.item_size = X_item_size)
209 OR ( (Recinfo.item_size IS NULL)
210 AND (X_item_size IS NULL)))
211 AND ( (Recinfo.Color = X_Color)
212 OR ( (Recinfo.Color IS NULL)
213 AND (X_Color IS NULL)))
214 AND ( (Recinfo.Volume = X_Volume)
215 OR ( (Recinfo.Volume IS NULL)
216 AND (X_Volume IS NULL)))
217 AND ( (Recinfo.Volume_UOM = X_Volume_UOM)
218 OR ( (Recinfo.Volume_UOM IS NULL)
219 AND (X_Volume_UOM IS NULL)))
220 AND ( (Recinfo.Place_of_origin = X_Place_of_origin)
221 OR ( (Recinfo.Place_of_origin IS NULL)
222 AND (X_Place_of_origin IS NULL)))
223 AND ( (Recinfo.Best_by_Date = X_Best_by_Date)
224 OR ( (Recinfo.Best_by_Date IS NULL)
225 AND (X_Best_by_Date IS NULL)))
226 AND ( (Recinfo.Length = X_Length)
227 OR ( (Recinfo.Length IS NULL)
228 AND (X_Length IS NULL)))
229 AND ( (Recinfo.Length_UOM = X_Length_UOM)
230 OR ( (Recinfo.Length_UOM IS NULL)
231 AND (X_Length_UOM IS NULL)))
232 AND ( (Recinfo.Recycled_content = X_Recycled_content)
233 OR ( (Recinfo.Recycled_content IS NULL)
234 AND (X_Recycled_content IS NULL)))
235 AND ( (Recinfo.Thickness = X_Thickness)
236 OR ( (Recinfo.Thickness IS NULL)
237 AND (X_Thickness IS NULL)))
238 AND ( (Recinfo.Thickness_UOM = X_Thickness_UOM)
239 OR ( (Recinfo.Thickness_UOM IS NULL)
240 AND (X_Thickness_UOM IS NULL)))
241 AND ( (Recinfo.Width = X_Width)
242 OR ( (Recinfo.Width IS NULL)
243 AND (X_Width IS NULL)))
244 AND ( (Recinfo.Width_UOM = X_Width_UOM)
245 OR ( (Recinfo.Width_UOM IS NULL)
246 AND (X_Width_UOM IS NULL)))
247 AND ( (Recinfo.Curl_Wrinkle_Fold = X_Curl_Wrinkle_Fold)
248 OR ( (Recinfo.Curl_Wrinkle_Fold IS NULL)
249 AND (X_Curl_Wrinkle_Fold IS NULL)))
250 AND ( (Recinfo.lot_attribute_category = X_lot_Attribute_Category)
251 OR ( (Recinfo.lot_attribute_category IS NULL)
252 AND (X_lot_Attribute_Category IS NULL)))
253 AND ( (Recinfo.c_attribute1 = X_C_Attribute1)
254 OR ( (Recinfo.c_attribute1 IS NULL)
255 AND (X_C_Attribute1 IS NULL)))
256 AND ( (Recinfo.c_attribute2 = X_C_Attribute2)
257 OR ( (Recinfo.c_attribute2 IS NULL)
258 AND (X_C_Attribute2 IS NULL)))
259 AND ( (Recinfo.c_attribute3 = X_C_Attribute3)
260 OR ( (Recinfo.c_attribute3 IS NULL)
261 AND (X_C_Attribute3 IS NULL)))
262 AND ( (Recinfo.c_attribute4 = X_C_Attribute4)
263 OR ( (Recinfo.c_attribute4 IS NULL)
264 AND (X_C_Attribute4 IS NULL)))
265 AND ( (Recinfo.c_attribute5 = X_C_Attribute5)
266 OR ( (Recinfo.c_attribute5 IS NULL)
267 AND (X_C_Attribute5 IS NULL)))
268 AND ( (Recinfo.c_attribute6 = X_C_Attribute6)
269 OR ( (Recinfo.c_attribute6 IS NULL)
270 AND (X_C_Attribute6 IS NULL)))
271 AND ( (Recinfo.c_attribute7 = X_C_Attribute7)
272 OR ( (Recinfo.c_attribute7 IS NULL)
273 AND (X_C_Attribute7 IS NULL)))
274 AND ( (Recinfo.c_attribute8 = X_C_Attribute8)
275 OR ( (Recinfo.c_attribute8 IS NULL)
276 AND (X_C_Attribute8 IS NULL)))
277 AND ( (Recinfo.c_attribute9 = X_C_Attribute9)
278 OR ( (Recinfo.c_attribute9 IS NULL)
279 AND (X_C_Attribute9 IS NULL)))
280 AND ( (Recinfo.c_attribute10 = X_C_Attribute10)
281 OR ( (Recinfo.c_attribute10 IS NULL)
282 AND (X_C_Attribute10 IS NULL)))
283 AND ( (Recinfo.c_attribute11 = X_C_Attribute11)
284 OR ( (Recinfo.c_attribute11 IS NULL)
285 AND (X_C_Attribute11 IS NULL)))
286 AND ( (Recinfo.c_attribute12 = X_C_Attribute12)
287 OR ( (Recinfo.c_attribute12 IS NULL)
288 AND (X_C_Attribute12 IS NULL)))
289 AND ( (Recinfo.c_attribute13 = X_C_Attribute13)
290 OR ( (Recinfo.c_attribute13 IS NULL)
291 AND (X_C_Attribute13 IS NULL)))
292 AND ( (Recinfo.c_attribute14 = X_C_Attribute14)
293 OR ( (Recinfo.c_attribute14 IS NULL)
294 AND (X_C_Attribute14 IS NULL)))
295 AND ( (Recinfo.c_attribute15 = X_C_Attribute15)
296 OR ( (Recinfo.c_attribute15 IS NULL)
297 AND (X_C_Attribute15 IS NULL)))
298 AND ( (Recinfo.c_attribute16 = X_C_Attribute16)
299 OR ( (Recinfo.c_attribute16 IS NULL)
300 AND (X_C_Attribute16 IS NULL)))
301 AND ( (Recinfo.c_attribute17 = X_C_Attribute17)
302 OR ( (Recinfo.c_attribute17 IS NULL)
303 AND (X_C_Attribute17 IS NULL)))
304 AND ( (Recinfo.c_attribute18 = X_C_Attribute18)
305 OR ( (Recinfo.c_attribute18 IS NULL)
306 AND (X_C_Attribute18 IS NULL)))
307 AND ( (Recinfo.c_attribute19 = X_C_Attribute19)
308 OR ( (Recinfo.c_attribute19 IS NULL)
309 AND (X_C_Attribute19 IS NULL)))
310 AND ( (Recinfo.c_attribute20 = X_C_Attribute20)
311 OR ( (Recinfo.c_attribute20 IS NULL)
312 AND (X_C_Attribute20 IS NULL)))
313 AND ( (Recinfo.d_attribute1 = X_D_Attribute1)
314 OR ( (Recinfo.d_attribute1 IS NULL)
315 AND (X_D_Attribute1 IS NULL)))
316 AND ( (Recinfo.d_attribute2 = X_D_Attribute2)
317 OR ( (Recinfo.d_attribute2 IS NULL)
318 AND (X_D_Attribute2 IS NULL)))
319 AND ( (Recinfo.d_attribute3 = X_D_Attribute3)
320 OR ( (Recinfo.d_attribute3 IS NULL)
321 AND (X_D_Attribute3 IS NULL)))
322 AND ( (Recinfo.d_attribute4 = X_D_Attribute4)
323 OR ( (Recinfo.d_attribute4 IS NULL)
324 AND (X_D_Attribute4 IS NULL)))
325 AND ( (Recinfo.d_attribute5 = X_D_Attribute5)
326 OR ( (Recinfo.d_attribute5 IS NULL)
327 AND (X_D_Attribute5 IS NULL)))
328 AND ( (Recinfo.d_attribute6 = X_D_Attribute6)
329 OR ( (Recinfo.d_attribute6 IS NULL)
330 AND (X_D_Attribute6 IS NULL)))
331 AND ( (Recinfo.d_attribute7 = X_D_Attribute7)
332 OR ( (Recinfo.d_attribute7 IS NULL)
333 AND (X_D_Attribute7 IS NULL)))
334 AND ( (Recinfo.d_attribute8 = X_D_Attribute8)
335 OR ( (Recinfo.d_attribute8 IS NULL)
336 AND (X_D_Attribute8 IS NULL)))
337 AND ( (Recinfo.d_attribute9 = X_D_Attribute9)
338 OR ( (Recinfo.d_attribute9 IS NULL)
339 AND (X_D_Attribute9 IS NULL)))
340 AND ( (Recinfo.d_attribute10 = X_D_Attribute10)
341 OR ( (Recinfo.d_attribute10 IS NULL)
342 AND (X_D_Attribute10 IS NULL))) AND ( (Recinfo.n_attribute1 = X_N_Attribute1)
343 OR ( (Recinfo.n_attribute1 IS NULL)
344 AND (X_N_Attribute1 IS NULL)))
345 AND ( (Recinfo.n_attribute2 = X_N_Attribute2)
346 OR ( (Recinfo.n_attribute2 IS NULL)
347 AND (X_N_Attribute2 IS NULL)))
348 AND ( (Recinfo.n_attribute3 = X_N_Attribute3)
349 OR ( (Recinfo.n_attribute3 IS NULL)
350 AND (X_N_Attribute3 IS NULL)))
351 AND ( (Recinfo.n_attribute4 = X_N_Attribute4)
352 OR ( (Recinfo.n_attribute4 IS NULL)
353 AND (X_N_Attribute4 IS NULL)))
354 AND ( (Recinfo.n_attribute5 = X_N_Attribute5)
355 OR ( (Recinfo.n_attribute5 IS NULL)
356 AND (X_N_Attribute5 IS NULL)))
357 AND ( (Recinfo.n_attribute6 = X_N_Attribute6)
358 OR ( (Recinfo.n_attribute6 IS NULL)
359 AND (X_N_Attribute6 IS NULL)))
360 AND ( (Recinfo.n_attribute7 = X_N_Attribute7)
361 OR ( (Recinfo.n_attribute7 IS NULL)
362 AND (X_N_Attribute7 IS NULL)))
363 AND ( (Recinfo.n_attribute8 = X_N_Attribute8)
364 OR ( (Recinfo.n_attribute8 IS NULL)
365 AND (X_N_Attribute8 IS NULL)))
366 AND ( (Recinfo.n_attribute9 = X_N_Attribute9)
367 OR ( (Recinfo.n_attribute9 IS NULL)
368 AND (X_N_Attribute9 IS NULL)))
369 AND ( (Recinfo.n_attribute10 = X_N_Attribute10)
370 OR ( (Recinfo.n_attribute10 IS NULL)
371 AND (X_N_Attribute10 IS NULL)))
372 AND ( (Recinfo.parent_lot_number = X_Parent_Lot_Number)
373 OR ( (Recinfo.parent_lot_number IS NULL)
374 AND (X_Parent_Lot_Number IS NULL)))
375 AND ( (Recinfo.origination_type = X_Origination_Type)
376 OR ( (Recinfo.origination_type IS NULL)
377 AND (X_Origination_Type IS NULL)))
378 AND ( (Recinfo.expiration_action_date = X_Expiration_Action_Date)
379 OR ( (Recinfo.expiration_action_date IS NULL)
380 AND (X_Expiration_Action_Date IS NULL)))
381 AND ( (Recinfo.expiration_action_code = X_Expiration_Action_Code)
382 OR ( (Recinfo.expiration_action_code IS NULL)
383 AND (X_Expiration_Action_Code IS NULL)))
384 AND ( (Recinfo.hold_date = X_Hold_Date)
385 OR ( (Recinfo.hold_date IS NULL)
386 AND (X_Hold_Date IS NULL)))
387 ) then
388 return;
389 else
390 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
391 APP_EXCEPTION.Raise_Exception;
392 end if;
393 END Lock_Row;
394
395
396
397 /*========================================
398 SFeinstein Convergence
399 Added Sampling_Event_ID to MTL_LOT_NUMBERS table
400 ========================================*/
401 PROCEDURE Update_Row(X_Rowid VARCHAR2,
402 X_Inventory_Item_Id NUMBER,
403 X_Organization_Id NUMBER,
404 X_Lot_Number VARCHAR2,
405 X_Last_Update_Date DATE,
406 X_Last_Updated_By NUMBER,
407 X_Last_Update_Login NUMBER,
408 X_Expiration_Date DATE,
409 X_Disable_Flag NUMBER,
410 X_Attribute_Category VARCHAR2,
411 X_Attribute1 VARCHAR2,
412 X_Attribute2 VARCHAR2,
413 X_Attribute3 VARCHAR2,
414 X_Attribute4 VARCHAR2,
415 X_Attribute5 VARCHAR2,
416 X_Attribute6 VARCHAR2,
417 X_Attribute7 VARCHAR2,
418 X_Attribute8 VARCHAR2,
419 X_Attribute9 VARCHAR2,
420 X_Attribute10 VARCHAR2,
421 X_Attribute11 VARCHAR2,
422 X_Attribute12 VARCHAR2,
423 X_Attribute13 VARCHAR2,
424 X_Attribute14 VARCHAR2,
425 X_Attribute15 VARCHAR2,
426 X_Status_ID NUMBER,
427 X_Description VARCHAR2,
428 X_Vendor_Id NUMBER,
429 X_Grade_Code VARCHAR2,
430 X_Origination_Date DATE,
431 X_Date_Code VARCHAR2,
432 X_Change_Date DATE,
433 X_Age NUMBER,
434 X_Retest_Date DATE,
435 X_Maturity_Date DATE,
436 X_Lot_Attribute_Category VARCHAR2,
437 X_Item_Size NUMBER,
438 X_Color VARCHAR2,
439 X_Volume NUMBER,
440 X_Volume_UOM VARCHAR2,
441 X_Place_of_Origin VARCHAR2,
442 X_Best_by_Date DATE,
443 X_Length NUMBER,
444 X_Length_UOM VARCHAR2,
445 X_Recycled_Content NUMBER,
446 X_Thickness NUMBER,
447 X_Thickness_UOM VARCHAR2,
448 X_Width NUMBER,
449 X_Width_UOM VARCHAR2,
450 X_Curl_Wrinkle_Fold VARCHAR2,
451 X_C_Attribute1 VARCHAR2,
452 X_C_Attribute2 VARCHAR2,
453 X_C_Attribute3 VARCHAR2,
454 X_C_Attribute4 VARCHAR2,
455 X_C_Attribute5 VARCHAR2,
456 X_C_Attribute6 VARCHAR2,
457 X_C_Attribute7 VARCHAR2,
458 X_C_Attribute8 VARCHAR2,
459 X_C_Attribute9 VARCHAR2,
460 X_C_Attribute10 VARCHAR2,
461 X_C_Attribute11 VARCHAR2,
462 X_C_Attribute12 VARCHAR2,
463 X_C_Attribute13 VARCHAR2,
464 X_C_Attribute14 VARCHAR2,
465 X_C_Attribute15 VARCHAR2,
466 X_C_Attribute16 VARCHAR2,
467 X_C_Attribute17 VARCHAR2,
468 X_C_Attribute18 VARCHAR2,
469 X_C_Attribute19 VARCHAR2,
470 X_C_Attribute20 VARCHAR2,
471 X_D_Attribute1 DATE,
472 X_D_Attribute2 DATE,
473 X_D_Attribute3 DATE,
474 X_D_Attribute4 DATE,
475 X_D_Attribute5 DATE,
476 X_D_Attribute6 DATE,
477 X_D_Attribute7 DATE,
478 X_D_Attribute8 DATE,
479 X_D_Attribute9 DATE,
480 X_D_Attribute10 DATE,
481 X_N_Attribute1 NUMBER,
482 X_N_Attribute2 NUMBER,
483 X_N_Attribute3 NUMBER,
484 X_N_Attribute4 NUMBER,
485 X_N_Attribute5 NUMBER,
486 X_N_Attribute6 NUMBER,
487 X_N_Attribute7 NUMBER,
488 X_N_Attribute8 NUMBER,
489 X_N_Attribute10 NUMBER,
490 X_Supplier_Lot_Number VARCHAR2,
491 X_N_Attribute9 NUMBER,
492 X_Territory_Code VARCHAR2,
493 X_Parent_Lot_Number VARCHAR2,
494 X_Origination_Type NUMBER,
495 X_Expiration_Action_Date DATE,
496 X_Expiration_Action_Code VARCHAR2,
497 X_Hold_Date DATE,
498 X_Sampling_Event_ID NUMBER DEFAULT NULL
499
500 ) IS
501 l_status_id NUMBER;
502 /*========================================
503 Joe DiIorio - Convergence
504 Added l_grade_code and variables
505 to support call to update grade history.
506 ========================================*/
507 l_grade_code MTL_LOT_NUMBERS.GRADE_CODE%TYPE;
508 l_status VARCHAR2(2);
509 l_message VARCHAR2(2000);
510 /* Jalaj Srivastava Bug 4998256
511 added varaibles below for call to quantity tree */
512
513 l_qoh number;
514 l_rqoh number;
515 l_qr number;
516 l_qs number;
517 l_att number;
518 l_atr number;
519 l_sqoh number;
520 l_srqoh number;
521 l_sqr number;
522 l_sqs number;
523 l_satt number;
524 l_satr number;
525 l_return_status varchar2(1);
526 l_msg_count pls_integer;
527 l_msg_data varchar2(4000);
528
529
530 BEGIN
531
532 /* WMS Material Status Enhancements
533 To maintain the Material Status History obtain the Status ID before
534 the record get updated with modified values. */
535
536 SELECT status_id, grade_code
537 INTO l_status_id, l_grade_code
538 FROM mtl_lot_numbers
539 WHERE rowid = X_Rowid;
540
541 /*===================================
542 Joe DiIorio - Convergence
543 Get existing grade code to compare
544 later if it has changed.
545 ===================================
546 S Feinstein - removed new select code
547 and incorporated it in select above
548 ===================================
549 SELECT grade_code
550 INTO l_grade_code
551 FROM mtl_lot_numbers
552 WHERE rowid = X_Rowid;
553 ===================================*/
554
555
556 /*========================================
557 SFeinstein Convergence
558 Added Sampling_Event_ID to columns updated
559 ========================================*/
560 UPDATE mtl_lot_numbers
561 SET
562 inventory_item_id = X_Inventory_Item_Id,
563 organization_id = X_Organization_Id,
564 lot_number = X_Lot_Number,
565 last_update_date = X_Last_Update_Date,
566 last_updated_by = X_Last_Updated_By,
567 last_update_login = X_Last_Update_Login,
568 expiration_date = X_Expiration_Date,
569 disable_flag = X_Disable_Flag,
570 attribute_category = X_Attribute_Category,
571 attribute1 = X_Attribute1,
572 attribute2 = X_Attribute2,
573 attribute3 = X_Attribute3,
574 attribute4 = X_Attribute4,
575 attribute5 = X_Attribute5,
576 attribute6 = X_Attribute6,
577 attribute7 = X_Attribute7,
578 attribute8 = X_Attribute8,
579 attribute9 = X_Attribute9,
580 attribute10 = X_Attribute10,
581 attribute11 = X_Attribute11,
582 attribute12 = X_Attribute12,
583 attribute13 = X_Attribute13,
584 attribute14 = X_Attribute14,
585 attribute15 = X_Attribute15,
586 status_id = X_Status_ID,
587 description = X_Description,
588 vendor_id = X_Vendor_Id,
589 grade_code = X_Grade_Code,
590 origination_date = X_Origination_Date,
591 date_code = X_Date_Code,
592 change_date = X_Change_date,
593 age = X_Age,
594 retest_date = X_Retest_Date,
595 maturity_date = X_Maturity_Date,
596 lot_attribute_category = X_Lot_Attribute_Category,
597 item_size = X_Item_Size,
598 color = X_Color,
599 volume = X_volume,
600 volume_uom = X_Volume_UOM,
601 place_of_origin = X_Place_Of_Origin,
602 best_by_date = X_Best_BY_Date,
603 length = X_Length,
604 length_uom = X_Length_UOM,
605 recycled_content = X_Recycled_Content,
606 thickness = X_Thickness,
607 thickness_uom = X_Thickness_UOM,
608 width = X_Width,
609 width_uom = X_Width_UOM,
610 curl_wrinkle_fold = X_Curl_Wrinkle_Fold,
611 c_attribute1 = X_C_Attribute1,
612 c_attribute2 = X_C_Attribute2,
613 c_attribute3 = X_C_Attribute3,
614 c_attribute4 = X_C_Attribute4,
615 c_attribute5 = X_C_Attribute5,
616 c_attribute6 = X_C_Attribute6,
617 c_attribute7 = X_C_Attribute7,
618 c_attribute8 = X_C_Attribute8,
619 c_attribute9 = X_C_Attribute9,
620 c_attribute10 = X_C_Attribute10,
621 c_attribute11 = X_C_Attribute11,
622 c_attribute12 = X_C_Attribute12,
623 c_attribute13 = X_C_Attribute13,
624 c_attribute14 = X_C_Attribute14,
625 c_attribute15 = X_C_Attribute15,
626 c_attribute16 = X_C_Attribute16,
627 c_attribute17 = X_C_Attribute17,
628 c_attribute18 = X_C_Attribute18,
629 c_attribute19 = X_C_Attribute19,
630 c_attribute20 = X_C_Attribute20,
631 d_attribute1 = X_D_Attribute1,
632 d_attribute2 = X_D_Attribute2,
633 d_attribute3 = X_D_Attribute3,
634 d_attribute4 = X_D_Attribute4,
635 d_attribute5 = X_D_Attribute5,
636 d_attribute6 = X_D_Attribute6,
637 d_attribute7 = X_D_Attribute7,
638 d_attribute8 = X_D_Attribute8,
639 d_attribute9 = X_D_Attribute9,
640 d_attribute10 = X_D_Attribute10,
641 n_attribute1 = X_N_Attribute1,
642 n_attribute2 = X_N_Attribute2,
643 n_attribute3 = X_N_Attribute3,
644 n_attribute4 = X_N_Attribute4,
645 n_attribute5 = X_N_Attribute5,
646 n_attribute6 = X_N_Attribute6,
647 n_attribute7 = X_N_Attribute7,
648 n_attribute8 = X_N_Attribute8,
649 n_attribute10 = X_N_Attribute10,
650 supplier_lot_number = X_Supplier_Lot_Number,
651 n_attribute9 = X_N_Attribute9,
652 territory_code = X_Territory_code,
653 parent_lot_number = X_Parent_Lot_Number,
654 origination_type = X_Origination_Type,
655 expiration_action_date = X_Expiration_Action_Date,
656 expiration_action_code = X_Expiration_Action_Code,
657 hold_date = X_Hold_Date,
658 Sampling_Event_ID = X_Sampling_Event_ID
659 WHERE rowid = X_Rowid;
660
661 /* WMS Enhancements
662 This Procedure Caters to the insertion of records in the
663 table MTL_MATERIAL_STATUS_HISTORY. */
664
665 --BUG 7258237 For updating status wms install is not required
666 IF --(INV_INSTALL.ADV_INV_INSTALLED(P_Organization_ID => NULL)) AND
667 (X_Status_ID IS NOT NULL) AND
668 (X_Status_ID <> l_status_id) THEN
669 MTL_SECONDARY_INVENTORIES_PKG.Status_History
670 ( X_Organization_ID,
671 X_Inventory_Item_ID,
672 X_Lot_Number,
673 NULL,
674 2,
675 X_Status_ID,
676 NULL,
677 NULL,
678 X_Last_Update_Date,
679 X_Last_Updated_By,
680 X_Last_Updated_By,
681 X_Last_Update_Date,
682 X_Last_Update_Login);
683 END IF;
684
685
686 /*===================================
687 Joe DiIorio - Convergence
688 Added l_grade_code
689 ===================================*/
690 IF (INV_INSTALL.ADV_INV_INSTALLED(P_Organization_ID => NULL)) AND
691 (X_Grade_Code IS NOT NULL) AND
692 (X_Grade_Code <> l_grade_code) THEN
693 /* Jalaj Srivastava Bug 4998256
694 Get primary and seconday onhand */
695
696 inv_quantity_tree_pub.query_quantities
697 (p_api_version_number => 1.0
698 ,x_return_status => l_return_status
699 ,x_msg_count => l_msg_count
700 ,x_msg_data => l_msg_data
701 ,p_organization_id => X_organization_id
702 ,p_inventory_item_id => X_inventory_item_id
703 ,p_tree_mode => inv_quantity_tree_pub.g_transaction_mode
704 ,p_is_revision_control => false
705 ,p_is_lot_control => true
706 ,p_is_serial_control => false
707 ,p_grade_code => null
708 ,p_revision => null
709 ,p_lot_number => X_lot_number
710 ,p_subinventory_code => null
711 ,p_locator_id => null
712 ,x_qoh => l_qoh
713 ,x_rqoh => l_rqoh
714 ,x_qr => l_qr
715 ,x_qs => l_qs
716 ,x_att => l_att
717 ,x_atr => l_atr
718 ,x_sqoh => l_sqoh
719 ,x_srqoh => l_srqoh
720 ,x_sqr => l_sqr
721 ,x_sqs => l_sqs
722 ,x_satt => l_satt
723 ,x_satr => l_satr
724 );
725
726
727 /*========================
728 Upgrade Grade History
729 ========================*/
730 INSERT INTO MTL_LOT_GRADE_HISTORY
731 (
732 GRADE_UPDATE_ID,
733 INVENTORY_ITEM_ID,
734 ORGANIZATION_ID,
735 LOT_NUMBER,
736 UPDATE_METHOD,
737 NEW_GRADE_CODE,
738 OLD_GRADE_CODE,
739 PRIMARY_QUANTITY,
740 SECONDARY_QUANTITY,
741 UPDATE_REASON_ID,
742 INITIAL_GRADE_FLAG,
743 FROM_MOBILE_APPS_FLAG,
744 GRADE_UPDATE_DATE,
745 ATTRIBUTE1,
746 ATTRIBUTE2,
747 ATTRIBUTE3,
748 ATTRIBUTE4,
749 ATTRIBUTE5,
750 ATTRIBUTE6,
751 ATTRIBUTE7,
752 ATTRIBUTE8,
753 ATTRIBUTE9,
754 ATTRIBUTE10,
755 ATTRIBUTE11,
756 ATTRIBUTE12,
757 ATTRIBUTE13,
758 ATTRIBUTE14,
759 ATTRIBUTE15,
760 ATTRIBUTE_CATEGORY,
761 CREATION_DATE,
762 CREATED_BY,
763 LAST_UPDATED_BY,
764 LAST_UPDATE_DATE,
765 LAST_UPDATE_LOGIN
766 )
767 VALUES
768 (
769 MTL_LOT_GRADE_HISTORY_S.NEXTVAL,
770 X_INVENTORY_ITEM_ID,
771 X_ORGANIZATION_ID,
772 X_LOT_NUMBER,
773 INV_MATERIAL_STATUS_PUB.g_update_method_manual,/* Jalaj Srivastava Bug 4998256 pass update_method as manual instead of null */
774 X_GRADE_CODE,
775 l_grade_code,
776 l_qoh, /* Jalaj Srivastava Bug 4998256 pass primary onhand */
777 l_sqoh, /* Jalaj Srivastava Bug 4998256 pass secondary onhand */
778 NULL,
779 'N',
780 'N',
781 SYSDATE,
782 NULL,
783 NULL,
784 NULL,
785 NULL,
786 NULL,
787 NULL,
788 NULL,
789 NULL,
790 NULL,
791 NULL,
792 NULL,
793 NULL,
794 NULL,
795 NULL,
796 NULL,
797 NULL,
798 SYSDATE,
799 FND_GLOBAL.USER_ID,
800 FND_GLOBAL.USER_ID,
801 SYSDATE,
802 FND_GLOBAL.LOGIN_ID
803 );
804 END IF;
805
806
807 END Update_Row;
808
809
810
811
812
813
814
815 PROCEDURE Insert_Row(X_Inventory_Item_Id NUMBER,
816 X_Organization_Id NUMBER,
817 X_Lot_Number VARCHAR2,
818 X_Creation_Date DATE,
819 X_Created_By NUMBER,
820 X_Last_Update_Date DATE,
821 X_Last_Updated_By NUMBER,
822 X_Last_Update_Login NUMBER,
823 X_Request_Id NUMBER,
824 X_Program_Application_Id NUMBER,
825 X_Program_Id NUMBER,
826 X_Program_Update_Date DATE,
827 X_Expiration_Date DATE,
828 X_Disable_Flag NUMBER,
829 X_Attribute_Category VARCHAR2,
830 X_Attribute1 VARCHAR2,
831 X_Attribute2 VARCHAR2,
832 X_Attribute3 VARCHAR2,
833 X_Attribute4 VARCHAR2,
834 X_Attribute5 VARCHAR2,
835 X_Attribute6 VARCHAR2,
836 X_Attribute7 VARCHAR2,
837 X_Attribute8 VARCHAR2,
838 X_Attribute9 VARCHAR2,
839 X_Attribute10 VARCHAR2,
840 X_Attribute11 VARCHAR2,
841 X_Attribute12 VARCHAR2,
842 X_Attribute13 VARCHAR2,
843 X_Attribute14 VARCHAR2,
844 X_Attribute15 VARCHAR2,
845 X_Status_ID NUMBER,
846 X_Description VARCHAR2,
847 X_Vendor_Id NUMBER,
848 X_Grade_Code VARCHAR2,
849 X_Origination_Date DATE,
850 X_Date_Code VARCHAR2,
851 X_Change_Date DATE,
852 X_Age NUMBER,
853 X_Retest_Date DATE,
854 X_Maturity_Date DATE,
855 X_Lot_Attribute_Category VARCHAR2,
856 X_Item_Size NUMBER,
857 X_Color VARCHAR2,
858 X_Volume NUMBER,
859 X_Volume_UOM VARCHAR2,
860 X_Place_of_Origin VARCHAR2,
861 X_Best_by_Date DATE,
862 X_Length NUMBER,
863 X_Length_UOM VARCHAR2,
864 X_Recycled_Content NUMBER,
865 X_Thickness NUMBER,
866 X_Thickness_UOM VARCHAR2,
867 X_Width NUMBER,
868 X_Width_UOM VARCHAR2,
869 X_Curl_Wrinkle_Fold VARCHAR2,
870 X_C_Attribute1 VARCHAR2,
871 X_C_Attribute2 VARCHAR2,
872 X_C_Attribute3 VARCHAR2,
873 X_C_Attribute4 VARCHAR2,
874 X_C_Attribute5 VARCHAR2,
875 X_C_Attribute6 VARCHAR2,
876 X_C_Attribute7 VARCHAR2,
877 X_C_Attribute8 VARCHAR2,
878 X_C_Attribute9 VARCHAR2,
879 X_C_Attribute10 VARCHAR2,
880 X_C_Attribute11 VARCHAR2,
881 X_C_Attribute12 VARCHAR2,
882 X_C_Attribute13 VARCHAR2,
883 X_C_Attribute14 VARCHAR2,
884 X_C_Attribute15 VARCHAR2,
885 X_C_Attribute16 VARCHAR2,
886 X_C_Attribute17 VARCHAR2,
887 X_C_Attribute18 VARCHAR2,
888 X_C_Attribute19 VARCHAR2,
889 X_C_Attribute20 VARCHAR2,
890 X_D_Attribute1 DATE,
891 X_D_Attribute2 DATE,
892 X_D_Attribute3 DATE,
893 X_D_Attribute4 DATE,
894 X_D_Attribute5 DATE,
895 X_D_Attribute6 DATE,
896 X_D_Attribute7 DATE,
897 X_D_Attribute8 DATE,
898 X_D_Attribute9 DATE,
899 X_D_Attribute10 DATE,
900 X_N_Attribute1 NUMBER,
901 X_N_Attribute2 NUMBER,
902 X_N_Attribute3 NUMBER,
903 X_N_Attribute4 NUMBER,
904 X_N_Attribute5 NUMBER,
905 X_N_Attribute6 NUMBER,
906 X_N_Attribute7 NUMBER,
907 X_N_Attribute8 NUMBER,
908 X_N_Attribute9 NUMBER,
909 X_N_Attribute10 NUMBER,
910 X_Supplier_Lot_Number VARCHAR2,
911 X_Territory_Code VARCHAR2,
912 X_Parent_Lot_Number VARCHAR2,
913 X_Origination_Type NUMBER,
914 X_Expiration_Action_Date DATE,
915 X_Expiration_Action_Code VARCHAR2,
916 X_Hold_Date DATE ,
917 X_SAMPLING_EVENT_ID NUMBER DEFAULT NULL
918 )
919 IS
920
921 BEGIN
922
923 INSERT INTO MTL_LOT_NUMBERS (
924 Inventory_Item_Id,
925 Organization_Id,
926 Lot_Number,
927 Creation_Date,
928 Created_By,
929 Last_Update_Date,
930 Last_Updated_By,
931 Last_Update_Login,
932 Request_Id,
933 Program_Application_Id,
934 Program_Id,
935 Program_Update_Date,
936 Expiration_Date,
937 Disable_Flag,
938 Attribute_Category,
939 Attribute1, Attribute2, Attribute3, Attribute4,
940 Attribute5, Attribute6, Attribute7, Attribute8,
941 Attribute9, Attribute10, Attribute11, Attribute12,
942 Attribute13, Attribute14, Attribute15,
943 Status_ID,
944 Description,
945 Vendor_Id,
946 Grade_Code,
947 Origination_Date,
948 Date_Code,
949 Change_Date,
950 Age,
951 Retest_Date,
952 Maturity_Date,
953 Lot_Attribute_Category,
954 Item_Size,
955 Color,
956 Volume,
957 Volume_UOM,
958 Place_of_Origin,
959 Best_by_Date,
960 Length,
961 Length_UOM,
962 Recycled_Content,
963 Thickness,
964 Thickness_UOM,
965 Width,
966 Width_UOM,
967 Curl_Wrinkle_Fold,
968 C_Attribute1, C_Attribute2, C_Attribute3, C_Attribute4,
969 C_Attribute5, C_Attribute6, C_Attribute7, C_Attribute8,
970 C_Attribute9, C_Attribute10, C_Attribute11, C_Attribute12,
971 C_Attribute13, C_Attribute14, C_Attribute15, C_Attribute16,
972 C_Attribute17, C_Attribute18, C_Attribute19, C_Attribute20,
973 D_Attribute1, D_Attribute2, D_Attribute3, D_Attribute4,
974 D_Attribute5, D_Attribute6, D_Attribute7, D_Attribute8,
975 D_Attribute9, D_Attribute10,
976 N_Attribute1, N_Attribute2, N_Attribute3, N_Attribute4,
977 N_Attribute5, N_Attribute6, N_Attribute7, N_Attribute8,
978 N_Attribute9, N_Attribute10,
979 Supplier_Lot_Number,
980 Territory_Code,
981 Parent_Lot_Number,
982 Origination_Type,
983 Expiration_Action_Date,
984 Expiration_Action_Code,
985 Hold_Date
986 ,gen_object_id -- NSRIVAST, INVCONV
987 ,sampling_event_id -- Bug 4115021 OPM Inventory Convergence
988 )
989 VALUES
990 (X_Inventory_Item_Id,
991 X_Organization_Id,
992 X_Lot_Number,
993 X_Creation_Date,
994 X_Created_By,
995 X_Last_Update_Date,
996 X_Last_Updated_By,
997 X_Last_Update_Login,
998 X_Request_Id,
999 X_Program_Application_Id,
1000 X_Program_Id,
1001 X_Program_Update_Date,
1002 X_Expiration_Date,
1003 X_Disable_Flag,
1004 X_Attribute_Category,
1005 X_Attribute1, X_Attribute2, X_Attribute3, X_Attribute4,
1006 X_Attribute5, X_Attribute6, X_Attribute7, X_Attribute8,
1007 X_Attribute9, X_Attribute10, X_Attribute11, X_Attribute12,
1008 X_Attribute13, X_Attribute14, X_Attribute15,
1009 X_Status_ID,
1010 X_Description,
1011 X_Vendor_Id,
1012 X_Grade_Code,
1013 X_Origination_Date,
1014 X_Date_Code,
1015 X_Change_Date,
1016 X_Age,
1017 X_Retest_Date,
1018 X_Maturity_Date,
1019 X_Lot_Attribute_Category,
1020 X_Item_Size,
1021 X_Color,
1022 X_Volume,
1023 X_Volume_UOM,
1024 X_Place_of_Origin,
1025 X_Best_by_Date,
1026 X_Length,
1027 X_Length_UOM,
1028 X_Recycled_Content,
1029 X_Thickness,
1030 X_Thickness_UOM,
1031 X_Width,
1032 X_Width_UOM,
1033 X_Curl_Wrinkle_Fold,
1034 X_C_Attribute1, X_C_Attribute2, X_C_Attribute3, X_C_Attribute4,
1035 X_C_Attribute5, X_C_Attribute6, X_C_Attribute7, X_C_Attribute8,
1036 X_C_Attribute9, X_C_Attribute10, X_C_Attribute11, X_C_Attribute12,
1037 X_C_Attribute13, X_C_Attribute14, X_C_Attribute15, X_C_Attribute16,
1038 X_C_Attribute17, X_C_Attribute18, X_C_Attribute19, X_C_Attribute20,
1039 X_D_Attribute1, X_D_Attribute2, X_D_Attribute3, X_D_Attribute4,
1040 X_D_Attribute5, X_D_Attribute6, X_D_Attribute7, X_D_Attribute8,
1041 X_D_Attribute9, X_D_Attribute10,
1042 X_N_Attribute1, X_N_Attribute2, X_N_Attribute3, X_N_Attribute4,
1043 X_N_Attribute5, X_N_Attribute6, X_N_Attribute7, X_N_Attribute8,
1044 X_N_Attribute9, X_N_Attribute10,
1045 X_Supplier_Lot_Number,
1046 X_Territory_Code,
1047 X_Parent_Lot_Number,
1048 X_Origination_Type,
1049 X_Expiration_Action_Date,
1050 X_Expiration_Action_Code,
1051 X_Hold_Date
1052 ,mtl_gen_object_id_s.NEXTVAL -- NSRIVAST, INVCONV
1053 ,x_sampling_event_id
1054 );
1055
1056
1057 /* WMS Enhancements
1058 This Procedure Caters to the insertion of records in the
1059 table MTL_MATERIAL_STATUS_HISTORY. */
1060 -- Bug 7502482 WMS installation is not required For Inserting Lot History.
1061 IF --(INV_INSTALL.ADV_INV_INSTALLED(P_Organization_ID => NULL)) AND
1062 (X_Status_ID IS NOT NULL) THEN
1063
1064 /*=================================================
1065 BUG#4222397 = Changed to pass Y for value of
1066 initial_status_flag and named the parameters.
1067 =================================================*/
1068 MTL_SECONDARY_INVENTORIES_PKG.Status_History
1069 (x_organization_id => X_Organization_ID
1070 , x_inventory_item_id => X_Inventory_Item_ID
1071 , x_lot_number => X_Lot_Number
1072 , x_serial_number => NULL
1073 , x_update_method => 2
1074 , x_status_id => X_Status_ID
1075 , x_zone_code => NULL
1076 , x_locator_id => NULL
1077 , x_creation_date => X_Last_Update_Date
1078 , x_created_by => X_Last_Updated_By
1079 , x_last_updated_by => X_Last_Updated_By
1080 , x_last_update_date => X_Last_Update_Date
1081 , x_last_update_login => X_Last_Update_Login
1082 , x_initial_status_flag => 'Y');
1083 END IF;
1084
1085
1086
1087 END Insert_Row;
1088
1089 END MTL_LOT_NUMBERS_PKG;