DBA Data[Home] [Help]

APPS.BOM_VALIDATE_RTG_HEADER dependencies on FND_API

Line 104: l_return_status := FND_API.G_RET_STS_ERROR;

100: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
101: , p_message_name => 'BOM_RTG_ALREADY_EXISTS'
102: , p_token_tbl => l_token_tbl
103: );
104: l_return_status := FND_API.G_RET_STS_ERROR;
105:
106: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
107: p_rtg_header_rec.transaction_type IN
108: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

Line 119: l_return_status := FND_API.G_RET_STS_ERROR;

115: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
116: , p_message_name => 'BOM_RTG_DOESNOT_EXISTS'
117: , p_token_tbl => l_token_tbl
118: );
119: l_return_status := FND_API.G_RET_STS_ERROR;
120: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
121: THEN
122: Error_Handler.Add_Error_Token
123: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl

Line 120: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR

116: , p_message_name => 'BOM_RTG_DOESNOT_EXISTS'
117: , p_token_tbl => l_token_tbl
118: );
119: l_return_status := FND_API.G_RET_STS_ERROR;
120: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
121: THEN
122: Error_Handler.Add_Error_Token
123: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
124: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 132: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

128: 'Assembly item '||
129: p_rtg_header_rec.assembly_item_name
130: , p_token_tbl => l_token_tbl
131: );
132: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
133:
134: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS
135: THEN
136: l_return_status := FND_API.G_RET_STS_SUCCESS;

Line 134: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS

130: , p_token_tbl => l_token_tbl
131: );
132: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
133:
134: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS
135: THEN
136: l_return_status := FND_API.G_RET_STS_SUCCESS;
137: END IF;
138:

Line 136: l_return_status := FND_API.G_RET_STS_SUCCESS;

132: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
133:
134: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS
135: THEN
136: l_return_status := FND_API.G_RET_STS_SUCCESS;
137: END IF;
138:
139: x_return_status := l_return_status;
140: x_mesg_token_tbl := l_mesg_token_tbl;

Line 157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

153: , x_mesg_token_tbl => l_mesg_token_tbl
154: ) ;
155:
156: -- Return the status and message table.
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: x_mesg_token_tbl := l_mesg_token_tbl ;
159:
160:
161: END Check_Existence;

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

183: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
184: , x_return_status IN OUT NOCOPY VARCHAR2
185: )
186: IS
187: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
188: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type :=
189: p_mesg_token_tbl;
190: l_err_text VARCHAR2(2000);
191:

Line 224: l_return_status := FND_API.G_RET_STS_ERROR;

220: ( p_Message_name => 'BOM_ASSEMBLY_TYPE_ENG'
221: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
222: , x_mesg_token_tbl => l_mesg_token_tbl
223: );
224: l_return_status := FND_API.G_RET_STS_ERROR;
225: END IF; */
226:
227: IF BOM_Rtg_Globals.Get_STD_Item_Access IS NULL AND
228: BOM_Rtg_Globals.Get_PLN_Item_Access IS NULL AND

Line 327: l_return_status := FND_API.G_RET_STS_ERROR ;

323: , p_Mesg_Token_Tbl => l_mesg_token_tbl
324: , x_Mesg_Token_Tbl => l_mesg_token_tbl
325: , p_Token_Tbl => l_token_tbl
326: );
327: l_return_status := FND_API.G_RET_STS_ERROR ;
328:
329: ELSIF l_Bom_Item_Type = 3
330: THEN
331: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';

Line 341: l_return_status := FND_API.G_RET_STS_ERROR;

337: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
338: , x_mesg_token_tbl => l_mesg_token_tbl
339: , p_Token_Tbl => l_token_tbl
340: );
341: l_return_status := FND_API.G_RET_STS_ERROR;
342:
343:
344: END IF;
345:

Line 372: l_return_status := FND_API.G_RET_STS_ERROR;

368: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
369: , x_mesg_token_tbl => l_mesg_token_tbl
370: , p_Token_Tbl => l_token_tbl
371: );
372: l_return_status := FND_API.G_RET_STS_ERROR;
373:
374: END IF ;
375:
376: -- Set Eam Item Type to System Info Record.

Line 397: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

393: , x_mesg_token_tbl => l_mesg_token_tbl
394: ) ;
395:
396: -- Return the status and message table.
397: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
398: x_mesg_token_tbl := l_mesg_token_tbl ;
399:
400:
401: END Check_Access;

Line 436: x_return_status := FND_API.G_RET_STS_SUCCESS;

432: x_schema VARCHAR2(50);
433:
434: BEGIN
435:
436: x_return_status := FND_API.G_RET_STS_SUCCESS;
437:
438: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(
439: 'Within Routing Header Check flow routing operability . . . ');
440: END IF;

Line 443: AND p_cfm_routing_flag <> FND_API.G_MISS_NUM

439: 'Within Routing Header Check flow routing operability . . . ');
440: END IF;
441:
442: IF NVL(p_cfm_routing_flag ,2) NOT IN ( 1, 2 ,3)
443: AND p_cfm_routing_flag <> FND_API.G_MISS_NUM
444: THEN
445: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
446: l_token_tbl(1).token_value :=
447: p_assembly_item_name;

Line 458: x_return_status := FND_API.G_RET_STS_ERROR;

454: , p_mesg_token_tbl => l_mesg_token_tbl
455: , x_mesg_token_tbl => l_mesg_token_tbl
456: );
457:
458: x_return_status := FND_API.G_RET_STS_ERROR;
459:
460:
461: ELSIF NVL(p_cfm_routing_flag , 2) = 1
462: THEN

Line 482: x_return_status := FND_API.G_RET_STS_ERROR;

478: , p_mesg_token_tbl => l_mesg_token_tbl
479: , x_mesg_token_tbl => l_mesg_token_tbl
480: );
481:
482: x_return_status := FND_API.G_RET_STS_ERROR;
483:
484: END IF;
485:
486: ELSIF NVL(p_cfm_routing_flag , 2) = 3

Line 510: x_return_status := FND_API.G_RET_STS_ERROR;

506: , p_mesg_token_tbl => l_mesg_token_tbl
507: , x_mesg_token_tbl => l_mesg_token_tbl
508: );
509:
510: x_return_status := FND_API.G_RET_STS_ERROR;
511:
512: END IF;
513:
514: END IF;

Line 548: x_return_status := FND_API.G_RET_STS_ERROR;

544: , p_mesg_token_tbl => l_mesg_token_tbl
545: , x_mesg_token_tbl => l_mesg_token_tbl
546: );
547:
548: x_return_status := FND_API.G_RET_STS_ERROR;
549:
550: ELSE -- CFM Routing Flag is OK
551:
552: -- Check if eAM has been installed

Line 567: x_return_status := FND_API.G_RET_STS_ERROR;

563: , p_mesg_token_tbl => l_mesg_token_tbl
564: , x_mesg_token_tbl => l_mesg_token_tbl
565: );
566:
567: x_return_status := FND_API.G_RET_STS_ERROR;
568:
569: END IF ;
570:
571: --- For Lot Based Routings, need to check if the Org is EAM Enabled.

Line 589: x_return_status := FND_API.G_RET_STS_ERROR;

585: , p_mesg_token_tbl => l_mesg_token_tbl
586: , x_mesg_token_tbl => l_mesg_token_tbl
587: );
588:
589: x_return_status := FND_API.G_RET_STS_ERROR;
590: END IF ;
591:
592: END IF ;
593:

Line 616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

612: , x_mesg_token_tbl => l_mesg_token_tbl
613: ) ;
614:
615: -- Return the status and message table.
616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
617: x_mesg_token_tbl := l_mesg_token_tbl ;
618:
619: END Check_Flow_Routing_Operability ;
620:

Line 648: x_return_status := FND_API.G_RET_STS_SUCCESS;

644:
645:
646: BEGIN
647:
648: x_return_status := FND_API.G_RET_STS_SUCCESS;
649:
650: IF BOM_Rtg_Globals.Get_Debug = 'Y'THEN
651: Error_Handler.Write_Debug('Within Rtg Header Check Attributes . . . ');
652: END IF;

Line 655: p_rtg_header_rec.eng_routing_flag <> FND_API.G_MISS_NUM AND

651: Error_Handler.Write_Debug('Within Rtg Header Check Attributes . . . ');
652: END IF;
653:
654: IF p_rtg_header_rec.eng_routing_flag IS NOT NULL AND
655: p_rtg_header_rec.eng_routing_flag <> FND_API.G_MISS_NUM AND
656: p_rtg_header_rec.eng_routing_flag NOT IN (1,2)
657: THEN
658: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
659: l_token_tbl(1).token_value :=

Line 667: x_return_status := FND_API.G_RET_STS_ERROR;

663: , p_token_tbl => l_token_tbl
664: , p_mesg_token_tbl => l_mesg_token_tbl
665: , x_mesg_token_tbl => l_mesg_token_tbl
666: );
667: x_return_status := FND_API.G_RET_STS_ERROR;
668: END IF;
669:
670: IF p_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
671: THEN

Line 672: IF p_rtg_header_rec.eng_routing_flag = FND_API.G_MISS_NUM

668: END IF;
669:
670: IF p_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
671: THEN
672: IF p_rtg_header_rec.eng_routing_flag = FND_API.G_MISS_NUM
673: THEN
674: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
675: l_token_tbl(1).token_value :=
676: p_rtg_header_rec.assembly_item_name;

Line 683: x_return_status := FND_API.G_RET_STS_ERROR;

679: , p_token_tbl => l_token_tbl
680: , p_mesg_token_tbl => l_mesg_token_tbl
681: , x_mesg_token_tbl => l_mesg_token_tbl
682: );
683: x_return_status := FND_API.G_RET_STS_ERROR;
684: END IF ;
685: END IF;
686:
687:

Line 690: <> FND_API.G_MISS_NUM AND

686:
687:
688: IF p_rtg_header_rec.mixed_model_map_flag IS NOT NULL AND
689: p_rtg_header_rec.mixed_model_map_flag
690: <> FND_API.G_MISS_NUM AND
691: p_rtg_header_rec.mixed_model_map_flag NOT IN (1,2)
692: THEN
693: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
694: l_token_tbl(1).token_value :=

Line 702: x_return_status := FND_API.G_RET_STS_ERROR;

698: , p_token_tbl => l_token_tbl
699: , p_mesg_token_tbl => l_mesg_token_tbl
700: , x_mesg_token_tbl => l_mesg_token_tbl
701: );
702: x_return_status := FND_API.G_RET_STS_ERROR;
703: END IF;
704:
705: IF p_rtg_header_rec.ctp_flag IS NOT NULL AND
706: p_rtg_header_rec.ctp_flag <> FND_API.G_MISS_NUM AND

Line 706: p_rtg_header_rec.ctp_flag <> FND_API.G_MISS_NUM AND

702: x_return_status := FND_API.G_RET_STS_ERROR;
703: END IF;
704:
705: IF p_rtg_header_rec.ctp_flag IS NOT NULL AND
706: p_rtg_header_rec.ctp_flag <> FND_API.G_MISS_NUM AND
707: p_rtg_header_rec.ctp_flag NOT IN (1,2)
708: THEN
709: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
710: l_token_tbl(1).token_value :=

Line 718: x_return_status := FND_API.G_RET_STS_ERROR;

714: , p_token_tbl => l_token_tbl
715: , p_mesg_token_tbl => l_mesg_token_tbl
716: , x_mesg_token_tbl => l_mesg_token_tbl
717: );
718: x_return_status := FND_API.G_RET_STS_ERROR;
719: END IF;
720:
721:
722:

Line 724: p_rtg_header_rec.cfm_routing_flag <> FND_API.G_MISS_NUM AND

720:
721:
722:
723: IF p_rtg_header_rec.cfm_routing_flag IS NOT NULL AND
724: p_rtg_header_rec.cfm_routing_flag <> FND_API.G_MISS_NUM AND
725: p_old_rtg_header_rec.cfm_routing_flag <> FND_API.G_MISS_NUM AND
726: p_rtg_header_rec.cfm_routing_flag <>
727: p_old_rtg_header_rec.cfm_routing_flag
728: THEN

Line 725: p_old_rtg_header_rec.cfm_routing_flag <> FND_API.G_MISS_NUM AND

721:
722:
723: IF p_rtg_header_rec.cfm_routing_flag IS NOT NULL AND
724: p_rtg_header_rec.cfm_routing_flag <> FND_API.G_MISS_NUM AND
725: p_old_rtg_header_rec.cfm_routing_flag <> FND_API.G_MISS_NUM AND
726: p_rtg_header_rec.cfm_routing_flag <>
727: p_old_rtg_header_rec.cfm_routing_flag
728: THEN
729:

Line 739: x_return_status := FND_API.G_RET_STS_ERROR;

735: , p_token_tbl => l_token_tbl
736: , p_mesg_token_tbl => l_mesg_token_tbl
737: , x_mesg_token_tbl => l_mesg_token_tbl
738: );
739: x_return_status := FND_API.G_RET_STS_ERROR;
740: END IF;
741:
742:
743: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;

Line 759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

755: , x_mesg_token_tbl => l_mesg_token_tbl
756: ) ;
757:
758: -- Return the status and message table.
759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
760: x_mesg_token_tbl := l_mesg_token_tbl ;
761:
762: END Check_Attributes;
763:

Line 782: x_return_status := FND_API.G_RET_STS_SUCCESS;

778: l_err_text VARCHAR2(2000);
779: l_mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
780: l_Token_Tbl Error_Handler.Token_Tbl_Type;
781: BEGIN
782: x_return_status := FND_API.G_RET_STS_SUCCESS;
783:
784: IF ( p_rtg_header_unexp_rec.common_routing_sequence_id
785: IS NULL
786: OR

Line 788: FND_API.G_MISS_NUM

784: IF ( p_rtg_header_unexp_rec.common_routing_sequence_id
785: IS NULL
786: OR
787: p_rtg_header_unexp_rec.common_routing_sequence_id <>
788: FND_API.G_MISS_NUM
789: ) AND
790: ( p_rtg_header_rec.common_assembly_item_name IS NOT NULL
791: AND p_rtg_header_rec.common_assembly_item_name =
792: FND_API.G_MISS_CHAR

Line 792: FND_API.G_MISS_CHAR

788: FND_API.G_MISS_NUM
789: ) AND
790: ( p_rtg_header_rec.common_assembly_item_name IS NOT NULL
791: AND p_rtg_header_rec.common_assembly_item_name =
792: FND_API.G_MISS_CHAR
793: )
794: THEN
795: --
796: -- If common assembly name is given,

Line 810: x_return_status := FND_API.G_RET_STS_ERROR;

806: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
807: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
808: );
809:
810: x_return_status := FND_API.G_RET_STS_ERROR;
811: END IF;
812:
813: IF ( p_rtg_header_rec.cfm_routing_flag = 1) AND
814: ( p_rtg_header_unexp_rec.line_id IS NULL OR

Line 815: p_rtg_header_unexp_rec.line_id = FND_API.G_MISS_NUM

811: END IF;
812:
813: IF ( p_rtg_header_rec.cfm_routing_flag = 1) AND
814: ( p_rtg_header_unexp_rec.line_id IS NULL OR
815: p_rtg_header_unexp_rec.line_id = FND_API.G_MISS_NUM
816: )
817: THEN
818: --
819: -- If the routing is flow routing the line id required.

Line 832: x_return_status := FND_API.G_RET_STS_ERROR;

828: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
829: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
830: );
831:
832: x_return_status := FND_API.G_RET_STS_ERROR;
833: END IF;
834:
835: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
836:

Line 852: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

848: , x_mesg_token_tbl => l_mesg_token_tbl
849: ) ;
850:
851: -- Return the status and message table.
852: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
853: x_mesg_token_tbl := l_mesg_token_tbl ;
854:
855:
856: END Check_Required;

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

1230: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1231: , x_return_status IN OUT NOCOPY VARCHAR2
1232: )
1233: IS
1234: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1235: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
1236: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1237: l_dummy VARCHAR2(1);
1238: l_HasOps BOOLEAN := FALSE;

Line 1483: l_return_status := FND_API.G_RET_STS_ERROR;

1479: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1480: , p_token_tbl => g_token_tbl
1481: );
1482:
1483: l_return_status := FND_API.G_RET_STS_ERROR;
1484: END IF;
1485:
1486: --
1487: -- Item Attribute: BOM Allowed must be set Yes for the item

Line 1503: l_return_status := FND_API.G_RET_STS_ERROR;

1499: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1500: , p_token_tbl => g_token_tbl
1501: );
1502:
1503: l_return_status := FND_API.G_RET_STS_ERROR;
1504:
1505: END IF ;
1506:
1507: --

Line 1524: l_return_status := FND_API.G_RET_STS_ERROR;

1520: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1521: , p_token_tbl => g_token_tbl
1522: );
1523:
1524: l_return_status := FND_API.G_RET_STS_ERROR;
1525: END IF ;
1526:
1527: /*************************************************
1528: -- Current Release, User cannot create Engineering

Line 1549: l_return_status := FND_API.G_RET_STS_ERROR;

1545: , p_mesg_token_tbl => l_Mesg_Token_Tbl
1546: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1547: , p_token_tbl => g_token_tbl
1548: );
1549: l_return_status := FND_API.G_RET_STS_ERROR;
1550: END IF;
1551:
1552: IF p_rtg_header_unexp_rec.routing_type = 2 -- Eng Routing
1553: AND l_eng_item_flag not in ( 'N', 'Y')

Line 1566: l_return_status := FND_API.G_RET_STS_ERROR;

1562: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1563: , p_token_tbl => g_token_tbl
1564: );
1565:
1566: l_return_status := FND_API.G_RET_STS_ERROR;
1567: END IF;
1568: *************************************************/
1569:
1570: -- User is not allowed to create Eng Routing throgh

Line 1595: l_return_status := FND_API.G_RET_STS_ERROR;

1591: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1592: , p_token_tbl => g_token_tbl
1593: );
1594:
1595: l_return_status := FND_API.G_RET_STS_ERROR;
1596: END IF;
1597:
1598:
1599: --

Line 1615: l_return_status := FND_API.G_RET_STS_ERROR;

1611: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1612: , p_token_tbl => g_token_tbl
1613: );
1614:
1615: l_return_status := FND_API.G_RET_STS_ERROR;
1616: END IF ;
1617:
1618:
1619: --

Line 1626: FND_API.G_MISS_CHAR

1622: --
1623: IF p_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1624: AND p_rtg_header_rec.alternate_routing_code IS NOT NULL
1625: AND p_rtg_header_rec.alternate_routing_code <>
1626: FND_API.G_MISS_CHAR
1627: THEN
1628: BEGIN
1629: SELECT '1'
1630: INTO l_dummy

Line 1641: FND_API.G_RET_STS_ERROR;

1637:
1638: EXCEPTION
1639: WHEN NO_DATA_FOUND THEN
1640: l_return_status :=
1641: FND_API.G_RET_STS_ERROR;
1642: l_token_tbl(1).token_name :=
1643: 'ASSEMBLY_ITEM_NAME';
1644: l_token_tbl(1).token_value :=
1645: p_rtg_header_rec.assembly_item_name;

Line 1680: AND p_rtg_header_rec.alternate_routing_code <> FND_API.G_MISS_CHAR

1676: --throwing an error.
1677:
1678: IF p_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1679: AND p_rtg_header_rec.alternate_routing_code IS NOT NULL
1680: AND p_rtg_header_rec.alternate_routing_code <> FND_API.G_MISS_CHAR
1681: THEN
1682: BEGIN
1683: SELECT '1'
1684: INTO l_dummy

Line 1692: l_return_status := FND_API.G_RET_STS_ERROR;

1688: AND organization_id = p_rtg_header_unexp_rec.organization_id
1689: AND disable_date is not null
1690: AND disable_date <= sysdate;
1691:
1692: l_return_status := FND_API.G_RET_STS_ERROR;
1693: l_token_tbl.delete;
1694: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
1695: l_token_tbl(1).token_value := p_rtg_header_rec.assembly_item_name;
1696: l_token_tbl(2).token_name := 'ALTERNATE_ROUTING_CODE';

Line 1746: l_return_status := FND_API.G_RET_STS_ERROR;

1742: , p_token_tbl => l_token_tbl
1743: , p_mesg_token_tbl => l_mesg_token_tbl
1744: , x_mesg_token_tbl => l_mesg_token_tbl
1745: );
1746: l_return_status := FND_API.G_RET_STS_ERROR;
1747: END LOOP ;-- validate common
1748:
1749:
1750: --

Line 1778: l_return_status := FND_API.G_RET_STS_ERROR;

1774: , p_token_tbl => l_token_tbl
1775: , p_mesg_token_tbl => l_mesg_token_tbl
1776: , x_mesg_token_tbl => l_mesg_token_tbl
1777: );
1778: l_return_status := FND_API.G_RET_STS_ERROR;
1779:
1780: EXCEPTION
1781: WHEN NO_DATA_FOUND THEN
1782: NULL;

Line 1810: l_return_status := FND_API.G_RET_STS_ERROR;

1806: , p_token_tbl => l_token_tbl
1807: , p_mesg_token_tbl => l_mesg_token_tbl
1808: , x_mesg_token_tbl => l_mesg_token_tbl
1809: );
1810: l_return_status := FND_API.G_RET_STS_ERROR;
1811:
1812: END LOOP;
1813: END IF ;
1814:

Line 1846: l_return_status := FND_API.G_RET_STS_ERROR;

1842: , p_token_tbl => l_token_tbl
1843: , p_mesg_token_tbl => l_mesg_token_tbl
1844: , x_mesg_token_tbl => l_mesg_token_tbl
1845: );
1846: l_return_status := FND_API.G_RET_STS_ERROR;
1847: END IF;
1848:
1849: END LOOP;
1850: END IF ;

Line 1886: l_return_status := FND_API.G_RET_STS_ERROR;

1882: , p_token_tbl => l_token_tbl
1883: , p_mesg_token_tbl => l_mesg_token_tbl
1884: , x_mesg_token_tbl => l_mesg_token_tbl
1885: );
1886: l_return_status := FND_API.G_RET_STS_ERROR;
1887: END LOOP ;
1888:
1889: END IF;
1890:

Line 1917: l_return_status := FND_API.G_RET_STS_ERROR;

1913: , p_token_tbl => l_token_tbl
1914: , p_mesg_token_tbl => l_mesg_token_tbl
1915: , x_mesg_token_tbl => l_mesg_token_tbl
1916: );
1917: l_return_status := FND_API.G_RET_STS_ERROR;
1918:
1919: END LOOP;
1920: END IF;
1921:

Line 1958: l_return_status := FND_API.G_RET_STS_ERROR;

1954: , p_token_tbl => l_token_tbl
1955: , p_mesg_token_tbl => l_mesg_token_tbl
1956: , x_mesg_token_tbl => l_mesg_token_tbl
1957: );
1958: l_return_status := FND_API.G_RET_STS_ERROR;
1959:
1960: END LOOP;
1961: END IF;
1962:

Line 1965: AND p_rtg_header_rec.priority <> FND_API.G_MISS_NUM

1961: END IF;
1962:
1963: -- Unique priority check.
1964: IF p_rtg_header_rec.priority IS NOT NULL
1965: AND p_rtg_header_rec.priority <> FND_API.G_MISS_NUM
1966: AND ( p_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1967: OR ( p_rtg_header_rec.transaction_type
1968: = BOM_Rtg_Globals.G_OPR_UPDATE
1969: AND p_rtg_header_rec.priority <>

Line 1971: , FND_API.G_MISS_NUM ) )

1967: OR ( p_rtg_header_rec.transaction_type
1968: = BOM_Rtg_Globals.G_OPR_UPDATE
1969: AND p_rtg_header_rec.priority <>
1970: NVL(p_old_rtg_header_rec.priority
1971: , FND_API.G_MISS_NUM ) )
1972: )
1973: THEN
1974: FOR l_priority_rec in c_check_priority(
1975: p_assembly_item_id =>

Line 1996: l_return_status := FND_API.G_RET_STS_ERROR;

1992: , p_token_tbl => l_token_tbl
1993: , p_mesg_token_tbl => l_mesg_token_tbl
1994: , x_mesg_token_tbl => l_mesg_token_tbl
1995: );
1996: l_return_status := FND_API.G_RET_STS_ERROR;
1997:
1998: END LOOP;
1999:
2000: END IF ;

Line 2004: OR p_rtg_header_rec.completion_subinventory = FND_API.G_MISS_CHAR

2000: END IF ;
2001:
2002:
2003: IF p_rtg_header_rec.completion_subinventory IS NULL
2004: OR p_rtg_header_rec.completion_subinventory = FND_API.G_MISS_CHAR
2005: THEN
2006: IF p_rtg_header_unexp_rec.completion_locator_id IS NOT NULL
2007: AND p_rtg_header_unexp_rec.completion_locator_id
2008: <> FND_API.G_MISS_NUM

Line 2008: <> FND_API.G_MISS_NUM

2004: OR p_rtg_header_rec.completion_subinventory = FND_API.G_MISS_CHAR
2005: THEN
2006: IF p_rtg_header_unexp_rec.completion_locator_id IS NOT NULL
2007: AND p_rtg_header_unexp_rec.completion_locator_id
2008: <> FND_API.G_MISS_NUM
2009:
2010: THEN
2011: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME' ;
2012: l_token_tbl(1).token_value :=

Line 2027: l_return_status := FND_API.G_RET_STS_ERROR;

2023: , x_mesg_token_tbl => l_mesg_token_tbl
2024: );
2025: END IF ;
2026:
2027: l_return_status := FND_API.G_RET_STS_ERROR;
2028: END IF;
2029:
2030: END IF;
2031:

Line 2035: <> FND_API.G_MISS_CHAR

2031:
2032:
2033: IF p_rtg_header_rec.Completion_Subinventory IS NOT NULL
2034: AND p_rtg_header_rec.Completion_Subinventory
2035: <> FND_API.G_MISS_CHAR
2036: AND ( p_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
2037: OR ( p_rtg_header_rec.transaction_type
2038: = BOM_Rtg_Globals.G_OPR_UPDATE
2039: AND p_rtg_header_rec.Completion_Subinventory <>

Line 2041: ,FND_API.G_MISS_CHAR )

2037: OR ( p_rtg_header_rec.transaction_type
2038: = BOM_Rtg_Globals.G_OPR_UPDATE
2039: AND p_rtg_header_rec.Completion_Subinventory <>
2040: NVL( p_old_rtg_header_rec.Completion_Subinventory
2041: ,FND_API.G_MISS_CHAR )
2042: )
2043: )
2044: THEN
2045: IF NOT Check_SubInv_Exists

Line 2065: l_return_status := FND_API.G_RET_STS_ERROR;

2061: , p_token_tbl => l_token_tbl
2062: , p_mesg_token_tbl => l_mesg_token_tbl
2063: , x_mesg_token_tbl => l_mesg_token_tbl
2064: );
2065: l_return_status := FND_API.G_RET_STS_ERROR;
2066: ELSE
2067: l_sub_inv_exists := TRUE ;
2068:
2069: END IF ;

Line 2129: l_return_status := FND_API.G_RET_STS_ERROR;

2125: , p_token_tbl => l_token_tbl
2126: , p_mesg_token_tbl => l_mesg_token_tbl
2127: , x_mesg_token_tbl => l_mesg_token_tbl
2128: );
2129: l_return_status := FND_API.G_RET_STS_ERROR;
2130: ELSE
2131: CLOSE c_Restrict_SubInv_Trk;
2132:
2133: END IF;

Line 2160: FND_API.G_RET_STS_ERROR;

2156: , p_mesg_token_tbl => l_mesg_token_tbl
2157: , x_mesg_token_tbl => l_mesg_token_tbl
2158: );
2159: l_return_status :=
2160: FND_API.G_RET_STS_ERROR;
2161: ELSE
2162: CLOSE c_Restrict_SubInv_Asset ;
2163: END IF;
2164:

Line 2188: FND_API.G_RET_STS_ERROR;

2184: , p_mesg_token_tbl => l_mesg_token_tbl
2185: , x_mesg_token_tbl => l_mesg_token_tbl
2186: );
2187: l_return_status :=
2188: FND_API.G_RET_STS_ERROR;
2189:
2190: ELSE
2191: CLOSE c_Restrict_SubInv_Trk;
2192: END IF;

Line 2221: FND_API.G_RET_STS_ERROR;

2217: , p_mesg_token_tbl => l_mesg_token_tbl
2218: , x_mesg_token_tbl => l_mesg_token_tbl
2219: );
2220: l_return_status :=
2221: FND_API.G_RET_STS_ERROR;
2222: ELSE
2223: CLOSE c_SubInventory_Tracked;
2224: END IF;
2225:

Line 2250: FND_API.G_RET_STS_ERROR;

2246: , p_mesg_token_tbl => l_mesg_token_tbl
2247: , x_mesg_token_tbl => l_mesg_token_tbl
2248: );
2249: l_return_status :=
2250: FND_API.G_RET_STS_ERROR;
2251: ELSE
2252: CLOSE c_SubInventory_Asset;
2253: END IF;
2254:

Line 2278: FND_API.G_RET_STS_ERROR;

2274: , p_mesg_token_tbl => l_mesg_token_tbl
2275: , x_mesg_token_tbl => l_mesg_token_tbl
2276: );
2277: l_return_status :=
2278: FND_API.G_RET_STS_ERROR;
2279: ELSE
2280: CLOSE c_Subinventory_Tracked;
2281: END IF;
2282: END IF ; -- End of l_inv_asset_flag = 'Y'

Line 2304: AND p_rtg_header_rec.completion_subinventory <> FND_API.G_MISS_CHAR) --BUG 3872490

2300: NVL(p_rtg_header_unexp_rec.completion_locator_id , 0)
2301: )
2302: OR (p_rtg_header_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
2303: AND p_rtg_header_rec.completion_subinventory is not null --BUG 3872490
2304: AND p_rtg_header_rec.completion_subinventory <> FND_API.G_MISS_CHAR) --BUG 3872490
2305: )
2306: AND NOT Check_Locators( p_organization_id => p_rtg_header_unexp_rec.organization_id
2307: , p_assembly_item_id=> p_rtg_header_unexp_rec.assembly_item_id
2308: , p_locator_id => p_rtg_header_unexp_rec.completion_locator_id

Line 2394: l_return_status := FND_API.G_RET_STS_ERROR;

2390: END IF;
2391:
2392: END IF;
2393:
2394: l_return_status := FND_API.G_RET_STS_ERROR;
2395: END IF; ---end of locator check
2396:
2397: IF p_rtg_header_rec.transaction_type IN (BOM_Rtg_Globals.G_OPR_UPDATE) AND -- Added for SSOS (bug 2689249)
2398: p_rtg_header_rec.ser_start_op_seq IS NOT NULL AND

Line 2421: WHEN FND_API.G_EXC_ERROR THEN

2417: END IF ;
2418:
2419: EXCEPTION
2420:
2421: WHEN FND_API.G_EXC_ERROR THEN
2422:
2423: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Expected Error in routing header Entity Validation . . .'); END IF;
2424:
2425: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2425: x_return_status := FND_API.G_RET_STS_ERROR;

2421: WHEN FND_API.G_EXC_ERROR THEN
2422:
2423: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Expected Error in routing header Entity Validation . . .'); END IF;
2424:
2425: x_return_status := FND_API.G_RET_STS_ERROR;
2426: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
2427:
2428: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2429:

Line 2428: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2424:
2425: x_return_status := FND_API.G_RET_STS_ERROR;
2426: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
2427:
2428: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2429:
2430: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Unexpected Error in routing header Entity Validation . . .'); END IF;
2431:
2432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2428: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2429:
2430: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Unexpected Error in routing header Entity Validation . . .'); END IF;
2431:
2432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2433: IF FND_MSG_PUB.Check_Msg_Level
2434: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2435: THEN
2436: l_err_text := G_PKG_NAME ||

Line 2449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2445: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
2446:
2447: WHEN OTHERS THEN
2448: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(SQLERRM || ' ' || TO_CHAR(SQLCODE)); END IF;
2449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2450: IF FND_MSG_PUB.Check_Msg_Level
2451: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2452: THEN
2453: l_err_text := G_PKG_NAME ||

Line 2489: x_return_status := FND_API.G_RET_STS_SUCCESS;

2485: WHERE delete_group_name = p_rtg_header_rec.Delete_Group_Name
2486: AND organization_id = p_rtg_header_Unexp_Rec.organization_id;
2487:
2488: BEGIN
2489: x_return_status := FND_API.G_RET_STS_SUCCESS;
2490: l_rtg_header_unexp_rec := p_rtg_header_unexp_rec;
2491:
2492: IF p_rtg_header_rec.Delete_Group_Name IS NULL OR
2493: p_rtg_header_rec.Delete_Group_Name = FND_API.G_MISS_CHAR

Line 2493: p_rtg_header_rec.Delete_Group_Name = FND_API.G_MISS_CHAR

2489: x_return_status := FND_API.G_RET_STS_SUCCESS;
2490: l_rtg_header_unexp_rec := p_rtg_header_unexp_rec;
2491:
2492: IF p_rtg_header_rec.Delete_Group_Name IS NULL OR
2493: p_rtg_header_rec.Delete_Group_Name = FND_API.G_MISS_CHAR
2494: THEN
2495: Error_Handler.Add_Error_Token
2496: ( p_message_name => 'BOM_DG_NAME_MISSING'
2497: , p_mesg_token_tbl => l_mesg_token_tbl

Line 2500: x_return_status := FND_API.G_RET_STS_ERROR;

2496: ( p_message_name => 'BOM_DG_NAME_MISSING'
2497: , p_mesg_token_tbl => l_mesg_token_tbl
2498: , x_mesg_token_tbl => x_mesg_token_tbl
2499: );
2500: x_return_status := FND_API.G_RET_STS_ERROR;
2501: RETURN;
2502: END IF;
2503:
2504: For c_CheckGroup in CheckGroup

Line 2512: x_return_status := FND_API.G_RET_STS_ERROR;

2508: ( p_message_name => 'BOM_DUPLICATE_DELETE_GROUP'
2509: , p_mesg_token_tbl=>l_mesg_token_tbl
2510: , x_mesg_token_tbl=>x_mesg_token_tbl
2511: );
2512: x_return_status := FND_API.G_RET_STS_ERROR;
2513: RETURN;
2514: End if;
2515:
2516:

Line 2564: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2560: , x_mesg_token_tbl => l_mesg_token_tbl
2561: ) ;
2562:
2563: -- Return the status and message table.
2564: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2565: x_mesg_token_tbl := l_mesg_token_tbl ;
2566:
2567: x_rtg_header_unexp_rec := l_rtg_header_unexp_rec;
2568:

Line 2602: x_return_status := FND_API.G_RET_STS_ERROR;

2598: , x_mesg_token_tbl => x_mesg_token_tbl
2599: );
2600: END IF;
2601: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('SSOS is invalid....'); END IF;
2602: x_return_status := FND_API.G_RET_STS_ERROR;
2603: END LOOP;
2604: END Check_SSOS;
2605:
2606:

Line 2622: x_return_status := FND_API.G_RET_STS_SUCCESS;

2618: where m.organization_id = p_organization_id
2619: and m.inventory_item_id = p_assembly_item_id;
2620:
2621: BEGIN
2622: x_return_status := FND_API.G_RET_STS_SUCCESS;
2623:
2624: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(
2625: 'Within Routing Header Check lot controlled item . . . ');
2626: END IF;

Line 2631: then x_return_status := FND_API.G_RET_STS_ERROR;

2627:
2628: if BOM_Rtg_Globals.Get_CFM_Rtg_Flag = BOM_Rtg_Globals.G_Lot_Rtg then
2629: FOR cur_count IN lot_check LOOP
2630: if cur_count.lot_control_code = 1
2631: then x_return_status := FND_API.G_RET_STS_ERROR;
2632: end if;
2633: END LOOP;
2634: end if;
2635:

Line 2638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2634: end if;
2635:
2636: EXCEPTION
2637: WHEN OTHERS THEN
2638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2639:
2640: END Check_lot_controlled_item;
2641:
2642: PROCEDURE Validate_SSOS

Line 2661: x_return_status := FND_API.G_RET_STS_SUCCESS;

2657: l_errcode NUMBER;
2658: l_errmsg VARCHAR2(2000);
2659:
2660: BEGIN
2661: x_return_status := FND_API.G_RET_STS_SUCCESS;
2662:
2663: SELECT COUNT(1)
2664: INTO l_nw_opern_count
2665: FROM BOM_OPERATION_SEQUENCES bos,

Line 2694: IF ( ( l_ser_start_op_seq IS NULL ) OR ( l_ser_start_op_seq = FND_API.G_MISS_NUM ) ) THEN

2690: l_ser_start_op_seq := p_ser_start_op_seq;
2691: END IF;
2692:
2693: -- SSOS is required for standard/network routing of serial controlled item.
2694: IF ( ( l_ser_start_op_seq IS NULL ) OR ( l_ser_start_op_seq = FND_API.G_MISS_NUM ) ) THEN
2695:
2696: IF ( FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) )
2697: THEN
2698: Error_Handler.Add_Error_Token

Line 2704: x_return_status := FND_API.G_RET_STS_ERROR;

2700: , p_mesg_token_tbl => x_mesg_token_tbl
2701: , x_mesg_token_tbl => x_mesg_token_tbl
2702: );
2703: END IF;
2704: x_return_status := FND_API.G_RET_STS_ERROR;
2705:
2706: ELSE
2707: -- SSOS should be on primary path of network.
2708: l_retval := WSMPUTIL.PRIMARY_PATH_IS_EFFECTIVE_TILL

Line 2726: x_return_status := FND_API.G_RET_STS_ERROR;

2722: , p_mesg_token_tbl => x_mesg_token_tbl
2723: , x_mesg_token_tbl => x_mesg_token_tbl
2724: );
2725: END IF;
2726: x_return_status := FND_API.G_RET_STS_ERROR;
2727: END IF; -- end if (l_retval = 0)
2728:
2729: END IF; -- end if ( l_ser_start_op_seq IS NULL )
2730: END IF; -- end if ( ( l_ser_num_control_code = 2 ) AND ( NVL(l_cfm_routing_flag, 2) IN (2, 3) ) )

Line 2736: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2732: END IF; -- ( l_nw_opern_count > 0 )
2733:
2734: EXCEPTION
2735: WHEN OTHERS THEN
2736: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2737:
2738: END Validate_SSOS;
2739:
2740: END BOM_Validate_Rtg_Header;