DBA Data[Home] [Help]

APPS.BOM_VALIDATE_SUB_OP_RES dependencies on FND_API

Line 281: x_return_status := FND_API.G_RET_STS_SUCCESS ;

277:
278:
279: BEGIN
280:
281: x_return_status := FND_API.G_RET_STS_SUCCESS ;
282:
283: FOR l_rel_schedule_rec IN l_rel_schedule_csr
284: ( p_op_seq_id
285: , p_sub_group_num

Line 289: x_return_status := FND_API.G_RET_STS_ERROR ;

285: , p_sub_group_num
286: , p_schedule_flag
287: )
288: LOOP
289: x_return_status := FND_API.G_RET_STS_ERROR ;
290: END LOOP ;
291:
292: IF x_return_status <> FND_API.G_RET_STS_ERROR
293: THEN

Line 292: IF x_return_status <> FND_API.G_RET_STS_ERROR

288: LOOP
289: x_return_status := FND_API.G_RET_STS_ERROR ;
290: END LOOP ;
291:
292: IF x_return_status <> FND_API.G_RET_STS_ERROR
293: THEN
294: FOR l_sub_schedule_rec IN l_sub_schedule_csr
295: ( p_op_seq_id
296: , p_resource_id

Line 301: x_return_status := FND_API.G_RET_STS_ERROR ;

297: , p_sub_group_num
298: , p_schedule_flag
299: )
300: LOOP
301: x_return_status := FND_API.G_RET_STS_ERROR ;
302: END LOOP ;
303: END IF ;
304:
305: END Val_Scheduled_Sub_Resource ;

Line 348: x_return_status := FND_API.G_RET_STS_SUCCESS ;

344:
345:
346: BEGIN
347:
348: x_return_status := FND_API.G_RET_STS_SUCCESS ;
349:
350: FOR l_rel_pomove_rec IN l_rel_pomove_csr
351: ( p_op_seq_id
352: , p_sub_group_num

Line 355: x_return_status := FND_API.G_RET_STS_ERROR ;

351: ( p_op_seq_id
352: , p_sub_group_num
353: )
354: LOOP
355: x_return_status := FND_API.G_RET_STS_ERROR ;
356: END LOOP ;
357:
358: IF x_return_status <> FND_API.G_RET_STS_ERROR
359: THEN

Line 358: IF x_return_status <> FND_API.G_RET_STS_ERROR

354: LOOP
355: x_return_status := FND_API.G_RET_STS_ERROR ;
356: END LOOP ;
357:
358: IF x_return_status <> FND_API.G_RET_STS_ERROR
359: THEN
360: FOR l_sub_pomove_rec IN l_sub_pomove_csr ( p_op_seq_id
361: , p_resource_id
362: , p_sub_group_num

Line 365: x_return_status := FND_API.G_RET_STS_ERROR ;

361: , p_resource_id
362: , p_sub_group_num
363: )
364: LOOP
365: x_return_status := FND_API.G_RET_STS_ERROR ;
366: END LOOP ;
367: END IF ;
368:
369: END Val_Sub_PO_Move ;

Line 426: x_return_status := FND_API.G_RET_STS_SUCCESS ;

422: ) ;
423:
424: BEGIN
425:
426: x_return_status := FND_API.G_RET_STS_SUCCESS ;
427:
428: FOR l_principal_rec IN l_principal_csr ( p_op_seq_id
429: , p_res_id
430: , p_sub_group_num

Line 435: x_return_status := FND_API.G_RET_STS_ERROR ;

431: , p_rep_group_num
432: , p_basis_type
433: )
434: LOOP
435: x_return_status := FND_API.G_RET_STS_ERROR ;
436: END LOOP ;
437:
438: /*
439: IF BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO

Line 491: x_return_status := FND_API.G_RET_STS_SUCCESS;

487: )
488: AND rownum=1;
489:
490: BEGIN
491: x_return_status := FND_API.G_RET_STS_SUCCESS;
492: l_resource_id := FND_API.G_MISS_NUM;
493:
494: /* Verify whether the current sub-resource violates the validation w.r.t to
495: any existing resource. */

Line 492: l_resource_id := FND_API.G_MISS_NUM;

488: AND rownum=1;
489:
490: BEGIN
491: x_return_status := FND_API.G_RET_STS_SUCCESS;
492: l_resource_id := FND_API.G_MISS_NUM;
493:
494: /* Verify whether the current sub-resource violates the validation w.r.t to
495: any existing resource. */
496: OPEN l_sch_res_cur;

Line 511: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

507: END IF;
508:
509: /* If no violated resource is found above, then verify whether the current sub-resource
510: violates the validation w.r.t to any existing sub-resource. */
511: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
512:
513: OPEN l_sch_sub_res_cur;
514: FETCH l_sch_sub_res_cur INTO l_resource_id;
515:

Line 625: l_return_status := FND_API.G_RET_STS_SUCCESS;

621: l_default_basis_type NUMBER;
622:
623: BEGIN
624:
625: l_return_status := FND_API.G_RET_STS_SUCCESS;
626: x_return_status := FND_API.G_RET_STS_SUCCESS;
627:
628:
629: l_Token_Tbl(1).token_name := 'SUB_RESOURCE_CODE';

Line 626: x_return_status := FND_API.G_RET_STS_SUCCESS;

622:
623: BEGIN
624:
625: l_return_status := FND_API.G_RET_STS_SUCCESS;
626: x_return_status := FND_API.G_RET_STS_SUCCESS;
627:
628:
629: l_Token_Tbl(1).token_name := 'SUB_RESOURCE_CODE';
630: l_Token_Tbl(1).token_value :=

Line 640: OR p_rev_sub_resource_rec.basis_type = FND_API.G_MISS_NUM )

636: l_Token_Tbl(3).token_value := p_rev_sub_resource_rec.revised_item_name;
637:
638: -- If basis type is null then take the resource's default basis type
639: IF ( p_rev_sub_resource_rec.basis_type IS NULL
640: OR p_rev_sub_resource_rec.basis_type = FND_API.G_MISS_NUM )
641: THEN
642: BEGIN
643: SELECT br.DEFAULT_BASIS_TYPE
644: INTO l_default_basis_type

Line 678: l_return_status := FND_API.G_RET_STS_ERROR ;

674: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
675: , p_message_name => 'BOM_SUB_RES_ALREADY_EXISTS'
676: , p_token_tbl => l_token_tbl
677: ) ;
678: l_return_status := FND_API.G_RET_STS_ERROR ;
679:
680: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
681: p_rev_sub_resource_rec.transaction_type IN
682: (BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

Line 690: l_return_status := FND_API.G_RET_STS_ERROR ;

686: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
687: , p_message_name => 'BOM_SUB_RES_DOESNOT_EXIST'
688: , p_token_tbl => l_token_tbl
689: ) ;
690: l_return_status := FND_API.G_RET_STS_ERROR ;
691:
692: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
693: THEN
694: Error_Handler.Add_Error_Token

Line 692: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

688: , p_token_tbl => l_token_tbl
689: ) ;
690: l_return_status := FND_API.G_RET_STS_ERROR ;
691:
692: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
693: THEN
694: Error_Handler.Add_Error_Token
695: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
696: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 706: l_return_status := FND_API.G_RET_STS_SUCCESS;

702: || nvl(p_rev_sub_resource_rec.substitute_group_number, p_rev_sub_res_unexp_rec.substitute_group_number)
703: , p_token_tbl => l_token_tbl
704: ) ;
705: ELSE
706: l_return_status := FND_API.G_RET_STS_SUCCESS;
707: END IF ;
708:
709: x_return_status := l_return_status;
710: x_mesg_token_tbl := l_Mesg_Token_Tbl;

Line 791: l_return_status := FND_API.G_RET_STS_SUCCESS;

787: l_Token_Tbl Error_Handler.Token_Tbl_Type ;
788:
789: BEGIN
790:
791: l_return_status := FND_API.G_RET_STS_SUCCESS;
792: x_return_status := FND_API.G_RET_STS_SUCCESS;
793:
794: -- Set the first token to be equal to the operation sequence number
795: l_Token_Tbl(1).token_name := 'SUB_RESOURCE_CODE';

Line 792: x_return_status := FND_API.G_RET_STS_SUCCESS;

788:
789: BEGIN
790:
791: l_return_status := FND_API.G_RET_STS_SUCCESS;
792: x_return_status := FND_API.G_RET_STS_SUCCESS;
793:
794: -- Set the first token to be equal to the operation sequence number
795: l_Token_Tbl(1).token_name := 'SUB_RESOURCE_CODE';
796: l_Token_Tbl(1).token_value :=

Line 814: IF p_rev_sub_resource_rec.new_sub_resource_code = FND_API.G_MISS_CHAR

810: ('Sub Operation Resource Attr Validation: Missing Value. . . ' ) ;
811: END IF;
812:
813: -- New Sub Resource Code
814: IF p_rev_sub_resource_rec.new_sub_resource_code = FND_API.G_MISS_CHAR
815: THEN
816: Error_Handler.Add_Error_Token
817: ( p_Message_Name => 'BOM_SUB_RESCODE_MISSING'
818: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 822: l_return_status := FND_API.G_RET_STS_ERROR;

818: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
819: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
820: , p_Token_Tbl => l_Token_Tbl
821: );
822: l_return_status := FND_API.G_RET_STS_ERROR;
823: END IF ;
824:
825:
826:

Line 828: IF p_rev_sub_resource_rec.replacement_group_number = FND_API.G_MISS_NUM

824:
825:
826:
827: -- Replacement Group Number
828: IF p_rev_sub_resource_rec.replacement_group_number = FND_API.G_MISS_NUM
829: THEN
830: Error_Handler.Add_Error_Token
831: ( p_Message_Name => 'BOM_SUB_RES_RPLAC_GNUM_MISSING'
832: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 836: l_return_status := FND_API.G_RET_STS_ERROR;

832: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
833: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
834: , p_Token_Tbl => l_Token_Tbl
835: );
836: l_return_status := FND_API.G_RET_STS_ERROR;
837: END IF ;
838:
839:
840: -- New Replacement Group Number -- bug 3741570

Line 841: IF p_rev_sub_resource_rec.new_replacement_group_number = FND_API.G_MISS_NUM

837: END IF ;
838:
839:
840: -- New Replacement Group Number -- bug 3741570
841: IF p_rev_sub_resource_rec.new_replacement_group_number = FND_API.G_MISS_NUM
842: THEN
843: Error_Handler.Add_Error_Token
844: ( p_Message_Name => 'BOM_SUB_RES_RPLAC_GNUM_MISSING'
845: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 849: l_return_status := FND_API.G_RET_STS_ERROR;

845: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
846: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
847: , p_Token_Tbl => l_Token_Tbl
848: );
849: l_return_status := FND_API.G_RET_STS_ERROR;
850: END IF;
851:
852:
853: -- Standard Rate Flag

Line 854: IF p_rev_sub_resource_rec.standard_rate_flag = FND_API.G_MISS_NUM

850: END IF;
851:
852:
853: -- Standard Rate Flag
854: IF p_rev_sub_resource_rec.standard_rate_flag = FND_API.G_MISS_NUM
855: THEN
856: Error_Handler.Add_Error_Token
857: ( p_Message_Name => 'BOM_SUB_RES_STD_RATE_MISSING'
858: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 862: l_return_status := FND_API.G_RET_STS_ERROR;

858: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
859: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
860: , p_Token_Tbl => l_Token_Tbl
861: );
862: l_return_status := FND_API.G_RET_STS_ERROR;
863: END IF;
864:
865:
866: -- Assigned Units

Line 867: IF p_rev_sub_resource_rec.assigned_units = FND_API.G_MISS_NUM

863: END IF;
864:
865:
866: -- Assigned Units
867: IF p_rev_sub_resource_rec.assigned_units = FND_API.G_MISS_NUM
868: THEN
869: Error_Handler.Add_Error_Token
870: ( p_Message_Name => 'BOM_SUB_RES_ASGND_UNTS_MISSING'
871: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 875: l_return_status := FND_API.G_RET_STS_ERROR;

871: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
872: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
873: , p_Token_Tbl => l_Token_Tbl
874: );
875: l_return_status := FND_API.G_RET_STS_ERROR;
876: END IF;
877:
878:
879: -- Usage Rate or Amount

Line 880: IF p_rev_sub_resource_rec.usage_rate_or_amount = FND_API.G_MISS_NUM

876: END IF;
877:
878:
879: -- Usage Rate or Amount
880: IF p_rev_sub_resource_rec.usage_rate_or_amount = FND_API.G_MISS_NUM
881: THEN
882: Error_Handler.Add_Error_Token
883: ( p_Message_Name => 'BOM_SUB_RES_RATE_AMT_MISSING'
884: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 888: l_return_status := FND_API.G_RET_STS_ERROR;

884: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
885: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
886: , p_Token_Tbl => l_Token_Tbl
887: );
888: l_return_status := FND_API.G_RET_STS_ERROR;
889: END IF;
890:
891: -- Usage Rate or Amount Inverse
892: IF p_rev_sub_resource_rec.usage_rate_or_amount_inverse = FND_API.G_MISS_NUM

Line 892: IF p_rev_sub_resource_rec.usage_rate_or_amount_inverse = FND_API.G_MISS_NUM

888: l_return_status := FND_API.G_RET_STS_ERROR;
889: END IF;
890:
891: -- Usage Rate or Amount Inverse
892: IF p_rev_sub_resource_rec.usage_rate_or_amount_inverse = FND_API.G_MISS_NUM
893: THEN
894: Error_Handler.Add_Error_Token
895: ( p_Message_Name => 'BOM_SUB_RES_RTAMT_INVR_MISSING'
896: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 900: l_return_status := FND_API.G_RET_STS_ERROR;

896: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
897: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
898: , p_Token_Tbl => l_Token_Tbl
899: );
900: l_return_status := FND_API.G_RET_STS_ERROR;
901: END IF;
902:
903: -- Basis Type
904: IF p_rev_sub_resource_rec.basis_type = FND_API.G_MISS_NUM

Line 904: IF p_rev_sub_resource_rec.basis_type = FND_API.G_MISS_NUM

900: l_return_status := FND_API.G_RET_STS_ERROR;
901: END IF;
902:
903: -- Basis Type
904: IF p_rev_sub_resource_rec.basis_type = FND_API.G_MISS_NUM
905: THEN
906: Error_Handler.Add_Error_Token
907: ( p_Message_Name => 'BOM_SUB_RES_BASISTYPE_MISSING'
908: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 912: l_return_status := FND_API.G_RET_STS_ERROR;

908: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
909: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
910: , p_Token_Tbl => l_Token_Tbl
911: );
912: l_return_status := FND_API.G_RET_STS_ERROR;
913: END IF;
914:
915: -- New Basis Type
916: IF p_rev_sub_resource_rec.new_basis_type = FND_API.G_MISS_NUM

Line 916: IF p_rev_sub_resource_rec.new_basis_type = FND_API.G_MISS_NUM

912: l_return_status := FND_API.G_RET_STS_ERROR;
913: END IF;
914:
915: -- New Basis Type
916: IF p_rev_sub_resource_rec.new_basis_type = FND_API.G_MISS_NUM
917: THEN
918: Error_Handler.Add_Error_Token
919: ( p_Message_Name => 'BOM_SUB_RES_BASISTYPE_MISSING'
920: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 924: l_return_status := FND_API.G_RET_STS_ERROR;

920: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
921: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
922: , p_Token_Tbl => l_Token_Tbl
923: );
924: l_return_status := FND_API.G_RET_STS_ERROR;
925: END IF;
926:
927: -- Schedule Flag
928: IF p_rev_sub_resource_rec.schedule_flag = FND_API.G_MISS_NUM

Line 928: IF p_rev_sub_resource_rec.schedule_flag = FND_API.G_MISS_NUM

924: l_return_status := FND_API.G_RET_STS_ERROR;
925: END IF;
926:
927: -- Schedule Flag
928: IF p_rev_sub_resource_rec.schedule_flag = FND_API.G_MISS_NUM
929: THEN
930: Error_Handler.Add_Error_Token
931: ( p_Message_Name => 'BOM_SUB_RES_SCHED_FLAG_MISSING'
932: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 936: l_return_status := FND_API.G_RET_STS_ERROR;

932: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
933: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
934: , p_Token_Tbl => l_Token_Tbl
935: );
936: l_return_status := FND_API.G_RET_STS_ERROR;
937: END IF ;
938:
939:
940: -- Autocharge Type

Line 941: IF p_rev_sub_resource_rec.autocharge_type = FND_API.G_MISS_NUM

937: END IF ;
938:
939:
940: -- Autocharge Type
941: IF p_rev_sub_resource_rec.autocharge_type = FND_API.G_MISS_NUM
942: THEN
943: Error_Handler.Add_Error_Token
944: ( p_Message_Name => 'BOM_SUB_RES_ACHRG_TYPE_MISSING'
945: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 949: l_return_status := FND_API.G_RET_STS_ERROR;

945: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
946: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
947: , p_Token_Tbl => l_Token_Tbl
948: );
949: l_return_status := FND_API.G_RET_STS_ERROR;
950: END IF ;
951:
952: END IF ;
953:

Line 966: AND p_rev_sub_resource_rec.new_sub_resource_code <> FND_API.G_MISS_CHAR

962:
963:
964: -- New Sub Resource Code
965: IF p_rev_sub_resource_rec.new_sub_resource_code IS NOT NULL
966: AND p_rev_sub_resource_rec.new_sub_resource_code <> FND_API.G_MISS_CHAR
967: AND BOM_Rtg_Globals.Get_Bo_Identifier = BOM_Rtg_Globals.G_ECO_BO
968: THEN
969: Error_Handler.Add_Error_Token
970: ( p_Message_Name => 'BOM_SUB_RES_CODE_NOTUPDATE'

Line 975: l_return_status := FND_API.G_RET_STS_ERROR;

971: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
972: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
973: , p_Token_Tbl => l_Token_Tbl
974: );
975: l_return_status := FND_API.G_RET_STS_ERROR;
976: END IF ;
977:
978:
979: -- Replacement Group Num

Line 982: OR p_rev_sub_resource_rec.replacement_group_number = FND_API.G_MISS_NUM)

978:
979: -- Replacement Group Num
980: IF p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
981: AND (p_rev_sub_resource_rec.replacement_group_number IS NULL
982: OR p_rev_sub_resource_rec.replacement_group_number = FND_API.G_MISS_NUM)
983: THEN
984: Error_Handler.Add_Error_Token
985: ( p_Message_Name => 'BOM_SUB_RES_REPLCMNT_GNUM_NULL'
986: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 990: l_return_status := FND_API.G_RET_STS_ERROR ;

986: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
987: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
988: , p_Token_Tbl => l_Token_Tbl
989: );
990: l_return_status := FND_API.G_RET_STS_ERROR ;
991:
992: ELSIF p_rev_sub_resource_rec.replacement_group_number IS NOT NULL AND
993: p_rev_sub_resource_rec.replacement_group_number <> FND_API.G_MISS_NUM AND
994: ( p_rev_sub_resource_rec.replacement_group_number < 1

Line 993: p_rev_sub_resource_rec.replacement_group_number <> FND_API.G_MISS_NUM AND

989: );
990: l_return_status := FND_API.G_RET_STS_ERROR ;
991:
992: ELSIF p_rev_sub_resource_rec.replacement_group_number IS NOT NULL AND
993: p_rev_sub_resource_rec.replacement_group_number <> FND_API.G_MISS_NUM AND
994: ( p_rev_sub_resource_rec.replacement_group_number < 1
995: OR p_rev_sub_resource_rec.replacement_group_number > 9999 )
996: THEN
997: Error_Handler.Add_Error_Token

Line 1003: l_return_status := FND_API.G_RET_STS_ERROR ;

999: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1000: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1001: , p_Token_Tbl => l_Token_Tbl
1002: );
1003: l_return_status := FND_API.G_RET_STS_ERROR ;
1004: END IF;
1005:
1006:
1007: -- New Replacement Group Number -- bug 3741570

Line 1009: AND p_rev_sub_resource_rec.replacement_group_number <> FND_API.G_MISS_NUM

1005:
1006:
1007: -- New Replacement Group Number -- bug 3741570
1008: IF p_rev_sub_resource_rec.replacement_group_number IS NOT NULL
1009: AND p_rev_sub_resource_rec.replacement_group_number <> FND_API.G_MISS_NUM
1010: AND ( p_rev_sub_resource_rec.replacement_group_number < 1
1011: OR p_rev_sub_resource_rec.replacement_group_number > 9999 )
1012: THEN
1013: Error_Handler.Add_Error_Token

Line 1019: l_return_status := FND_API.G_RET_STS_ERROR ;

1015: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1016: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1017: , p_Token_Tbl => l_Token_Tbl
1018: );
1019: l_return_status := FND_API.G_RET_STS_ERROR ;
1020: END IF;
1021:
1022:
1023: -- Standard Rate Flag

Line 1026: AND p_rev_sub_resource_rec.standard_rate_flag <> FND_API.G_MISS_NUM

1022:
1023: -- Standard Rate Flag
1024: IF p_rev_sub_resource_rec.standard_rate_flag IS NOT NULL
1025: AND p_rev_sub_resource_rec.standard_rate_flag NOT IN (1,2)
1026: AND p_rev_sub_resource_rec.standard_rate_flag <> FND_API.G_MISS_NUM
1027: THEN
1028: Error_Handler.Add_Error_Token
1029: ( p_Message_Name => 'BOM_SUB_RES_STD_RATE_INVALID'
1030: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1034: l_return_status := FND_API.G_RET_STS_ERROR;

1030: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1031: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1032: , p_Token_Tbl => l_Token_Tbl
1033: );
1034: l_return_status := FND_API.G_RET_STS_ERROR;
1035: END IF;
1036:
1037:
1038: -- Principle Flag

Line 1041: AND p_rev_sub_resource_rec.principle_flag <> FND_API.G_MISS_NUM

1037:
1038: -- Principle Flag
1039: IF p_rev_sub_resource_rec.principle_flag IS NOT NULL
1040: AND p_rev_sub_resource_rec.principle_flag NOT IN (1,2)
1041: AND p_rev_sub_resource_rec.principle_flag <> FND_API.G_MISS_NUM
1042: THEN
1043: Error_Handler.Add_Error_Token
1044: ( p_Message_Name => 'BOM_SUB_RES_PCLFLAG_INVALID'
1045: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1049: l_return_status := FND_API.G_RET_STS_ERROR;

1045: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1046: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1047: , p_Token_Tbl => l_Token_Tbl
1048: );
1049: l_return_status := FND_API.G_RET_STS_ERROR;
1050: END IF;
1051:
1052: -- Resource Offset Percent
1053: IF p_rev_sub_resource_rec.resource_offset_percent IS NOT NULL

Line 1056: AND p_rev_sub_resource_rec.resource_offset_percent <> FND_API.G_MISS_NUM

1052: -- Resource Offset Percent
1053: IF p_rev_sub_resource_rec.resource_offset_percent IS NOT NULL
1054: AND (p_rev_sub_resource_rec.resource_offset_percent < 0
1055: OR p_rev_sub_resource_rec.resource_offset_percent > 100 )
1056: AND p_rev_sub_resource_rec.resource_offset_percent <> FND_API.G_MISS_NUM
1057: THEN
1058: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1059: THEN
1060: Error_Handler.Add_Error_Token

Line 1067: l_return_status := FND_API.G_RET_STS_ERROR;

1063: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1064: , p_Token_Tbl => l_Token_Tbl
1065: ) ;
1066: END IF ;
1067: l_return_status := FND_API.G_RET_STS_ERROR;
1068: END IF ;
1069:
1070:
1071: -- Assigned Units

Line 1074: AND p_rev_sub_resource_rec.assigned_units <> FND_API.G_MISS_NUM

1070:
1071: -- Assigned Units
1072: IF p_rev_sub_resource_rec.assigned_units IS NOT NULL
1073: AND p_rev_sub_resource_rec.assigned_units <= 0.00001
1074: AND p_rev_sub_resource_rec.assigned_units <> FND_API.G_MISS_NUM
1075: THEN
1076: Error_Handler.Add_Error_Token
1077: ( p_Message_Name => 'BOM_SUB_RES_ASSGN_UNTS_INVALID'
1078: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1082: l_return_status := FND_API.G_RET_STS_ERROR;

1078: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1079: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1080: , p_Token_Tbl => l_Token_Tbl
1081: );
1082: l_return_status := FND_API.G_RET_STS_ERROR;
1083: END IF;
1084:
1085:
1086: -- Basis Type

Line 1089: AND p_rev_sub_resource_rec.basis_type <> FND_API.G_MISS_NUM

1085:
1086: -- Basis Type
1087: IF p_rev_sub_resource_rec.basis_type IS NOT NULL
1088: AND p_rev_sub_resource_rec.basis_type NOT IN (1,2)
1089: AND p_rev_sub_resource_rec.basis_type <> FND_API.G_MISS_NUM
1090: THEN
1091: Error_Handler.Add_Error_Token
1092: ( p_Message_Name => 'BOM_SUB_RES_BASISTYPE_INVALID'
1093: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1097: l_return_status := FND_API.G_RET_STS_ERROR;

1093: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1094: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1095: , p_Token_Tbl => l_Token_Tbl
1096: );
1097: l_return_status := FND_API.G_RET_STS_ERROR;
1098: END IF;
1099:
1100: -- New Basis Type
1101: IF p_rev_sub_resource_rec.new_basis_type IS NOT NULL

Line 1103: AND p_rev_sub_resource_rec.new_basis_type <> FND_API.G_MISS_NUM

1099:
1100: -- New Basis Type
1101: IF p_rev_sub_resource_rec.new_basis_type IS NOT NULL
1102: AND p_rev_sub_resource_rec.new_basis_type NOT IN (1,2)
1103: AND p_rev_sub_resource_rec.new_basis_type <> FND_API.G_MISS_NUM
1104: THEN
1105: Error_Handler.Add_Error_Token
1106: ( p_Message_Name => 'BOM_SUB_RES_BASISTYPE_INVALID'
1107: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1111: l_return_status := FND_API.G_RET_STS_ERROR;

1107: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1108: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1109: , p_Token_Tbl => l_Token_Tbl
1110: );
1111: l_return_status := FND_API.G_RET_STS_ERROR;
1112: END IF;
1113:
1114: -- Schedule Flag
1115: IF p_rev_sub_resource_rec.schedule_flag IS NOT NULL

Line 1117: AND p_rev_sub_resource_rec.schedule_flag <> FND_API.G_MISS_NUM

1113:
1114: -- Schedule Flag
1115: IF p_rev_sub_resource_rec.schedule_flag IS NOT NULL
1116: AND p_rev_sub_resource_rec.schedule_flag NOT IN (1,2,3,4)
1117: AND p_rev_sub_resource_rec.schedule_flag <> FND_API.G_MISS_NUM
1118: THEN
1119: Error_Handler.Add_Error_Token
1120: ( p_Message_Name => 'BOM_SUB_RES_SCHED_FLAG_INVALID'
1121: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1125: l_return_status := FND_API.G_RET_STS_ERROR;

1121: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1122: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1123: , p_Token_Tbl => l_Token_Tbl
1124: );
1125: l_return_status := FND_API.G_RET_STS_ERROR;
1126: END IF ;
1127:
1128:
1129: -- Autocharge Type

Line 1132: AND p_rev_sub_resource_rec.autocharge_type <> FND_API.G_MISS_NUM

1128:
1129: -- Autocharge Type
1130: IF p_rev_sub_resource_rec.autocharge_type IS NOT NULL
1131: AND p_rev_sub_resource_rec.autocharge_type NOT IN (1,2,3,4)
1132: AND p_rev_sub_resource_rec.autocharge_type <> FND_API.G_MISS_NUM
1133: THEN
1134: Error_Handler.Add_Error_Token
1135: ( p_Message_Name => 'BOM_SUB_RES_ACHRG_TYPE_INVALID'
1136: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1140: l_return_status := FND_API.G_RET_STS_ERROR;

1136: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1137: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1138: , p_Token_Tbl => l_Token_Tbl
1139: );
1140: l_return_status := FND_API.G_RET_STS_ERROR;
1141: END IF ;
1142:
1143:
1144: -- ACD Type

Line 1160: l_return_status := FND_API.G_RET_STS_ERROR ;

1156: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1157: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1158: , p_Token_Tbl => l_Token_Tbl
1159: );
1160: l_return_status := FND_API.G_RET_STS_ERROR ;
1161: END IF ;
1162:
1163: -- Schedule Sequence Number
1164: IF (p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

Line 1167: AND p_rev_sub_resource_rec.schedule_sequence_number = FND_API.G_MISS_NUM)

1163: -- Schedule Sequence Number
1164: IF (p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1165: AND p_rev_sub_resource_rec.schedule_sequence_number IS NULL)
1166: OR (p_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1167: AND p_rev_sub_resource_rec.schedule_sequence_number = FND_API.G_MISS_NUM)
1168: OR p_rev_sub_resource_rec.schedule_sequence_number = 0
1169: THEN
1170: Error_Handler.Add_Error_Token
1171: ( p_Message_Name => 'BOM_SSN_ZERO_VALUE'

Line 1176: l_return_status := FND_API.G_RET_STS_ERROR ;

1172: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1173: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1174: --, p_Token_Tbl => l_Token_Tbl
1175: );
1176: l_return_status := FND_API.G_RET_STS_ERROR ;
1177: END IF;
1178:
1179: -- Done validating attributes
1180: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 1206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1202: , x_mesg_token_tbl => l_mesg_token_tbl
1203: ) ;
1204:
1205: -- Return the status and message table.
1206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1207: x_mesg_token_tbl := l_mesg_token_tbl ;
1208:
1209:
1210: END Check_Attributes ;

Line 1398: l_return_status := FND_API.G_RET_STS_SUCCESS;

1394: --
1395:
1396: l_rev_sub_resource_rec := p_rev_sub_resource_rec ;
1397: l_rev_sub_res_unexp_rec := p_rev_sub_res_unexp_rec ;
1398: l_return_status := FND_API.G_RET_STS_SUCCESS;
1399: x_return_status := FND_API.G_RET_STS_SUCCESS;
1400:
1401: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1402: ('Performing Sub Op Resource Check Entitity Validation . . .') ;

Line 1399: x_return_status := FND_API.G_RET_STS_SUCCESS;

1395:
1396: l_rev_sub_resource_rec := p_rev_sub_resource_rec ;
1397: l_rev_sub_res_unexp_rec := p_rev_sub_res_unexp_rec ;
1398: l_return_status := FND_API.G_RET_STS_SUCCESS;
1399: x_return_status := FND_API.G_RET_STS_SUCCESS;
1400:
1401: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1402: ('Performing Sub Op Resource Check Entitity Validation . . .') ;
1403: END IF ;

Line 1480: l_return_status := FND_API.G_RET_STS_ERROR ;

1476: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1477: , p_token_tbl => l_token_tbl
1478: ) ;
1479: l_token_tbl.delete(3) ;
1480: l_return_status := FND_API.G_RET_STS_ERROR ;
1481: END LOOP ;
1482: END IF ;
1483:
1484:

Line 1511: l_return_status := FND_API.G_RET_STS_ERROR ;

1507: , p_token_tbl => l_token_tbl
1508: ) ;
1509:
1510: l_token_tbl.delete(3) ;
1511: l_return_status := FND_API.G_RET_STS_ERROR ;
1512: END IF ;
1513: END IF ;
1514:
1515:

Line 1531: l_return_status := FND_API.G_RET_STS_ERROR ;

1527: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1528: , p_token_tbl => l_token_tbl
1529: ) ;
1530: END IF ;
1531: l_return_status := FND_API.G_RET_STS_ERROR ;
1532: END IF ;
1533:
1534:
1535: --

Line 1562: l_return_status := FND_API.G_RET_STS_ERROR;

1558: , p_mesg_token_tbl => l_Mesg_Token_Tbl
1559: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1560: , p_token_tbl => l_token_tbl
1561: );
1562: l_return_status := FND_API.G_RET_STS_ERROR;
1563:
1564: l_Token_Tbl(1).token_name := 'SUB_RESOURCE_CODE';
1565: l_Token_Tbl(1).token_value :=
1566: p_rev_sub_resource_rec.sub_resource_code ;

Line 1591: IF p_rev_sub_resource_rec.assigned_units <> FND_API.G_MISS_NUM THEN

1587: -- APS Enhancement for Routings.
1588: -- Verify that if a resource has setups defined, or is Batchable then
1589: -- the Assigned Units for that Resource have to be 1.
1590: --
1591: IF p_rev_sub_resource_rec.assigned_units <> FND_API.G_MISS_NUM THEN
1592: OPEN get_setups (p_rev_sub_res_unexp_rec.resource_id, p_rev_sub_res_unexp_rec.organization_id);
1593: FETCH get_setups INTO l_get_setups;
1594: CLOSE get_setups;
1595: SELECT nvl(batchable,2) INTO l_batchable

Line 1609: l_return_status := FND_API.G_RET_STS_ERROR ;

1605: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1606: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1607: , p_Token_Tbl => l_Token_Tbl
1608: );
1609: l_return_status := FND_API.G_RET_STS_ERROR ;
1610: END IF;
1611: END IF;
1612: END IF;
1613: END IF;

Line 1671: IF l_temp_status = FND_API.G_RET_STS_ERROR

1667: , x_return_status => l_temp_status
1668: ) ;
1669:
1670:
1671: IF l_temp_status = FND_API.G_RET_STS_ERROR
1672: THEN
1673: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1674: THEN
1675: Error_Handler.Add_Error_Token

Line 1683: l_return_status := FND_API.G_RET_STS_ERROR ;

1679: , p_Token_Tbl => l_Token_Tbl
1680: ) ;
1681: END IF ;
1682:
1683: l_return_status := FND_API.G_RET_STS_ERROR ;
1684:
1685: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1686: ('Check if Resource is enabled. . . . ' || l_return_status) ;
1687: END IF ;

Line 1739: l_return_status := FND_API.G_RET_STS_ERROR ;

1735: , p_Token_Tbl => l_Token_Tbl
1736: ) ;
1737: END IF ;
1738:
1739: l_return_status := FND_API.G_RET_STS_ERROR ;
1740:
1741: l_Token_Tbl(1).token_name := 'SUB_RESOURCE_CODE';
1742: l_Token_Tbl(1).token_value :=
1743: p_rev_sub_resource_rec.sub_resource_code ;

Line 1782: l_return_status := FND_API.G_RET_STS_ERROR ;

1778: , p_Token_Tbl => l_Token_Tbl
1779: ) ;
1780: END IF ;
1781:
1782: l_return_status := FND_API.G_RET_STS_ERROR ;
1783:
1784: l_Token_Tbl(1).token_name := 'SUB_RESOURCE_CODE';
1785: l_Token_Tbl(1).token_value := p_rev_sub_resource_rec.sub_resource_code ;
1786:

Line 1802: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1798: G_PKG_NAME
1799: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1800: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1801: );
1802: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1803: END IF;
1804:
1805: END IF ;
1806:

Line 1820: OR NVL(l_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)

1816: -- BOM_Validate_Op_Res.Val_Activity_Id
1817: --
1818: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
1819: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
1820: OR NVL(l_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)
1821: <> NVL(p_old_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)
1822: )
1823: AND ( l_rev_sub_res_unexp_rec.activity_id IS NOT NULL AND
1824: l_rev_sub_res_unexp_rec.activity_id <> FND_API.G_MISS_NUM )

Line 1821: <> NVL(p_old_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)

1817: --
1818: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
1819: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
1820: OR NVL(l_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)
1821: <> NVL(p_old_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)
1822: )
1823: AND ( l_rev_sub_res_unexp_rec.activity_id IS NOT NULL AND
1824: l_rev_sub_res_unexp_rec.activity_id <> FND_API.G_MISS_NUM )
1825: THEN

Line 1824: l_rev_sub_res_unexp_rec.activity_id <> FND_API.G_MISS_NUM )

1820: OR NVL(l_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)
1821: <> NVL(p_old_rev_sub_res_unexp_rec.activity_id, FND_API.G_MISS_NUM)
1822: )
1823: AND ( l_rev_sub_res_unexp_rec.activity_id IS NOT NULL AND
1824: l_rev_sub_res_unexp_rec.activity_id <> FND_API.G_MISS_NUM )
1825: THEN
1826:
1827: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1828: ('Activity_Id : ' || to_char(l_rev_sub_res_unexp_rec.activity_id)) ;

Line 1840: IF l_temp_status = FND_API.G_RET_STS_ERROR

1836: , x_return_status => l_temp_status
1837: ) ;
1838:
1839:
1840: IF l_temp_status = FND_API.G_RET_STS_ERROR
1841: THEN
1842: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1843: THEN
1844: Error_Handler.Add_Error_Token

Line 1852: l_return_status := FND_API.G_RET_STS_ERROR ;

1848: , p_Token_Tbl => l_Token_Tbl
1849: ) ;
1850: END IF ;
1851:
1852: l_return_status := FND_API.G_RET_STS_ERROR ;
1853:
1854: END IF ;
1855:
1856: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 1870: OR NVL(l_rev_sub_res_unexp_rec.setup_Id , FND_API.G_MISS_NUM)

1866: -- BOM_Validate_Op_Res.Val_Activity_Id
1867: --
1868: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
1869: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
1870: OR NVL(l_rev_sub_res_unexp_rec.setup_Id , FND_API.G_MISS_NUM)
1871: <> NVL(p_old_rev_sub_res_unexp_rec.setup_id, FND_API.G_MISS_NUM)
1872: )
1873: AND ( l_rev_sub_res_unexp_rec.setup_id IS NOT NULL AND
1874: l_rev_sub_res_unexp_rec.setup_Id <> FND_API.G_MISS_NUM )

Line 1871: <> NVL(p_old_rev_sub_res_unexp_rec.setup_id, FND_API.G_MISS_NUM)

1867: --
1868: IF ( ( NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD
1869: AND l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE )
1870: OR NVL(l_rev_sub_res_unexp_rec.setup_Id , FND_API.G_MISS_NUM)
1871: <> NVL(p_old_rev_sub_res_unexp_rec.setup_id, FND_API.G_MISS_NUM)
1872: )
1873: AND ( l_rev_sub_res_unexp_rec.setup_id IS NOT NULL AND
1874: l_rev_sub_res_unexp_rec.setup_Id <> FND_API.G_MISS_NUM )
1875: THEN

Line 1874: l_rev_sub_res_unexp_rec.setup_Id <> FND_API.G_MISS_NUM )

1870: OR NVL(l_rev_sub_res_unexp_rec.setup_Id , FND_API.G_MISS_NUM)
1871: <> NVL(p_old_rev_sub_res_unexp_rec.setup_id, FND_API.G_MISS_NUM)
1872: )
1873: AND ( l_rev_sub_res_unexp_rec.setup_id IS NOT NULL AND
1874: l_rev_sub_res_unexp_rec.setup_Id <> FND_API.G_MISS_NUM )
1875: THEN
1876:
1877: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1878: ('Setup_Id : ' || to_char(l_rev_sub_res_unexp_rec.setup_id )) ;

Line 1892: IF l_temp_status = FND_API.G_RET_STS_ERROR

1888: , x_return_status => l_temp_status
1889: ) ;
1890:
1891:
1892: IF l_temp_status = FND_API.G_RET_STS_ERROR
1893: THEN
1894: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1895: THEN
1896:

Line 1911: l_return_status := FND_API.G_RET_STS_ERROR ;

1907: ) ;
1908: END IF ;
1909:
1910: l_token_tbl.delete(3) ;
1911: l_return_status := FND_API.G_RET_STS_ERROR ;
1912:
1913: END IF ;
1914:
1915: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 1961: IF l_temp_status = FND_API.G_RET_STS_ERROR

1957: , p_res_uom_code => l_res_uom_code
1958: , x_return_status => l_temp_status
1959: ) ;
1960:
1961: IF l_temp_status = FND_API.G_RET_STS_ERROR
1962: THEN
1963: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1964: THEN
1965: Error_Handler.Add_Error_Token

Line 1973: l_return_status := FND_API.G_RET_STS_ERROR ;

1969: , p_Token_Tbl => l_Token_Tbl
1970: ) ;
1971: END IF ;
1972:
1973: l_return_status := FND_API.G_RET_STS_ERROR ;
1974:
1975: END IF ;
1976:
1977: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 2013: IF l_temp_status = FND_API.G_RET_STS_ERROR

2009: ) ;
2010: */
2011:
2012:
2013: IF l_temp_status = FND_API.G_RET_STS_ERROR
2014: THEN
2015: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2016: THEN
2017: Error_Handler.Add_Error_Token

Line 2025: l_return_status := FND_API.G_RET_STS_ERROR ;

2021: , p_Token_Tbl => l_Token_Tbl
2022: ) ;
2023: END IF ;
2024:
2025: l_return_status := FND_API.G_RET_STS_ERROR ;
2026:
2027: END IF ;
2028:
2029: ELSIF p_rev_sub_resource_rec.schedule_flag = l_NEXT -- 4: Next

Line 2043: IF l_temp_status = FND_API.G_RET_STS_ERROR

2039: , x_return_status => l_temp_status
2040: ) ;
2041: */
2042:
2043: IF l_temp_status = FND_API.G_RET_STS_ERROR
2044: THEN
2045: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2046: THEN
2047: Error_Handler.Add_Error_Token

Line 2055: l_return_status := FND_API.G_RET_STS_ERROR ;

2051: , p_Token_Tbl => l_Token_Tbl
2052: ) ;
2053: END IF ;
2054:
2055: l_return_status := FND_API.G_RET_STS_ERROR ;
2056:
2057: END IF ;
2058:
2059: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 2086: IF l_temp_status = FND_API.G_RET_STS_ERROR

2082: ( p_op_seq_id => l_rev_sub_res_unexp_rec.operation_sequence_id
2083: , x_return_status => l_temp_status
2084: ) ;
2085:
2086: IF l_temp_status = FND_API.G_RET_STS_ERROR
2087: THEN
2088: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2089: THEN
2090: Error_Handler.Add_Error_Token

Line 2098: l_return_status := FND_API.G_RET_STS_ERROR ;

2094: , p_Token_Tbl => l_Token_Tbl
2095: ) ;
2096: END IF ;
2097:
2098: l_return_status := FND_API.G_RET_STS_ERROR ;
2099:
2100: END IF ;
2101:
2102: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 2131: IF l_temp_status = FND_API.G_RET_STS_ERROR

2127: , x_return_status => l_temp_status
2128: ) ;
2129:
2130:
2131: IF l_temp_status = FND_API.G_RET_STS_ERROR
2132: THEN
2133: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2134: THEN
2135: Error_Handler.Add_Error_Token

Line 2143: l_return_status := FND_API.G_RET_STS_ERROR ;

2139: , p_Token_Tbl => l_Token_Tbl
2140: ) ;
2141: END IF ;
2142:
2143: l_return_status := FND_API.G_RET_STS_ERROR ;
2144:
2145: END IF ;
2146:
2147: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 2176: IF l_temp_status = FND_API.G_RET_STS_ERROR

2172: , x_return_status => l_temp_status
2173: ) ;
2174: */
2175:
2176: IF l_temp_status = FND_API.G_RET_STS_ERROR
2177: THEN
2178:
2179: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2180: THEN

Line 2189: l_return_status := FND_API.G_RET_STS_ERROR ;

2185: , p_Token_Tbl => l_Token_Tbl
2186: ) ;
2187: END IF ;
2188:
2189: l_return_status := FND_API.G_RET_STS_ERROR ;
2190: END IF ;
2191:
2192: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2193: ('Check if Autocharge Type is enabled. . . . ' || l_return_status) ;

Line 2222: IF l_temp_status = FND_API.G_RET_STS_ERROR

2218: , x_return_status => l_temp_status
2219: ) ;
2220:
2221:
2222: IF l_temp_status = FND_API.G_RET_STS_ERROR
2223: THEN
2224: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2225: THEN
2226: Error_Handler.Add_Error_Token

Line 2234: l_return_status := FND_API.G_RET_STS_ERROR ;

2230: , p_Token_Tbl => l_Token_Tbl
2231: ) ;
2232: END IF ;
2233:
2234: l_return_status := FND_API.G_RET_STS_ERROR ;
2235:
2236: END IF ;
2237:
2238: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 2291: IF l_temp_status = FND_API.G_RET_STS_ERROR

2287: , x_return_status => l_temp_status
2288: ) ;
2289:
2290:
2291: IF l_temp_status = FND_API.G_RET_STS_ERROR
2292: THEN
2293: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2294: THEN
2295: Error_Handler.Add_Error_Token

Line 2303: l_return_status := FND_API.G_RET_STS_ERROR ;

2299: , p_Token_Tbl => l_Token_Tbl
2300: ) ;
2301: END IF ;
2302:
2303: l_return_status := FND_API.G_RET_STS_ERROR ;
2304:
2305: END IF ;
2306:
2307: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 2341: IF l_temp_status = FND_API.G_RET_STS_ERROR

2337: , x_return_status => l_temp_status
2338: ) ;
2339:
2340:
2341: IF l_temp_status = FND_API.G_RET_STS_ERROR
2342: THEN
2343: -- dbms_output.put_line('found error in principal flag for sub resources');
2344: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2345: THEN

Line 2354: l_return_status := FND_API.G_RET_STS_ERROR ;

2350: , p_Token_Tbl => l_Token_Tbl
2351: ) ;
2352: END IF ;
2353:
2354: l_return_status := FND_API.G_RET_STS_ERROR ;
2355:
2356: END IF ;
2357:
2358: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 2377: l_res_id := FND_API.G_MISS_NUM;

2373: OR l_rev_sub_resource_rec.schedule_sequence_number <> p_old_rev_sub_resource_rec.schedule_sequence_number
2374: OR l_rev_sub_resource_rec.schedule_flag <> p_old_rev_sub_resource_rec.schedule_flag
2375: )
2376: THEN
2377: l_res_id := FND_API.G_MISS_NUM;
2378:
2379: Val_Schedule_Flag
2380: ( p_op_seq_id => l_rev_sub_res_unexp_rec.operation_sequence_id
2381: , p_res_seq_num => null

Line 2392: IF l_temp_status = FND_API.G_RET_STS_ERROR THEN

2388: , p_ret_res_id => l_res_id
2389: , x_return_status => l_temp_status
2390: );
2391:
2392: IF l_temp_status = FND_API.G_RET_STS_ERROR THEN
2393: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2394: If (l_rev_sub_resource_rec.sub_resource_code is not null) Then
2395: l_res_code := l_rev_sub_resource_rec.sub_resource_code;
2396: Else

Line 2420: l_return_status := FND_API.G_RET_STS_ERROR ;

2416: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2417: , p_Token_Tbl => l_Token_Tbl
2418: );
2419: END IF; /* end of check_msg_level */
2420: l_return_status := FND_API.G_RET_STS_ERROR ;
2421: END IF; /* end of l_temp_status */
2422: END IF; /* end of validation on resource and ssn*/
2423: /*End of fix for bug 6074930 */
2424:

Line 2467: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2463: , x_mesg_token_tbl => l_mesg_token_tbl
2464: ) ;
2465:
2466: -- Return the status and message table.
2467: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2468: x_mesg_token_tbl := l_mesg_token_tbl ;
2469: END Check_Entity ;
2470:
2471: END BOM_Validate_Sub_Op_Res ;