DBA Data[Home] [Help]

APPS.OE_VALIDATE_LOT_SERIAL dependencies on FND_API

Line 18: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

14: , p_old_Lot_Serial_rec IN OE_Order_PUB.Lot_Serial_Rec_Type :=
15: OE_Order_PUB.G_MISS_LOT_SERIAL_REC
16: )
17: IS
18: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
19: --Removed because not used after changes for bug 5155914(validation removal)
20: --l_ordered_qty NUMBER := 0;
21: --l_total_qty NUMBER := 0;
22: x_prefix VARCHAR2(80);

Line 138: l_return_status := FND_API.G_RET_STS_ERROR;

134:
135: IF p_Lot_Serial_rec.lot_serial_id IS NULL
136: THEN
137:
138: l_return_status := FND_API.G_RET_STS_ERROR;
139: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
140: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Lot Serial ID');
141: OE_MSG_PUB.Add;
142:

Line 152: l_return_status := FND_API.G_RET_STS_ERROR;

148:
149: IF p_Lot_Serial_rec.quantity IS NULL
150: THEN
151:
152: l_return_status := FND_API.G_RET_STS_ERROR;
153: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
154: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Quantity');
155: OE_MSG_PUB.Add;
156:

Line 161: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

157: END IF;
158:
159: -- Return Error if a required attribute is missing.
160:
161: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
162:
163: RAISE FND_API.G_EXC_ERROR;
164:
165: END IF;

Line 163: RAISE FND_API.G_EXC_ERROR;

159: -- Return Error if a required attribute is missing.
160:
161: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
162:
163: RAISE FND_API.G_EXC_ERROR;
164:
165: END IF;
166:
167: --

Line 177: l_return_status := FND_API.G_RET_STS_ERROR;

173:
174: IF p_Lot_Serial_rec.lot_number IS NULL AND
175: p_Lot_Serial_rec.from_serial_number IS NULL
176: THEN
177: l_return_status := FND_API.G_RET_STS_ERROR;
178: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
179: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Lot Number/From Serial Number');
180: OE_MSG_PUB.Add;
181:

Line 190: l_return_status := FND_API.G_RET_STS_ERROR;

186: p_Lot_Serial_rec.from_serial_number IS NOT NULL AND
187: p_Lot_Serial_rec.to_serial_number IS NULL
188: THEN
189:
190: l_return_status := FND_API.G_RET_STS_ERROR;
191: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
192: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','To Serial Number');
193: OE_MSG_PUB.Add;
194:

Line 249: l_return_status := FND_API.G_RET_STS_ERROR;

245: END IF;
246:
247: IF p_Lot_Serial_rec.quantity > (l_ordered_qty - l_total_qty)
248: THEN
249: l_return_status := FND_API.G_RET_STS_ERROR;
250: FND_MESSAGE.SET_NAME('ONT','OE_TOO_MANY_LOT_SERIAL');
251: OE_MSG_PUB.Add;
252:
253: END IF;

Line 286: l_return_status := FND_API.G_RET_STS_ERROR;

282: x_from_number,
283: x_to_number,
284: x_error_code)
285: THEN
286: l_return_status := FND_API.G_RET_STS_ERROR;
287: FND_MESSAGE.Set_Name('ONT','OE_NOT_KNOW_QUANTITY');
288: OE_MSG_PUB.Add;
289: IF l_debug_level > 0 THEN
290: oe_debug_pub.add( 'IN OE_VALIDATE_LOT_SERIAL.ENTITY 2' , 1 ) ;

Line 294: l_return_status := FND_API.G_RET_STS_ERROR;

290: oe_debug_pub.add( 'IN OE_VALIDATE_LOT_SERIAL.ENTITY 2' , 1 ) ;
291: END IF;
292: ELSE
293: IF p_Lot_Serial_rec.quantity <> x_quantity THEN
294: l_return_status := FND_API.G_RET_STS_ERROR;
295: FND_MESSAGE.Set_Name('ONT','OE_QUANTITY_MISMATCH');
296: OE_MSG_PUB.Add;
297: IF l_debug_level > 0 THEN
298: oe_debug_pub.add( 'IN OE_VALIDATE_LOT_SERIAL.ENTITY 3' , 1 ) ;

Line 416: ( p_Lot_Serial_rec.lot_number <> FND_API.G_MISS_CHAR

412:
413:
414: -- lot validation
415: IF l_lot_ctl <> 2 and -- INVCONV
416: ( p_Lot_Serial_rec.lot_number <> FND_API.G_MISS_CHAR
417: and p_Lot_Serial_rec.lot_number IS NOT NULL ) then
418: IF l_debug_level > 0 THEN
419: oe_debug_pub.add( 'INVALID LINE LOT SERIALS LOT NUMBER...' ) ;
420: END IF;

Line 423: l_return_status := FND_API.G_RET_STS_ERROR;

419: oe_debug_pub.add( 'INVALID LINE LOT SERIALS LOT NUMBER...' ) ;
420: END IF;
421: FND_MESSAGE.SET_NAME('INV','INV_NO_LOT_CONTROL');
422: OE_MSG_PUB.Add;
423: l_return_status := FND_API.G_RET_STS_ERROR;
424: END IF;
425:
426: /* IF l_sublot_ctl <> 1 and INVCONV
427: ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR

Line 427: ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR

423: l_return_status := FND_API.G_RET_STS_ERROR;
424: END IF;
425:
426: /* IF l_sublot_ctl <> 1 and INVCONV
427: ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR
428: and p_Lot_Serial_rec.sublot_number IS NOT NULL ) then
429: IF l_debug_level > 0 THEN
430: oe_debug_pub.add( 'OPM INVALID LINE LOT SERIALS SUBLOT NUMBER...' ) ;
431: END IF;

Line 434: l_return_status := FND_API.G_RET_STS_ERROR;

430: oe_debug_pub.add( 'OPM INVALID LINE LOT SERIALS SUBLOT NUMBER...' ) ;
431: END IF;
432: FND_MESSAGE.SET_NAME('GMI','IC_SUBLOTNO');
433: OE_MSG_PUB.Add;
434: l_return_status := FND_API.G_RET_STS_ERROR;
435: END IF; */
436:
437: /* IF l_sublot_ctl = 1 and
438: ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR

Line 438: ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR

434: l_return_status := FND_API.G_RET_STS_ERROR;
435: END IF; */
436:
437: /* IF l_sublot_ctl = 1 and
438: ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR
439: and p_Lot_Serial_rec.sublot_number IS NOT NULL )
440: and
441: ( p_Lot_Serial_rec.lot_number = FND_API.G_MISS_CHAR
442: or p_Lot_Serial_rec.lot_number IS NULL ) then

Line 441: ( p_Lot_Serial_rec.lot_number = FND_API.G_MISS_CHAR

437: /* IF l_sublot_ctl = 1 and
438: ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR
439: and p_Lot_Serial_rec.sublot_number IS NOT NULL )
440: and
441: ( p_Lot_Serial_rec.lot_number = FND_API.G_MISS_CHAR
442: or p_Lot_Serial_rec.lot_number IS NULL ) then
443:
444: IF l_debug_level > 0 THEN
445: oe_debug_pub.add( 'OPM INVALID LINE LOT SERIALS NO LOT NUMBER...' ) ;

Line 449: l_return_status := FND_API.G_RET_STS_ERROR;

445: oe_debug_pub.add( 'OPM INVALID LINE LOT SERIALS NO LOT NUMBER...' ) ;
446: END IF;
447: FND_MESSAGE.SET_NAME('INV','INV_MISSING_LOT');
448: OE_MSG_PUB.Add;
449: l_return_status := FND_API.G_RET_STS_ERROR;
450: END IF; */
451:
452:
453: IF ( l_RMA_LOT_RESTRICT = 'R' OR -- INVCONV

Line 456: and ( p_Lot_Serial_rec.lot_number <> FND_API.G_MISS_CHAR

452:
453: IF ( l_RMA_LOT_RESTRICT = 'R' OR -- INVCONV
454: l_RMA_LOT_RESTRICT = 'W' ) -- RESTRICTED_WITH_WARNING' -- INVCONV
455: and l_lot_ctl = 2 -- (YES) INVCONV
456: and ( p_Lot_Serial_rec.lot_number <> FND_API.G_MISS_CHAR
457: and p_Lot_Serial_rec.lot_number IS NOT NULL )
458: then
459: begin
460:

Line 474: l_return_status := FND_API.G_RET_STS_ERROR;

470: oe_debug_pub.add( 'NO_DATA_FOUND WHEN checking RMA attribute lot number' ) ;
471: END IF;
472: FND_MESSAGE.SET_NAME('INV','INV_CHECK_LOT_ENTRY'); -- INVCONV PLSE ENTER A VALID LOT NUMBER
473: OE_MSG_PUB.Add;
474: l_return_status := FND_API.G_RET_STS_ERROR;
475:
476: END IF;
477:
478:

Line 495: l_return_status := FND_API.G_RET_STS_ERROR;

491: END IF;
492: l_lot_id := 0;
493: FND_MESSAGE.SET_NAME('INV','INV_CHECK_LOT_ENTRY'); -- INVCONV PLSE ENTER A VALID LOT NUMBER
494: OE_MSG_PUB.Add;
495: l_return_status := FND_API.G_RET_STS_ERROR;
496:
497: END IF;
498:
499: Close c_opm_lot1; */

Line 508: and ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR

504:
505: /* IF ( l_opm_rma_profile = 'RESTRICTED' OR --INVCONV
506: l_opm_rma_profile = 'RESTRICTED_WITH_WARNING' )
507: -- and l_sublot_ctl = 1 INVCONV
508: and ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR
509: and p_Lot_Serial_rec.sublot_number IS NOT NULL )
510: then
511: begin
512: OPEN c_opm_lot2( l_item_rec.opm_item_id ,

Line 526: l_return_status := FND_API.G_RET_STS_ERROR;

522: END IF;
523: l_lot_id := 0;
524: FND_MESSAGE.SET_NAME('GMI','IC_SUBLOTNO');
525: OE_MSG_PUB.Add;
526: l_return_status := FND_API.G_RET_STS_ERROR;
527:
528: END IF;
529:
530: Close c_opm_lot2;

Line 541: ( p_lot_serial_rec.quantity2 <> FND_API.G_MISS_NUM

537: IF l_debug_level > 0 THEN
538: oe_debug_pub.add( 'OE_VALIDATE_LOT_SERIAL.ENTITY - validating QUANTITY2...' ) ;
539: END IF;
540: IF l_tracking_quantity_ind = 'P' and -- INVCONV l_dualum_ind < 1 and
541: ( p_lot_serial_rec.quantity2 <> FND_API.G_MISS_NUM
542: and p_lot_serial_rec.quantity2 IS NOT NULL
543: and p_lot_serial_rec.quantity2 <> 0) then -- Bug 9408981
544:
545: IF l_debug_level > 0 THEN

Line 553: l_return_status := FND_API.G_RET_STS_ERROR;

549: --FND_MESSAGE.SET_TOKEN('ITEM_NO',L_ITEM_NO); INVCONV
550: --FND_MESSAGE.SET_TOKEN('LOT_NO',p_lot_serial_rec.lot_number); INVCONV
551: --FND_MESSAGE.SET_TOKEN('SUBLOT_NO',p_lot_serial_rec.sublot_number); INVCONV
552: OE_MSG_PUB.Add;
553: l_return_status := FND_API.G_RET_STS_ERROR;
554: END IF;
555:
556: IF l_debug_level > 0 THEN
557: oe_debug_pub.add( 'OE_VALIDATE_LOT_SERIAL.ENTITY - validating QUANTITY2 negative ...' ) ;

Line 565: l_return_status := FND_API.G_RET_STS_ERROR;

561: IF nvl(p_lot_serial_rec.quantity2, 0) < 0 then
562:
563: FND_MESSAGE.SET_NAME('ONT','SO_PR_NEGATIVE_AMOUNT');
564: OE_MSG_PUB.Add;
565: l_return_status := FND_API.G_RET_STS_ERROR;
566: IF l_debug_level > 0 THEN
567: oe_debug_pub.add ('INVALID LINE LOT SERIALS QUANTITY2 - negative....');
568: END IF;
569: END IF;

Line 586: l_return_status := FND_API.G_RET_STS_ERROR;

582: IF (NVL(p_Lot_Serial_rec.quantity2,0) = 0 )
583: OR (NVL(p_Lot_Serial_rec.quantity,0 ) = 0 ) THEN
584: FND_MESSAGE.SET_NAME('ONT','OE_BULK_OPM_NULL_QTY');
585: OE_MSG_PUB.Add;
586: l_return_status := FND_API.G_RET_STS_ERROR;
587: IF l_debug_level > 0 THEN
588: oe_debug_pub.add ('INVALID LINE LOT SERIALS - one qty is blank for type No Default..');
589: END IF;
590: END IF;

Line 597: and ( p_Lot_Serial_rec.quantity <> FND_API.G_MISS_NUM and

593: -- tolerance check for Default and No Default items (old type 2,3)
594:
595: --IF l_dualum_ind in(2,3)
596: IF l_secondary_default_ind in ('N','D')
597: and ( p_Lot_Serial_rec.quantity <> FND_API.G_MISS_NUM and
598: NVL(p_Lot_Serial_rec.quantity,0) <> 0 )
599: and ( p_Lot_Serial_rec.quantity2 <> FND_API.G_MISS_NUM and
600: NVL(p_Lot_Serial_rec.quantity2,0) <> 0 )
601: then

Line 599: and ( p_Lot_Serial_rec.quantity2 <> FND_API.G_MISS_NUM and

595: --IF l_dualum_ind in(2,3)
596: IF l_secondary_default_ind in ('N','D')
597: and ( p_Lot_Serial_rec.quantity <> FND_API.G_MISS_NUM and
598: NVL(p_Lot_Serial_rec.quantity,0) <> 0 )
599: and ( p_Lot_Serial_rec.quantity2 <> FND_API.G_MISS_NUM and
600: NVL(p_Lot_Serial_rec.quantity2,0) <> 0 )
601: then
602:
603: l_quantity := p_Lot_Serial_rec.quantity;

Line 613: and ( p_Lot_Serial_rec.lot_number <> FND_API.G_MISS_CHAR

609: oe_debug_pub.add( 'OE_Validate_Lot_Serial.entity - tolerance check for type Default and No Default ..' ) ;
610: END IF;
611:
612: /* IF l_lot_ctl = 2 -- INVCONV PAL bug fix for lot number -- 4260166
613: and ( p_Lot_Serial_rec.lot_number <> FND_API.G_MISS_CHAR
614: and p_Lot_Serial_rec.lot_number IS NOT NULL )
615: then
616: begin
617:

Line 639: and ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR

635:
636: */
637:
638: /* IF l_sublot_ctl = 1 -- INVCONV
639: and ( p_Lot_Serial_rec.sublot_number <> FND_API.G_MISS_CHAR
640: and p_Lot_Serial_rec.sublot_number IS NOT NULL )
641: then
642: begin
643: OPEN c_opm_lot2( l_item_rec.opm_item_id ,

Line 718: l_return_status := FND_API.G_RET_STS_ERROR;

714: ,l_item_um2
715: ,0);
716:
717: IF (l_return = -68 ) THEN
718: l_return_status := FND_API.G_RET_STS_ERROR;
719: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
720: OE_MSG_PUB.Add;
721: ELSIF(l_return = -69 ) THEN
722: l_return_status := FND_API.G_RET_STS_ERROR;

Line 722: l_return_status := FND_API.G_RET_STS_ERROR;

718: l_return_status := FND_API.G_RET_STS_ERROR;
719: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
720: OE_MSG_PUB.Add;
721: ELSIF(l_return = -69 ) THEN
722: l_return_status := FND_API.G_RET_STS_ERROR;
723: FND_MESSAGE.set_name('GMI','IC_DEVIATION_LO_ERR');
724: OE_MSG_PUB.Add;
725: END IF;
726: IF l_return <> 0

Line 728: l_return_status := FND_API.G_RET_STS_ERROR;

724: OE_MSG_PUB.Add;
725: END IF;
726: IF l_return <> 0
727: THEN
728: l_return_status := FND_API.G_RET_STS_ERROR;
729:
730: END IF; */
731:
732: IF l_debug_level > 0 THEN

Line 753: WHEN FND_API.G_EXC_ERROR THEN

749: END IF;
750:
751: EXCEPTION
752:
753: WHEN FND_API.G_EXC_ERROR THEN
754:
755: x_return_status := FND_API.G_RET_STS_ERROR;
756:
757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 755: x_return_status := FND_API.G_RET_STS_ERROR;

751: EXCEPTION
752:
753: WHEN FND_API.G_EXC_ERROR THEN
754:
755: x_return_status := FND_API.G_RET_STS_ERROR;
756:
757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
758:
759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

753: WHEN FND_API.G_EXC_ERROR THEN
754:
755: x_return_status := FND_API.G_RET_STS_ERROR;
756:
757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
758:
759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
760:
761: WHEN TOLERANCE_ERROR THEN -- INVCONV

Line 759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

755: x_return_status := FND_API.G_RET_STS_ERROR;
756:
757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
758:
759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
760:
761: WHEN TOLERANCE_ERROR THEN -- INVCONV
762: oe_debug_pub.add('Exception handling: TOLERANCE_ERROR in OE_VALIDATE_LOT_SERIAL.ENTITY', 1);
763: x_return_status := -1;

Line 767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

763: x_return_status := -1;
764:
765: WHEN OTHERS THEN
766:
767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
768:
769: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
770: THEN
771: OE_MSG_PUB.Add_Exc_Msg

Line 799: x_return_status := FND_API.G_RET_STS_SUCCESS;

795:
796: IF l_debug_level > 0 THEN
797: oe_debug_pub.add( 'ENTERING OE_VALIDATE_LOT_SERIAL.ATTRIBUTES' , 1 ) ;
798: END IF;
799: x_return_status := FND_API.G_RET_STS_SUCCESS;
800:
801: -- Validate Lot_Serial attributes
802:
803: IF p_Lot_Serial_rec.created_by IS NOT NULL AND

Line 809: x_return_status := FND_API.G_RET_STS_ERROR;

805: p_old_Lot_Serial_rec.created_by OR
806: p_old_Lot_Serial_rec.created_by IS NULL )
807: THEN
808: IF NOT OE_Validate.Created_By(p_Lot_Serial_rec.created_by) THEN
809: x_return_status := FND_API.G_RET_STS_ERROR;
810: END IF;
811: END IF;
812:
813: IF p_Lot_Serial_rec.creation_date IS NOT NULL AND

Line 819: x_return_status := FND_API.G_RET_STS_ERROR;

815: p_old_Lot_Serial_rec.creation_date OR
816: p_old_Lot_Serial_rec.creation_date IS NULL )
817: THEN
818: IF NOT OE_Validate.Creation_Date(p_Lot_Serial_rec.creation_date) THEN
819: x_return_status := FND_API.G_RET_STS_ERROR;
820: END IF;
821: END IF;
822:
823: IF p_Lot_Serial_rec.from_serial_number IS NOT NULL AND

Line 829: x_return_status := FND_API.G_RET_STS_ERROR;

825: p_old_Lot_Serial_rec.from_serial_number OR
826: p_old_Lot_Serial_rec.from_serial_number IS NULL )
827: THEN
828: IF NOT OE_Validate.From_Serial_Number(p_Lot_Serial_rec.from_serial_number) THEN
829: x_return_status := FND_API.G_RET_STS_ERROR;
830: END IF;
831: END IF;
832:
833: IF p_Lot_Serial_rec.last_updated_by IS NOT NULL AND

Line 839: x_return_status := FND_API.G_RET_STS_ERROR;

835: p_old_Lot_Serial_rec.last_updated_by OR
836: p_old_Lot_Serial_rec.last_updated_by IS NULL )
837: THEN
838: IF NOT OE_Validate.Last_Updated_By(p_Lot_Serial_rec.last_updated_by) THEN
839: x_return_status := FND_API.G_RET_STS_ERROR;
840: END IF;
841: END IF;
842:
843: IF p_Lot_Serial_rec.last_update_date IS NOT NULL AND

Line 849: x_return_status := FND_API.G_RET_STS_ERROR;

845: p_old_Lot_Serial_rec.last_update_date OR
846: p_old_Lot_Serial_rec.last_update_date IS NULL )
847: THEN
848: IF NOT OE_Validate.Last_Update_Date(p_Lot_Serial_rec.last_update_date) THEN
849: x_return_status := FND_API.G_RET_STS_ERROR;
850: END IF;
851: END IF;
852:
853: IF p_Lot_Serial_rec.last_update_login IS NOT NULL AND

Line 859: x_return_status := FND_API.G_RET_STS_ERROR;

855: p_old_Lot_Serial_rec.last_update_login OR
856: p_old_Lot_Serial_rec.last_update_login IS NULL )
857: THEN
858: IF NOT OE_Validate.Last_Update_Login(p_Lot_Serial_rec.last_update_login) THEN
859: x_return_status := FND_API.G_RET_STS_ERROR;
860: END IF;
861: END IF;
862:
863: IF p_Lot_Serial_rec.line_id IS NOT NULL AND

Line 869: x_return_status := FND_API.G_RET_STS_ERROR;

865: p_old_Lot_Serial_rec.line_id OR
866: p_old_Lot_Serial_rec.line_id IS NULL )
867: THEN
868: IF NOT OE_Validate.Line(p_Lot_Serial_rec.line_id) THEN
869: x_return_status := FND_API.G_RET_STS_ERROR;
870: END IF;
871: END IF;
872:
873: IF p_Lot_Serial_rec.line_set_id IS NOT NULL AND

Line 879: x_return_status := FND_API.G_RET_STS_ERROR;

875: p_old_Lot_Serial_rec.line_set_id OR
876: p_old_Lot_Serial_rec.line_set_id IS NULL )
877: THEN
878: IF NOT OE_Validate.Line_Set(p_Lot_Serial_rec.line_set_id) THEN
879: x_return_status := FND_API.G_RET_STS_ERROR;
880: END IF;
881: END IF;
882:
883: IF p_Lot_Serial_rec.lot_number IS NOT NULL AND

Line 889: x_return_status := FND_API.G_RET_STS_ERROR;

885: p_old_Lot_Serial_rec.lot_number OR
886: p_old_Lot_Serial_rec.lot_number IS NULL )
887: THEN
888: IF NOT OE_Validate.Lot_Number(p_Lot_Serial_rec.lot_number) THEN
889: x_return_status := FND_API.G_RET_STS_ERROR;
890: END IF;
891: END IF;
892:
893:

Line 902: x_return_status := FND_API.G_RET_STS_ERROR;

898: p_old_Lot_Serial_rec.sublot_number OR
899: p_old_Lot_Serial_rec.sublot_number IS NULL )
900: THEN
901: IF NOT OE_Validate.Sublot_Number(p_Lot_Serial_rec.sublot_number) THEN
902: x_return_status := FND_API.G_RET_STS_ERROR;
903: END IF;
904: END IF;
905:
906: END IF; */

Line 914: x_return_status := FND_API.G_RET_STS_ERROR;

910: p_old_Lot_Serial_rec.lot_serial_id OR
911: p_old_Lot_Serial_rec.lot_serial_id IS NULL )
912: THEN
913: IF NOT OE_Validate.Lot_Serial(p_Lot_Serial_rec.lot_serial_id) THEN
914: x_return_status := FND_API.G_RET_STS_ERROR;
915: END IF;
916: END IF;
917:
918: IF p_Lot_Serial_rec.quantity IS NOT NULL AND

Line 924: x_return_status := FND_API.G_RET_STS_ERROR;

920: p_old_Lot_Serial_rec.quantity OR
921: p_old_Lot_Serial_rec.quantity IS NULL )
922: THEN
923: IF NOT OE_Validate.Quantity(p_Lot_Serial_rec.quantity) THEN
924: x_return_status := FND_API.G_RET_STS_ERROR;
925: END IF;
926: END IF;
927:
928: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN

Line 937: x_return_status := FND_API.G_RET_STS_ERROR;

933: p_old_Lot_Serial_rec.quantity2 IS NULL )
934: THEN
935:
936: IF NOT OE_Validate.Quantity2(p_Lot_Serial_rec.quantity2) THEN
937: x_return_status := FND_API.G_RET_STS_ERROR;
938: END IF;
939: END IF;
940:
941: END IF;

Line 949: x_return_status := FND_API.G_RET_STS_ERROR;

945: p_old_Lot_Serial_rec.to_serial_number OR
946: p_old_Lot_Serial_rec.to_serial_number IS NULL )
947: THEN
948: IF NOT OE_Validate.To_Serial_Number(p_Lot_Serial_rec.to_serial_number) THEN
949: x_return_status := FND_API.G_RET_STS_ERROR;
950: END IF;
951: END IF;
952:
953: IF (p_Lot_Serial_rec.attribute1 IS NOT NULL AND

Line 1091: x_return_status := FND_API.G_RET_STS_ERROR;

1087:
1088: -- Validate descriptive flexfield.
1089:
1090: IF NOT OE_Validate.Desc_Flex( 'LOT_SERIAL' ) THEN
1091: x_return_status := FND_API.G_RET_STS_ERROR;
1092: END IF;
1093: */
1094: NULL;
1095: END IF;

Line 1104: WHEN FND_API.G_EXC_ERROR THEN

1100: END IF;
1101:
1102: EXCEPTION
1103:
1104: WHEN FND_API.G_EXC_ERROR THEN
1105:
1106: x_return_status := FND_API.G_RET_STS_ERROR;
1107:
1108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1106: x_return_status := FND_API.G_RET_STS_ERROR;

1102: EXCEPTION
1103:
1104: WHEN FND_API.G_EXC_ERROR THEN
1105:
1106: x_return_status := FND_API.G_RET_STS_ERROR;
1107:
1108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1109:
1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1104: WHEN FND_API.G_EXC_ERROR THEN
1105:
1106: x_return_status := FND_API.G_RET_STS_ERROR;
1107:
1108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1109:
1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1111:
1112: WHEN OTHERS THEN

Line 1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1106: x_return_status := FND_API.G_RET_STS_ERROR;
1107:
1108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1109:
1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1111:
1112: WHEN OTHERS THEN
1113:
1114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1111:
1112: WHEN OTHERS THEN
1113:
1114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1115:
1116: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1117: THEN
1118: OE_MSG_PUB.Add_Exc_Msg

Line 1134: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1130:
1131: , p_Lot_Serial_rec IN OE_Order_PUB.Lot_Serial_Rec_Type
1132: )
1133: IS
1134: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1135: --
1136: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1137: --
1138: BEGIN

Line 1150: WHEN FND_API.G_EXC_ERROR THEN

1146: x_return_status := l_return_status;
1147:
1148: EXCEPTION
1149:
1150: WHEN FND_API.G_EXC_ERROR THEN
1151:
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153:
1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1152: x_return_status := FND_API.G_RET_STS_ERROR;

1148: EXCEPTION
1149:
1150: WHEN FND_API.G_EXC_ERROR THEN
1151:
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153:
1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1155:
1156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1150: WHEN FND_API.G_EXC_ERROR THEN
1151:
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153:
1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1155:
1156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1157:
1158: WHEN OTHERS THEN

Line 1156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153:
1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1155:
1156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1157:
1158: WHEN OTHERS THEN
1159:
1160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1157:
1158: WHEN OTHERS THEN
1159:
1160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1161:
1162: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1163: THEN
1164: OE_MSG_PUB.Add_Exc_Msg

Line 1177: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1173: ( x_return_status OUT NOCOPY VARCHAR2
1174:
1175: , p_x_Lot_Serial_rec IN OE_Order_PUB.Lot_Serial_Rec_Type
1176: ) IS
1177: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1178: --
1179: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1180: --
1181: BEGIN

Line 1185: WHEN FND_API.G_EXC_ERROR THEN

1181: BEGIN
1182: NULL;
1183: EXCEPTION
1184:
1185: WHEN FND_API.G_EXC_ERROR THEN
1186:
1187: x_return_status := FND_API.G_RET_STS_ERROR;
1188:
1189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1187: x_return_status := FND_API.G_RET_STS_ERROR;

1183: EXCEPTION
1184:
1185: WHEN FND_API.G_EXC_ERROR THEN
1186:
1187: x_return_status := FND_API.G_RET_STS_ERROR;
1188:
1189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1190:
1191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1185: WHEN FND_API.G_EXC_ERROR THEN
1186:
1187: x_return_status := FND_API.G_RET_STS_ERROR;
1188:
1189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1190:
1191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1192:
1193: WHEN OTHERS THEN

Line 1191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1187: x_return_status := FND_API.G_RET_STS_ERROR;
1188:
1189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1190:
1191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1192:
1193: WHEN OTHERS THEN
1194:
1195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1192:
1193: WHEN OTHERS THEN
1194:
1195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1196:
1197: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1198: THEN
1199: OE_MSG_PUB.Add_Exc_Msg