eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.BOM_VALIDATE_BOM_COMPONENT dependencies on FND_API

Line 117: * Parameters OUT: x_return_status is FND_API.G_RET_STS_SUCCESS or

113: * p_init_msg_list Default value is TRUE.By default
114: * the error handler is initialized.If the caller does not
115: * want the error handler to get initialized, the caller
116: * has to pass FALSE.
117: * Parameters OUT: x_return_status is FND_API.G_RET_STS_SUCCESS or
118: * FND_API.G_RET_STS_ERROR
119: * x_error_message The error message passed to the
120: caller
121: * Purpose : This procedure will actually check if any component

Line 118: * FND_API.G_RET_STS_ERROR

114: * the error handler is initialized.If the caller does not
115: * want the error handler to get initialized, the caller
116: * has to pass FALSE.
117: * Parameters OUT: x_return_status is FND_API.G_RET_STS_SUCCESS or
118: * FND_API.G_RET_STS_ERROR
119: * x_error_message The error message passed to the
120: caller
121: * Purpose : This procedure will actually check if any component
122: * type rule exists between the two item types of the item

Line 163: x_return_status := FND_API.G_RET_STS_SUCCESS;

159: Error_Handler.Initialize;
160: END IF;
161:
162:
163: x_return_status := FND_API.G_RET_STS_SUCCESS;
164: l_return_status := 'N';
165:
166: SELECT MSI.ITEM_TYPE, LOOKUP.MEANING ,MSI.CONCATENATED_SEGMENTS
167: INTO l_parent_item_type,l_parent_item_type_name,l_parent_name

Line 252: x_return_status := FND_API.G_RET_STS_ERROR;

248: );
249:
250: Error_Handler.Get_Message_List( x_message_list => l_message_list);
251: x_error_message := l_message_list(1).Message_Text;
252: x_return_status := FND_API.G_RET_STS_ERROR;
253: -- dbms_output.put_line('RETURN STATUS WITH EXCEPTION '||l_return_status);
254: -- dbms_output.put_line('RETURN STATUS '||x_return_status);
255: -- dbms_output.put_line('RETURN MESSAGE '||x_error_message);
256: IF p_init_msg_list

Line 269: x_return_status := FND_API.G_RET_STS_SUCCESS;

265: END IF;
266:
267: IF l_return_status = 'Y'
268: THEN
269: x_return_status := FND_API.G_RET_STS_SUCCESS;
270: -- dbms_output.put_line('CRITERIA TEMPLATE FOUND.ITEM TYPES MATCH FOUND.');
271: -- dbms_output.put_line('RETURN STATUS '||x_return_status);
272: -- dbms_output.put_line('RETURN MESSAGE '||x_error_message);
273: END IF;

Line 277: x_return_status := FND_API.G_RET_STS_SUCCESS;

273: END IF;
274:
275: EXCEPTION
276: WHEN NO_DATA_FOUND THEN
277: x_return_status := FND_API.G_RET_STS_SUCCESS;
278: -- dbms_output.put_line('NO CRITERIA TEMPLATE FOUND. SO ANYTHING CAN BE ADDED');
279: -- dbms_output.put_line('RETURN STATUS '||x_return_status);
280: -- dbms_output.put_line('RETURN MESSAGE '||x_error_message);
281:

Line 310: x_return_status := FND_API.G_RET_STS_SUCCESS;

306: l_old_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
307: l_old_rev_comp_unexp_rec
308: Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
309: BEGIN
310: x_return_status := FND_API.G_RET_STS_SUCCESS;
311:
312: -- Convert BOM record into ECO record
313:
314: Bom_Bo_Pub.Convert_BomComp_To_EcoComp

Line 472: x_return_status := FND_API.G_RET_STS_SUCCESS;

468: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_type;
469:
470: BEGIN
471:
472: x_return_status := FND_API.G_RET_STS_SUCCESS;
473:
474: /* Added condition for date through bug 3238782 */
475:
476: SELECT count(*) INTO l_total FROM bom_inventory_components WHERE

Line 492: --x_return_status := FND_API.G_RET_STS_ERROR; -- bug 3238782

488: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
489: , p_Token_Tbl => g_Token_Tbl
490: , p_message_type => 'W' -- Bug 3238782
491: );
492: --x_return_status := FND_API.G_RET_STS_ERROR; -- bug 3238782
493: END IF;
494:
495: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
496:

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

529: )
530: IS
531: l_bom_comp_item_type NUMBER;
532: l_OPM_org VARCHAR2(1);
533: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
534: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_type;
535: l_token_tbl Error_Handler.Token_Tbl_Type;
536: BEGIN
537: /*************************************************************

Line 563: l_return_status := FND_API.G_RET_STS_ERROR;

559: ( p_Message_name => 'BOM_OPM_ORG_MODEL_OC'
560: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
561: , x_mesg_token_tbl => l_mesg_token_tbl
562: );
563: l_return_status := FND_API.G_RET_STS_ERROR;
564: END IF;
565:
566: IF l_bom_comp_item_type NOT IN
567: (NVL(BOM_Globals.Get_MDL_Item_Access,0),

Line 599: l_return_status := FND_API.G_RET_STS_ERROR;

595: , x_Mesg_Token_Tbl => l_mesg_token_tbl
596: , p_Token_Tbl => l_token_tbl
597: );
598: l_token_tbl.DELETE(2);
599: l_return_status := FND_API.G_RET_STS_ERROR;
600: END IF;
601:
602: END Check_Access;
603:

Line 633: x_return_status := FND_API.G_RET_STS_SUCCESS;

629: )
630: IS
631: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
632: BEGIN
633: x_return_status := FND_API.G_RET_STS_SUCCESS;
634:
635: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
636: g_token_tbl(1).token_value :=
637: p_rev_component_rec.component_item_name;

Line 640: p_rev_component_rec.acd_type = FND_API.G_MISS_NUM

636: g_token_tbl(1).token_value :=
637: p_rev_component_rec.component_item_name;
638:
639: IF ( p_rev_component_rec.acd_type IS NULL OR
640: p_rev_component_rec.acd_type = FND_API.G_MISS_NUM
641: ) AND
642: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
643: THEN
644: Error_Handler.Add_Error_Token

Line 650: x_return_status := FND_API.G_RET_STS_ERROR;

646: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
647: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
648: , p_Token_Tbl => g_Token_Tbl
649: );
650: x_return_status := FND_API.G_RET_STS_ERROR;
651: END IF;
652:
653: IF ( p_rev_component_rec.start_effective_date IS NULL OR
654: p_rev_component_rec.start_effective_date = FND_API.G_MISS_DATE

Line 654: p_rev_component_rec.start_effective_date = FND_API.G_MISS_DATE

650: x_return_status := FND_API.G_RET_STS_ERROR;
651: END IF;
652:
653: IF ( p_rev_component_rec.start_effective_date IS NULL OR
654: p_rev_component_rec.start_effective_date = FND_API.G_MISS_DATE
655: ) AND
656: ( p_rev_component_rec.from_end_item_unit_number IS NULL OR
657: p_rev_component_rec.from_end_item_unit_number = FND_API.G_MISS_CHAR
658: )

Line 657: p_rev_component_rec.from_end_item_unit_number = FND_API.G_MISS_CHAR

653: IF ( p_rev_component_rec.start_effective_date IS NULL OR
654: p_rev_component_rec.start_effective_date = FND_API.G_MISS_DATE
655: ) AND
656: ( p_rev_component_rec.from_end_item_unit_number IS NULL OR
657: p_rev_component_rec.from_end_item_unit_number = FND_API.G_MISS_CHAR
658: )
659: THEN
660: Error_Handler.Add_Error_Token
661: ( p_message_name => 'BOM_EFFECTIVITY_MISSING'

Line 666: x_return_status := FND_API.G_RET_STS_ERROR;

662: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
663: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
664: , p_Token_Tbl => g_Token_Tbl
665: );
666: x_return_status := FND_API.G_RET_STS_ERROR;
667: END IF;
668:
669: -- Return the message table.
670:

Line 2273: <= DECODE(g_rev_component_rec.new_from_end_item_unit_number,FND_API.G_MISS_CHAR, /* bug 8314145 */

2269: AND bic.component_sequence_id <> g_rev_comp_unexp_rec.component_sequence_id
2270: /* Added extra condition to accomodate bill components
2271: */
2272: AND (( bic.from_end_item_unit_number
2273: <= DECODE(g_rev_component_rec.new_from_end_item_unit_number,FND_API.G_MISS_CHAR, /* bug 8314145 */
2274: g_rev_component_rec.from_end_item_unit_number,
2275: NULL, g_rev_component_rec.from_end_item_unit_number,
2276: g_rev_component_rec.new_from_end_item_unit_number
2277: )

Line 2283: > DECODE(g_rev_component_rec.new_from_end_item_unit_number,FND_API.G_MISS_CHAR, /* bug 8314145 */

2279: >= g_rev_component_rec.from_end_item_unit_number
2280: )
2281: OR
2282: ( bic.from_end_item_unit_number
2283: > DECODE(g_rev_component_rec.new_from_end_item_unit_number,FND_API.G_MISS_CHAR, /* bug 8314145 */
2284: g_rev_component_rec.from_end_item_unit_number,
2285: NULL, g_rev_component_rec.from_end_item_unit_number,
2286: g_rev_component_rec.new_from_end_item_unit_number
2287: )

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

3063: , p_Old_Rev_Component_Rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
3064: , p_Old_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
3065: )
3066: IS
3067: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
3068: l_bill_sequence_id NUMBER;
3069: l_processed BOOLEAN;
3070: l_result NUMBER;
3071: l_Err_Text VARCHAR2(2000);

Line 3246: l_return_status := FND_API.G_RET_STS_ERROR;

3242: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3243: , p_message_name => 'BOM_LOT_BASED_RDS'
3244: , p_Token_Tbl => l_Token_Tbl
3245: );
3246: l_return_status := FND_API.G_RET_STS_ERROR;
3247: END IF;
3248: END IF;
3249: END IF;
3250:

Line 3361: l_return_status := FND_API.G_RET_STS_ERROR;

3357: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3358: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3359: , p_Token_Tbl => g_Token_Tbl
3360: );
3361: l_return_status := FND_API.G_RET_STS_ERROR;
3362: END IF;
3363:
3364:
3365:

Line 3386: l_return_status := FND_API.G_RET_STS_ERROR;

3382: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3383: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3384: , p_Token_Tbl => g_Token_Tbl
3385: );
3386: l_return_status := FND_API.G_RET_STS_ERROR;
3387: END IF;
3388:
3389: --BOM ER #9946990 changes (end)
3390:

Line 3413: l_return_status := FND_API.G_RET_STS_ERROR;

3409: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3410: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3411: , p_Token_Tbl => g_Token_Tbl
3412: );
3413: l_return_status := FND_API.G_RET_STS_ERROR;
3414: END IF;
3415:
3416: --BOM ER #9946990 changes (end)
3417: --

Line 3449: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3445: x_err_text => l_err_text
3446: );
3447:
3448: EXCEPTION
3449: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3450: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3451: END;
3452: END IF;
3453: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check Eco Status . . .' || l_return_status); END IF;

Line 3450: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3446: );
3447:
3448: EXCEPTION
3449: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3450: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3451: END;
3452: END IF;
3453: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check Eco Status . . .' || l_return_status); END IF;
3454:

Line 3484: l_return_status := FND_API.G_RET_STS_ERROR;

3480: , p_mesg_token_tbl => l_Mesg_Token_Tbl
3481: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3482: , p_token_tbl => g_token_tbl
3483: );
3484: l_return_status := FND_API.G_RET_STS_ERROR;
3485: g_token_tbl.delete;
3486: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
3487: g_Token_Tbl(1).Token_Value := p_rev_component_rec.component_item_name;
3488: END IF ;

Line 3500: p_rev_component_rec.To_End_Item_Unit_Number <> FND_API.G_MISS_CHAR AND

3496: -- To End Item Unit Number must be greater than or equal to
3497: -- From End Item Unit Number
3498:
3499: IF (p_rev_component_rec.To_End_Item_Unit_Number IS NOT NULL AND
3500: p_rev_component_rec.To_End_Item_Unit_Number <> FND_API.G_MISS_CHAR AND
3501: p_rev_component_rec.From_End_Item_Unit_Number IS NOT NULL AND
3502: p_rev_component_rec.From_End_Item_Unit_Number <> FND_API.G_MISS_CHAR
3503: )
3504: AND

Line 3502: p_rev_component_rec.From_End_Item_Unit_Number <> FND_API.G_MISS_CHAR

3498:
3499: IF (p_rev_component_rec.To_End_Item_Unit_Number IS NOT NULL AND
3500: p_rev_component_rec.To_End_Item_Unit_Number <> FND_API.G_MISS_CHAR AND
3501: p_rev_component_rec.From_End_Item_Unit_Number IS NOT NULL AND
3502: p_rev_component_rec.From_End_Item_Unit_Number <> FND_API.G_MISS_CHAR
3503: )
3504: AND
3505: (p_rev_component_rec.From_End_Item_Unit_Number > p_rev_component_rec.To_End_Item_Unit_Number)
3506: THEN

Line 3518: l_return_status := FND_API.G_RET_STS_ERROR;

3514: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3515: , p_token_tbl => g_token_tbl
3516: );
3517:
3518: l_return_status := FND_API.G_RET_STS_ERROR;
3519:
3520: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check to end item unit number. . .' || l_return_status); END IF;
3521:
3522: END IF;

Line 3541: l_return_status := FND_API.G_RET_STS_ERROR;

3537: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3538: , p_token_tbl => g_token_tbl
3539: );
3540:
3541: l_return_status := FND_API.G_RET_STS_ERROR;
3542: /* g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
3543: g_token_tbl(1).token_value :=
3544: p_rev_component_rec.component_item_name;*/
3545:

Line 3581: l_return_status := FND_API.G_RET_STS_ERROR;

3577: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3578: , p_token_tbl => g_token_tbl
3579: );
3580:
3581: l_return_status := FND_API.G_RET_STS_ERROR;
3582: END IF;
3583: END IF;
3584: -- Component can be unit controlled only if parent revised item is
3585: -- unit controlled.

Line 3612: l_return_status := FND_API.G_RET_STS_ERROR;

3608: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3609: , p_token_tbl => g_token_tbl
3610: );
3611:
3612: l_return_status := FND_API.G_RET_STS_ERROR;
3613: END IF;
3614: -- Unit controlled revised items can only have non-ATO or non-PTO
3615: -- standard items as components.
3616: -- Added by AS on 07/08/99 as part of unit effectivity changes

Line 3636: l_return_status := FND_API.G_RET_STS_ERROR;

3632: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3633: , p_token_tbl => g_token_tbl
3634: );
3635:
3636: l_return_status := FND_API.G_RET_STS_ERROR;
3637: END IF;
3638: --
3639: -- Verify that the Parent has BOM Enabled
3640: --

Line 3655: l_return_status := FND_API.G_RET_STS_ERROR;

3651: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3652: , p_token_tbl => g_token_tbl
3653: );
3654:
3655: l_return_status := FND_API.G_RET_STS_ERROR;
3656: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
3657: g_token_tbl(1).token_value :=
3658: p_rev_component_rec.component_item_name;
3659:

Line 3683: l_return_status := FND_API.G_RET_STS_ERROR;

3679: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3680: , p_token_tbl => g_token_tbl
3681: );
3682: END IF;
3683: l_return_status := FND_API.G_RET_STS_ERROR;
3684: END IF;
3685:
3686: END IF; -- End checking of ACD Type
3687:

Line 3717: l_return_status := FND_API.G_RET_STS_ERROR;

3713: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3714: , p_Token_Tbl => g_Token_Tbl
3715: );
3716: END IF;
3717: l_return_status := FND_API.G_RET_STS_ERROR;
3718: -- END IF;
3719: END IF;
3720: EXCEPTION
3721: WHEN NO_DATA_FOUND THEN

Line 3744: l_return_status := FND_API.G_RET_STS_ERROR;

3740: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3741: , p_Token_Tbl => g_Token_Tbl
3742: );
3743: END IF;
3744: l_return_status := FND_API.G_RET_STS_ERROR;
3745: END IF;
3746: WHEN OTHERS THEN
3747: IF FND_MSG_PUB.Check_Msg_Level
3748: (FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 3760: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3756: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3757: );
3758: END IF;
3759: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3760: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3761:
3762: END; -- Check if parent Common Ends
3763:
3764: /*****************************************************************

Line 3785: l_return_status := FND_API.G_RET_STS_ERROR;

3781: , p_Message_name => 'BOM_COMP_SAME_AS_BILL'
3782: , p_token_tbl => g_token_tbl
3783: );
3784: END IF;
3785: l_return_status := FND_API.G_RET_STS_ERROR;
3786: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
3787: g_token_tbl(1).token_value :=
3788: p_rev_component_rec.component_item_name;
3789:

Line 3834: l_return_status := FND_API.G_RET_STS_ERROR;

3830: , p_Message_name => 'BOM_COMPONENT_OVERLAPS'
3831: , p_token_tbl => g_token_tbl
3832: );
3833:
3834: l_return_status := FND_API.G_RET_STS_ERROR;
3835: END IF;
3836: END IF;
3837:
3838: /*************************************************************

Line 3862: l_return_status := FND_API.G_RET_STS_ERROR;

3858: , p_Message_name => 'BOM_COMP_ITEM_BOM_NOT_ENABLED'
3859: , p_token_tbl => g_token_tbl
3860: );
3861: END IF;
3862: l_return_status := FND_API.G_RET_STS_ERROR;
3863: END IF;
3864: END IF;
3865:
3866:

Line 3948: l_return_status := FND_API.G_RET_STS_ERROR;

3944: IF NOT Verify_Item_Attributes( p_Mesg_token_Tbl => l_Mesg_Token_Tbl
3945: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3946: )
3947: THEN
3948: l_return_status := FND_API.G_RET_STS_ERROR;
3949: END IF;
3950:
3951: IF BOM_Globals.get_debug = 'Y' THEN
3952: error_handler.write_debug('Check Item Attribute Validation. . .' || l_Return_Status );

Line 4014: l_return_status := FND_API.G_RET_STS_ERROR;

4010: , p_message_name => l_err_text
4011: , p_token_tbl => g_token_tbl
4012: );
4013: END IF;
4014: l_return_status := FND_API.G_RET_STS_ERROR;
4015: END IF; -- Check if exists in other orgs if common Ends
4016:
4017: END IF; -- End of Operation Type CREATE
4018:

Line 4044: l_return_status := FND_API.G_RET_STS_ERROR;

4040: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4041: , p_token_tbl => g_token_tbl
4042: );
4043: END IF;
4044: l_return_status := FND_API.G_RET_STS_ERROR;
4045: END IF;
4046:
4047: --Since now we can update some attributes of common bills as well,
4048: --ensure that:

Line 4069: l_return_status := FND_API.G_RET_STS_ERROR;

4065: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4066: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4067: , p_token_tbl => g_token_tbl
4068: );
4069: l_return_status := FND_API.G_RET_STS_ERROR;
4070: END IF;
4071: END IF;
4072:
4073: /*******************************************************************

Line 4089: l_return_status := FND_API.G_RET_STS_ERROR;

4085: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4086: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4087: , p_token_tbl => g_token_tbl
4088: );
4089: l_return_status := FND_API.G_RET_STS_ERROR;
4090: END IF;
4091:
4092:
4093: /*******************bug:4240031 ends here***********************************/

Line 4096: p_rev_component_rec.old_effectivity_date <> FND_API.G_MISS_DATE AND

4092:
4093: /*******************bug:4240031 ends here***********************************/
4094:
4095: IF p_rev_component_rec.old_effectivity_date IS NOT NULL AND
4096: p_rev_component_rec.old_effectivity_date <> FND_API.G_MISS_DATE AND
4097: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
4098: THEN
4099: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4100: THEN

Line 4108: l_return_status := FND_API.G_RET_STS_ERROR;

4104: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4105: , p_token_tbl => g_token_tbl
4106: );
4107: END IF;
4108: l_return_status := FND_API.G_RET_STS_ERROR;
4109:
4110: END IF;
4111:
4112: IF p_rev_component_rec.old_operation_sequence_number IS NOT NULL AND

Line 4114: FND_API.G_MISS_NUM AND

4110: END IF;
4111:
4112: IF p_rev_component_rec.old_operation_sequence_number IS NOT NULL AND
4113: p_rev_component_rec.old_operation_sequence_number <>
4114: FND_API.G_MISS_NUM AND
4115: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
4116: THEN
4117: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4118: THEN

Line 4126: l_return_status := FND_API.G_RET_STS_ERROR;

4122: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4123: , p_token_tbl => g_token_tbl
4124: );
4125: END IF;
4126: l_return_status := FND_API.G_RET_STS_ERROR;
4127:
4128: END IF;
4129: --
4130: -- ACD Type not updateable

Line 4145: l_return_status := FND_API.G_RET_STS_ERROR;

4141: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4142: , p_token_tbl => g_token_tbl
4143: );
4144: END IF;
4145: l_return_status := FND_API.G_RET_STS_ERROR;
4146: END IF;
4147:
4148: --
4149: -- Verify that the user is not trying to update a component which

Line 4164: l_return_status := FND_API.G_RET_STS_ERROR;

4160: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4161: , p_token_tbl => g_token_tbl
4162: );
4163: END IF;
4164: l_return_status := FND_API.G_RET_STS_ERROR;
4165: END IF;
4166:
4167: -- User cannot update to_end_item_unit_number when the component
4168: -- is disabled.

Line 4183: l_return_status := FND_API.G_RET_STS_ERROR;

4179: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4180: , p_token_tbl => g_token_tbl
4181: );
4182: END IF;
4183: l_return_status := FND_API.G_RET_STS_ERROR;
4184: END IF;
4185:
4186: END IF; /* Operation UPDATE ENDS */
4187:

Line 4231: l_return_status := FND_API.G_RET_STS_ERROR;

4227: , p_Token_Tbl => g_Token_Tbl
4228: );
4229: g_token_tbl.delete(2);
4230: END IF;
4231: l_return_status := FND_API.G_RET_STS_ERROR;
4232: END IF;
4233:
4234: IF p_rev_component_rec.projected_yield <=0
4235: THEN

Line 4251: l_return_status := FND_API.G_RET_STS_ERROR;

4247: , p_Token_Tbl => g_Token_Tbl
4248: );
4249: g_token_tbl.delete(2);
4250: END IF;
4251: l_return_status := FND_API.G_RET_STS_ERROR;
4252: END IF;
4253:
4254: IF p_rev_component_rec.projected_yield > 1
4255: THEN

Line 4274: or p_rev_component_rec.BASIS_TYPE =FND_API.G_MISS_NUM)

4270:
4271: -- BASIS type should be 2 or null
4272:
4273: IF not(p_rev_component_rec.BASIS_TYPE is null or p_rev_component_rec.BASIS_TYPE=2
4274: or p_rev_component_rec.BASIS_TYPE =FND_API.G_MISS_NUM)
4275: THEN
4276: Error_Handler.Add_Error_Token
4277: ( p_Message_Name => 'BOM_BASIS_TYPE_INVALID'
4278: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4282: l_return_status := FND_API.G_RET_STS_ERROR;

4278: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4279: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4280: , p_message_type => 'E'
4281: );
4282: l_return_status := FND_API.G_RET_STS_ERROR;
4283: END IF;
4284:
4285: -- Validations Related to Basis Type : Basis_type can not be lot if the
4286: -- WIP supply type is Phantom. Basis_type can not be lot for Model/OC items

Line 4296: l_return_status := FND_API.G_RET_STS_ERROR;

4292: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4293: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4294: , p_message_type => 'E'
4295: );
4296: l_return_status := FND_API.G_RET_STS_ERROR;
4297: END IF;
4298:
4299: -- For Components of PTO Kits, Models, Option Classes, Basis type should be item.
4300: IF(g_Assy_PTO_flag ='Y' and p_rev_component_rec.BASIS_TYPE=2) then

Line 4307: l_return_status := FND_API.G_RET_STS_ERROR;

4303: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4304: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4305: , p_message_type => 'E'
4306: );
4307: l_return_status := FND_API.G_RET_STS_ERROR;
4308: END IF;
4309:
4310: --For ATO model, option class bills, optional,model,option class
4311: -- components should not be lot based.

Line 4321: l_return_status := FND_API.G_RET_STS_ERROR;

4317: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4318: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4319: , p_message_type => 'E'
4320: );
4321: l_return_status := FND_API.G_RET_STS_ERROR;
4322: END IF;
4323:
4324: /* Validations for OPM convergence Project, Dual UOM tracking items should not be allowed
4325: for updates and creates */

Line 4333: l_return_status := FND_API.G_RET_STS_ERROR;

4329: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4330: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4331: , p_message_type => 'E'
4332: );
4333: l_return_status := FND_API.G_RET_STS_ERROR;
4334: END IF;
4335:
4336: IF p_control_rec.caller_type <> 'FORM'
4337: THEN

Line 4364: l_return_status := FND_API.G_RET_STS_ERROR;

4360: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4361: , p_Token_Tbl => g_Token_Tbl
4362: );
4363: END IF;
4364: l_return_status := FND_API.G_RET_STS_ERROR;
4365:
4366: ELSIF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_UPDATE AND
4367: p_rev_component_rec.new_effectivity_date IS NOT NULL AND
4368: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND

Line 4368: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND

4364: l_return_status := FND_API.G_RET_STS_ERROR;
4365:
4366: ELSIF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_UPDATE AND
4367: p_rev_component_rec.new_effectivity_date IS NOT NULL AND
4368: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND
4369: (
4370: -- p_rev_component_rec.new_effectivity_date < SYSDATE OR -- Bug3281414
4371: p_rev_component_rec.disable_date < p_rev_component_rec.new_effectivity_date
4372: )

Line 4380: l_return_status := FND_API.G_RET_STS_ERROR;

4376: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4377: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4378: , p_Token_Tbl => g_Token_Tbl
4379: );
4380: l_return_status := FND_API.G_RET_STS_ERROR;
4381: END IF;
4382:
4383: -- dbms_output.put_line('Verified disable date . . . ' || l_return_status);
4384:

Line 4430: l_return_status := FND_API.G_RET_STS_ERROR;

4426: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
4427: , p_Token_Tbl => g_Token_Tbl
4428: );
4429:
4430: l_return_status := FND_API.G_RET_STS_ERROR;
4431: END IF;
4432:
4433: /********************************************************************
4434: --

Line 4469: l_return_status := FND_API.G_RET_STS_ERROR;

4465: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4466: , p_Token_Tbl => g_Token_Tbl
4467: );
4468: END IF;
4469: l_return_status := FND_API.G_RET_STS_ERROR;
4470: WHEN OTHERS THEN
4471: -- dbms_output.put_line(SQLERRM);
4472: Error_Handler.Add_Error_Token
4473: ( p_message_name => NULL

Line 4480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4476: TO_CHAR(SQLCODE)
4477: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4478: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4479: );
4480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4481: END;
4482: END IF;
4483:
4484: ** End of Comment **/

Line 4490: p_rev_component_rec.new_from_end_item_unit_number <> FND_API.G_MISS_CHAR

4486: -- If the user is attempting to change the from_end_item_unit number or to_end_item_unit_number
4487: -- then verify that the change is not creating a component with overlapping dates
4488: IF (p_rev_component_rec.from_end_item_unit_number IS NOT NULL AND
4489: p_rev_component_rec.new_from_end_item_unit_number IS NOT NULL AND
4490: p_rev_component_rec.new_from_end_item_unit_number <> FND_API.G_MISS_CHAR
4491: )
4492: THEN
4493: l_result := Check_Unit_Number();
4494:

Line 4515: l_return_status := FND_API.G_RET_STS_ERROR;

4511: --
4512: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
4513: g_Token_Tbl(1).Token_Value :=
4514: g_Rev_Component_rec.component_item_name;
4515: l_return_status := FND_API.G_RET_STS_ERROR;
4516: END IF;
4517: END IF;
4518:
4519:

Line 4551: l_return_status := FND_API.G_RET_STS_ERROR;

4547: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4548: , p_Token_Tbl => g_Token_Tbl
4549: );
4550: END IF;
4551: l_return_status := FND_API.G_RET_STS_ERROR;
4552: END LOOP ;
4553:
4554: IF Bom_Globals.Get_Debug = 'Y' THEN
4555: Error_Handler.Write_Debug('After checking old component. Return status is '|| l_return_status);

Line 4573: NVL(p_rev_component_rec.new_operation_sequence_number,FND_API.G_MISS_NUM)

4569: p_rev_component_rec.transaction_type = BOM_Globals.G_OPR_CREATE
4570: ) OR
4571: ( p_rev_component_rec.operation_sequence_number <> 1 AND
4572: NVL(p_rev_Component_rec.ACD_Type, 1) = 2 AND
4573: NVL(p_rev_component_rec.new_operation_sequence_number,FND_API.G_MISS_NUM)
4574: = FND_API.G_MISS_NUM
4575: AND (NVL(p_old_rev_component_rec.operation_sequence_number, 1) <>
4576: NVL(p_rev_component_rec.operation_sequence_number, 1) ) --added for bug 12329790
4577: ) OR

Line 4574: = FND_API.G_MISS_NUM

4570: ) OR
4571: ( p_rev_component_rec.operation_sequence_number <> 1 AND
4572: NVL(p_rev_Component_rec.ACD_Type, 1) = 2 AND
4573: NVL(p_rev_component_rec.new_operation_sequence_number,FND_API.G_MISS_NUM)
4574: = FND_API.G_MISS_NUM
4575: AND (NVL(p_old_rev_component_rec.operation_sequence_number, 1) <>
4576: NVL(p_rev_component_rec.operation_sequence_number, 1) ) --added for bug 12329790
4577: ) OR
4578: ( NVL(p_rev_component_rec.new_operation_sequence_number,1) <> 1 AND

Line 4589: p_rev_component_rec.new_operation_sequence_number <> FND_API.G_MISS_NUM

4585: ) AND
4586: (
4587: NVL(p_old_rev_component_rec.operation_sequence_number, 1) <>
4588: NVL(p_rev_component_rec.new_operation_sequence_number, 1) AND
4589: p_rev_component_rec.new_operation_sequence_number <> FND_API.G_MISS_NUM
4590: )
4591: )
4592: THEN
4593:

Line 4615: l_return_status := FND_API.G_RET_STS_ERROR;

4611: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4612: , p_Token_Tbl => g_Token_Tbl
4613: );
4614: END IF;
4615: l_return_status := FND_API.G_RET_STS_ERROR;
4616: ELSE */
4617: --Bug 9076970 changes end
4618: /*************************************************************
4619: --

Line 4647: l_return_status := FND_API.G_RET_STS_ERROR;

4643: --
4644: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
4645: g_Token_Tbl(1).Token_Value :=
4646: g_Rev_Component_rec.component_item_name;
4647: l_return_status := FND_API.G_RET_STS_ERROR;
4648: /* bug:4240031 If there are comp ops then op seq num can not be
4649: * changed to that
4650: */
4651: ELSIF l_result = 3 THEN

Line 4660: l_return_status := FND_API.G_RET_STS_ERROR;

4656: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4657: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4658: , p_Token_Tbl => g_Token_Tbl
4659: );
4660: l_return_status := FND_API.G_RET_STS_ERROR;
4661: ELSIF l_result = 2 THEN
4662: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO THEN
4663: g_Token_Tbl(2).Token_Name := 'OP_SEQ_NUM';
4664: g_Token_Tbl(2).Token_Value :=

Line 4674: l_return_status := FND_API.G_RET_STS_ERROR;

4670: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4671: , p_Token_Tbl => g_Token_Tbl
4672: );
4673: g_Token_Tbl.DELETE(2);
4674: l_return_status := FND_API.G_RET_STS_ERROR;
4675: ELSE
4676: g_Token_Tbl(2).Token_Name := 'OP_SEQ_NUM';
4677: g_Token_Tbl(2).Token_Value :=
4678: to_char

Line 4696: l_return_status := FND_API.G_RET_STS_ERROR;

4692: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4693: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4694: , p_Token_Tbl => g_Token_Tbl
4695: );
4696: l_return_status := FND_API.G_RET_STS_ERROR;
4697: ELSIF l_result = 0 AND
4698: p_Rev_Component_rec.old_operation_sequence_number
4699: IS NOT NULL AND
4700: p_Rev_Component_rec.old_operation_sequence_number <>

Line 4701: FND_API.G_MISS_NUM AND Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO

4697: ELSIF l_result = 0 AND
4698: p_Rev_Component_rec.old_operation_sequence_number
4699: IS NOT NULL AND
4700: p_Rev_Component_rec.old_operation_sequence_number <>
4701: FND_API.G_MISS_NUM AND Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
4702: THEN
4703: BEGIN
4704: SELECT operation_seq_num
4705: INTO l_result

Line 4730: l_return_status := FND_API.G_RET_STS_ERROR;

4726: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4727: , p_Token_Tbl => g_Token_Tbl
4728: );
4729: g_Token_Tbl.DELETE(2);
4730: l_return_status := FND_API.G_RET_STS_ERROR;
4731: END IF;
4732: END IF;
4733: END IF;
4734: END IF; -- Operation_seq_Num Check Ends.

Line 4790: --l_return_status := FND_API.G_RET_STS_ERROR; --Added line, bug 9737140; commented out for bug 9780939

4786: , p_token_tbl => g_token_tbl
4787: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4788: , p_message_type => 'W' --Changed from W to E for bug 8839091; changed back to W for bug 9780939
4789: );
4790: --l_return_status := FND_API.G_RET_STS_ERROR; --Added line, bug 9737140; commented out for bug 9780939
4791: END IF;
4792: -- Since Open Interface allows for Dates to be
4793: -- overlapping do set the error status.
4794: END IF;

Line 4896: l_return_status := FND_API.G_RET_STS_ERROR;

4892: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4893: , p_message_type => 'E'
4894: );
4895: END IF;
4896: l_return_status := FND_API.G_RET_STS_ERROR;
4897: END IF;
4898: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified overlapping dates . . . ' || l_return_status); END IF;
4899:
4900: ELSE

Line 4933: l_return_status := FND_API.G_RET_STS_ERROR;

4929: , p_token_tbl => g_token_tbl
4930: , p_message_type => 'E'
4931: );
4932: END IF;
4933: l_return_status := FND_API.G_RET_STS_ERROR;
4934: END IF;
4935: END IF;
4936: END IF; -- Validate for Plm check ends
4937: END IF;

Line 4957: l_return_status := FND_API.G_RET_STS_ERROR;

4953: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4954: , p_Token_Tbl => g_Token_Tbl
4955: );
4956: END IF;
4957: l_return_status := FND_API.G_RET_STS_ERROR;
4958: END IF;
4959: End if;
4960:
4961: /*********************************************************************

Line 4992: l_return_status := FND_API.G_RET_STS_ERROR;

4988: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4989: , p_Token_Tbl => g_Token_Tbl
4990: );
4991: END IF;
4992: l_return_status := FND_API.G_RET_STS_ERROR;
4993: ELSIF l_Result = 2
4994: THEN
4995: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4996: THEN

Line 5003: l_return_status := FND_API.G_RET_STS_ERROR;

4999: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5000: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5001: );
5002: END IF;
5003: l_return_status := FND_API.G_RET_STS_ERROR;
5004: END IF;
5005: END IF;
5006:
5007: -- dbms_output.put_line('Verified PTO / ATO . . .' || l_return_status);

Line 5047: l_return_status := FND_API.G_RET_STS_ERROR;

5043: , p_Token_Tbl => g_Token_Tbl
5044: );
5045: g_Token_Tbl.DELETE(2);
5046: END IF;
5047: l_return_status := FND_API.G_RET_STS_ERROR;
5048: ELSIF l_Result = 2 THEN
5049: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5050: THEN
5051: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';

Line 5071: l_return_status := FND_API.G_RET_STS_ERROR;

5067: , p_Token_Tbl => g_Token_Tbl
5068: );
5069: g_Token_Tbl.DELETE(2);
5070: g_Token_Tbl.DELETE(3);
5071: l_return_status := FND_API.G_RET_STS_ERROR;
5072: END IF;
5073: --Commented condition below for bug 7392603
5074: /* ELSIF l_Result = 3 THEN
5075: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 5093: l_return_status := FND_API.G_RET_STS_ERROR;*/

5089: g_Token_Tbl(1).Token_Value :=
5090: g_rev_component_rec.component_item_name;
5091:
5092: END IF;
5093: l_return_status := FND_API.G_RET_STS_ERROR;*/
5094: END IF; -- If Result Ends
5095: END IF; -- If Plannng <> 100 Ends
5096:
5097: -- dbms_output.put_line('Verified Planning % . . .' || l_return_status);

Line 5140: l_return_status := FND_API.G_RET_STS_ERROR;

5136: , p_Token_Tbl => g_Token_Tbl
5137: );
5138: g_Token_Tbl.DELETE(2);
5139: END IF;
5140: l_return_status := FND_API.G_RET_STS_ERROR;
5141: ELSIF l_Result = 2 THEN
5142: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
5143: g_Token_Tbl(2).Token_Value :=
5144: g_rev_component_rec.revised_item_name;

Line 5152: l_return_status := FND_API.G_RET_STS_ERROR;

5148: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5149: , p_Token_Tbl => g_Token_Tbl
5150: );
5151: g_Token_Tbl.DELETE(2);
5152: l_return_status := FND_API.G_RET_STS_ERROR;
5153: ELSIF l_Result = 3 THEN
5154: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
5155: g_Token_Tbl(2).Token_Value :=
5156: g_rev_component_rec.revised_item_name;

Line 5175: l_return_status := FND_API.G_RET_STS_ERROR;

5171: , p_Token_Tbl => g_Token_Tbl
5172: );
5173:
5174: g_Token_Tbl.DELETE(2);
5175: l_return_status := FND_API.G_RET_STS_ERROR;
5176: END IF;
5177: END IF;
5178:
5179: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified Req for Rev and Shipping . . . ' || l_return_status); END IF;

Line 5196: l_Return_Status := FND_API.G_RET_STS_ERROR;

5192: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5193: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5194: , p_Token_Tbl => g_Token_Tbl
5195: );
5196: l_Return_Status := FND_API.G_RET_STS_ERROR;
5197: END IF;
5198:
5199: /********************************************************************
5200: -- ATP Validation for components is changed and now there is no restriction

Line 5245: -- l_return_status := FND_API.G_RET_STS_ERROR;

5241: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5242: , p_Token_Tbl => g_Token_Tbl
5243: );
5244: g_Token_Tbl.DELETE(2);
5245: -- l_return_status := FND_API.G_RET_STS_ERROR;
5246: END IF;
5247: l_return_status := FND_API.G_RET_STS_ERROR;
5248: END IF ;
5249: END IF;

Line 5247: l_return_status := FND_API.G_RET_STS_ERROR;

5243: );
5244: g_Token_Tbl.DELETE(2);
5245: -- l_return_status := FND_API.G_RET_STS_ERROR;
5246: END IF;
5247: l_return_status := FND_API.G_RET_STS_ERROR;
5248: END IF ;
5249: END IF;
5250:
5251: IF Bom_Globals.Get_Debug = 'Y' THEN

Line 5293: l_return_status := FND_API.G_RET_STS_ERROR;

5289: );
5290: END IF;
5291: END IF;
5292:
5293: l_return_status := FND_API.G_RET_STS_ERROR;
5294: END IF;
5295: END IF;
5296:
5297: -- dbms_output.put_line('After verification of Mutually exclusive . . .' ||

Line 5328: l_return_status := FND_API.G_RET_STS_ERROR;

5324: NOT Check_Supply_Type
5325: ( p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5326: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl )
5327: THEN
5328: l_return_status := FND_API.G_RET_STS_ERROR;
5329: END IF;
5330:
5331: -- dbms_output.put_line
5332: -- ('After verification of Supply Type . . .' || l_return_status);

Line 5356: l_return_status := FND_API.G_RET_STS_ERROR;

5352: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5353: , p_Token_Tbl => g_Token_Tbl
5354: );
5355: END IF;
5356: l_return_status := FND_API.G_RET_STS_ERROR;
5357: END IF;
5358:
5359: -- Check Maximun Quantity which must be >= Component Quantity or
5360: -- should be NULL if the minimum quantity is NULL.

Line 5376: l_return_status := FND_API.G_RET_STS_ERROR;

5372: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5373: , p_Token_Tbl => g_Token_Tbl
5374: );
5375: END IF;
5376: l_return_status := FND_API.G_RET_STS_ERROR;
5377: END IF;
5378: END IF;
5379:
5380: -- dbms_output.put_line('After verification of Min / Max quantity . . .');

Line 5426: l_return_status := FND_API.G_RET_STS_ERROR;

5422: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5423: , p_Token_Tbl => g_Token_Tbl
5424: );
5425: END IF;
5426: l_return_status := FND_API.G_RET_STS_ERROR;
5427: END IF;
5428: commented for bug 5011929 */
5429: -- dbms_output.put_line('Checked if fractional quantity is valid . . .' ||
5430: -- l_return_status);

Line 5452: l_return_status := FND_API.G_RET_STS_ERROR;

5448: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5449: , p_Token_Tbl => g_Token_Tbl
5450: );
5451: END IF;
5452: l_return_status := FND_API.G_RET_STS_ERROR;
5453: END IF;
5454:
5455: /********************************************************************
5456: --

Line 5473: l_return_status := FND_API.G_RET_STS_ERROR;

5469: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5470: , p_Token_Tbl => g_Token_Tbl
5471: );
5472: END IF;
5473: l_return_status := FND_API.G_RET_STS_ERROR;
5474: END IF;
5475:
5476: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking Supply Subinventory . . . ' || p_rev_component_rec.Supply_SubInventory); END IF;
5477:

Line 5486: p_rev_component_rec.Supply_SubInventory <> FND_API.G_MISS_CHAR AND

5482: ********************************************************************/
5483:
5484: IF -- p_control_rec.caller_type = 'FORM' -- Comment out by MK on 11/13/00
5485: -- AND
5486: p_rev_component_rec.Supply_SubInventory <> FND_API.G_MISS_CHAR AND
5487: (( p_rev_component_rec.Transaction_Type=BOM_GLOBALS.G_OPR_CREATE AND
5488: NVL(p_rev_component_rec.acd_type, 1) = 1 AND
5489: p_rev_component_rec.Supply_SubInventory IS NOT NULL
5490: ) OR

Line 5512: l_return_status := FND_API.G_RET_STS_ERROR;

5508: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5509: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5510: );
5511: END IF;
5512: l_return_status := FND_API.G_RET_STS_ERROR;
5513: END IF;
5514: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After checking Subinventory . . . ' || l_return_status); END IF;
5515:
5516: -- dbms_output.put_line('Checking Locators . . . .');

Line 5528: p_rev_component_rec.Supply_SubInventory <> FND_API.G_MISS_CHAR

5524: AND
5525: (( p_rev_component_rec.Transaction_Type=BOM_GLOBALS.G_OPR_CREATE AND
5526: NVL(p_rev_component_rec.acd_type, 1) = 1 AND
5527: p_rev_component_rec.Supply_SubInventory IS NOT NULL AND
5528: p_rev_component_rec.Supply_SubInventory <> FND_API.G_MISS_CHAR
5529: ) OR
5530: ((( p_rev_component_rec.Transaction_Type=BOM_GLOBALS.G_OPR_CREATE AND
5531: p_rev_component_rec.acd_type = 2
5532: ) OR

Line 5625: l_return_status := FND_API.G_RET_STS_ERROR;

5621: );
5622: END IF;
5623:
5624: END IF;
5625: l_return_status := FND_API.G_RET_STS_ERROR;
5626: ELSIF p_rev_component_rec.location_name IS NOT NULL AND
5627: p_rev_component_rec.supply_subinventory IS NULL
5628: THEN
5629: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 5638: l_return_status := FND_API.G_RET_STS_ERROR;

5634: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5635: , p_Token_Tbl => g_Token_Tbl
5636: );
5637: END IF;
5638: l_return_status := FND_API.G_RET_STS_ERROR;
5639: END IF;
5640:
5641: -- dbms_output.put_line('Operation CREATE ENDS . . .' || l_return_status);
5642:

Line 5714: p_rev_comp_unexp_rec.Delete_Group_Name = FND_API.G_MISS_CHAR

5710: IF BOM_Globals.Get_Bo_Identifier = BOM_Globals.G_BOM_BO AND
5711: p_rev_component_rec.transaction_type = BOM_Globals.G_OPR_DELETE
5712: THEN
5713: IF p_rev_comp_unexp_rec.Delete_Group_Name IS NULL OR
5714: p_rev_comp_unexp_rec.Delete_Group_Name = FND_API.G_MISS_CHAR
5715: THEN
5716:
5717: Error_Handler.Add_Error_Token
5718: ( p_message_name => 'BOM_DG_NAME_MISSING'

Line 5723: l_return_status := FND_API.G_RET_STS_ERROR;

5719: , p_mesg_token_tbl => l_mesg_token_tbl
5720: , x_mesg_token_tbl => l_mesg_token_tbl
5721: );
5722:
5723: l_return_status := FND_API.G_RET_STS_ERROR;
5724:
5725: END IF;
5726:
5727: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 5762: l_return_status := FND_API.G_RET_STS_ERROR;

5758: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
5759: , p_Token_Tbl => g_Token_Tbl
5760: );
5761:
5762: l_return_status := FND_API.G_RET_STS_ERROR;
5763: END IF;
5764: IF round(p_rev_component_rec.quantity_per_assembly) <> p_rev_component_rec.quantity_per_assembly
5765: THEN
5766: Error_Handler.Add_Error_Token

Line 5773: l_return_status := FND_API.G_RET_STS_ERROR;

5769: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
5770: , p_Token_Tbl => g_Token_Tbl
5771: );
5772:
5773: l_return_status := FND_API.G_RET_STS_ERROR;
5774: END IF;
5775: END IF;
5776: END IF;
5777:

Line 5780: IF (l_return_status = FND_API.G_RET_STS_SUCCESS)

5776: END IF;
5777:
5778: -- Component Type Rule Validations.
5779: -- Bug No: 4397973. Check Component types only when the current retrun status is success.
5780: IF (l_return_status = FND_API.G_RET_STS_SUCCESS)
5781: THEN
5782: IF ( p_rev_component_rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE )
5783: THEN
5784: Bom_Validate_Bom_Component.Check_Component_Type_Rule

Line 5793: IF (l_return_status = FND_API.G_RET_STS_ERROR)

5789: , p_child_item_id => p_Rev_Comp_Unexp_Rec.Component_Item_Id
5790: , p_organization_id => p_Rev_Comp_Unexp_Rec.Organization_Id
5791: );
5792:
5793: IF (l_return_status = FND_API.G_RET_STS_ERROR)
5794: THEN
5795: Error_Handler.Add_Error_Token
5796: ( p_Message_Text => l_debug_error_mesg
5797: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5815: WHEN FND_API.G_EXC_ERROR THEN

5811: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Validation done . . . Return Status is ' || l_return_status); END IF;
5812:
5813: EXCEPTION
5814:
5815: WHEN FND_API.G_EXC_ERROR THEN
5816:
5817: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Expected Error in Rev. Comp. Entity Validation . . .'); END IF;
5818:
5819: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5819: x_return_status := FND_API.G_RET_STS_ERROR;

5815: WHEN FND_API.G_EXC_ERROR THEN
5816:
5817: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Expected Error in Rev. Comp. Entity Validation . . .'); END IF;
5818:
5819: x_return_status := FND_API.G_RET_STS_ERROR;
5820: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5821:
5822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5823:

Line 5822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5818:
5819: x_return_status := FND_API.G_RET_STS_ERROR;
5820: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5821:
5822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5823:
5824: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('UNExpected Error in Rev. Comp. Entity Validation . . .'); END IF;
5825:
5826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5823:
5824: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('UNExpected Error in Rev. Comp. Entity Validation . . .'); END IF;
5825:
5826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5827: IF FND_MSG_PUB.Check_Msg_Level
5828: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5829: THEN
5830: l_err_text := G_PKG_NAME ||

Line 5843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5839: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5840:
5841: WHEN OTHERS THEN
5842: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(SQLERRM || ' ' || TO_CHAR(SQLCODE)); END IF;
5843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5844: IF FND_MSG_PUB.Check_Msg_Level
5845: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5846: THEN
5847: l_err_text := G_PKG_NAME ||

Line 5894: x_return_status := FND_API.G_RET_STS_SUCCESS;

5890: organization_id = l_org_id;
5891:
5892: BEGIN
5893:
5894: x_return_status := FND_API.G_RET_STS_SUCCESS;
5895: l_return_status := FND_API.G_RET_STS_SUCCESS;
5896:
5897: g_rev_component_rec := p_rev_component_rec;
5898:

Line 5895: l_return_status := FND_API.G_RET_STS_SUCCESS;

5891:
5892: BEGIN
5893:
5894: x_return_status := FND_API.G_RET_STS_SUCCESS;
5895: l_return_status := FND_API.G_RET_STS_SUCCESS;
5896:
5897: g_rev_component_rec := p_rev_component_rec;
5898:
5899: -- Set the first token to be equal to the component_name

Line 5911: IF p_rev_component_rec.item_sequence_number = FND_API.G_MISS_NUM

5907: --
5908: -- Check if the user is trying to create/update a record with
5909: -- missing value when the column value is required.
5910: --
5911: IF p_rev_component_rec.item_sequence_number = FND_API.G_MISS_NUM
5912: THEN
5913: Error_Handler.Add_Error_Token
5914: ( p_Message_Name => 'BOM_ITEM_NUM_MISSING'
5915: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5919: l_return_status := FND_API.G_RET_STS_ERROR;

5915: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5916: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5917: , p_Token_Tbl => g_Token_Tbl
5918: );
5919: l_return_status := FND_API.G_RET_STS_ERROR;
5920: END IF;
5921:
5922: IF p_rev_component_rec.quantity_per_assembly =
5923: FND_API.G_MISS_NUM

Line 5923: FND_API.G_MISS_NUM

5919: l_return_status := FND_API.G_RET_STS_ERROR;
5920: END IF;
5921:
5922: IF p_rev_component_rec.quantity_per_assembly =
5923: FND_API.G_MISS_NUM
5924: THEN
5925: Error_Handler.Add_Error_Token
5926: ( p_Message_Name => 'BOM_COMP_QUANTITY_MISSING'
5927: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5931: l_return_status := FND_API.G_RET_STS_ERROR;

5927: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5928: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5929: , p_Token_Tbl => g_Token_Tbl
5930: );
5931: l_return_status := FND_API.G_RET_STS_ERROR;
5932: END IF;
5933:
5934: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM
5935: THEN

Line 5934: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM

5930: );
5931: l_return_status := FND_API.G_RET_STS_ERROR;
5932: END IF;
5933:
5934: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM
5935: THEN
5936: Error_Handler.Add_Error_Token
5937: ( p_Message_Name => 'BOM_COMP_YIELD_MISSING'
5938: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5942: l_return_status := FND_API.G_RET_STS_ERROR;

5938: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5939: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5940: , p_Token_Tbl => g_Token_Tbl
5941: );
5942: l_return_status := FND_API.G_RET_STS_ERROR;
5943: END IF;
5944:
5945: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM
5946: THEN

Line 5945: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM

5941: );
5942: l_return_status := FND_API.G_RET_STS_ERROR;
5943: END IF;
5944:
5945: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM
5946: THEN
5947: Error_Handler.Add_Error_Token
5948: ( p_Message_Name => 'BOM_PLAN_PERCENT_MISSING'
5949: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5953: l_return_status := FND_API.G_RET_STS_ERROR;

5949: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5950: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5951: , p_Token_Tbl => g_Token_Tbl
5952: );
5953: l_return_status := FND_API.G_RET_STS_ERROR;
5954: END IF;
5955:
5956: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM
5957: THEN

Line 5956: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM

5952: );
5953: l_return_status := FND_API.G_RET_STS_ERROR;
5954: END IF;
5955:
5956: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM
5957: THEN
5958: Error_Handler.Add_Error_Token
5959: ( p_Message_Name => 'BOM_QUANTITY_RELATED_MISSING'
5960: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5964: l_return_status := FND_API.G_RET_STS_ERROR;

5960: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5961: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5962: , p_Token_Tbl => g_Token_Tbl
5963: );
5964: l_return_status := FND_API.G_RET_STS_ERROR;
5965: END IF;
5966:
5967: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM
5968: THEN

Line 5967: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM

5963: );
5964: l_return_status := FND_API.G_RET_STS_ERROR;
5965: END IF;
5966:
5967: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM
5968: THEN
5969: Error_Handler.Add_Error_Token
5970: ( p_Message_Name => 'BOM_INCL_IN_CST_ROLLUP_MISSING'
5971: -- 'BOM_INCL_IN_COST_ROLLUP_MISSING'

Line 5976: l_return_status := FND_API.G_RET_STS_ERROR;

5972: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5973: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5974: , p_Token_Tbl => g_Token_Tbl
5975: );
5976: l_return_status := FND_API.G_RET_STS_ERROR;
5977: END IF;
5978:
5979: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM
5980: THEN

Line 5979: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM

5975: );
5976: l_return_status := FND_API.G_RET_STS_ERROR;
5977: END IF;
5978:
5979: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM
5980: THEN
5981: Error_Handler.Add_Error_Token
5982: ( p_Message_Name => 'BOM_CHECK_ATP_MISSING'
5983: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5987: l_return_status := FND_API.G_RET_STS_ERROR;

5983: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5984: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5985: , p_Token_Tbl => g_Token_Tbl
5986: );
5987: l_return_status := FND_API.G_RET_STS_ERROR;
5988: END IF;
5989:
5990:
5991: IF p_rev_component_rec.acd_type IS NOT NULL AND

Line 6004: l_return_status := FND_API.G_RET_STS_ERROR;

6000: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6001: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6002: , p_Token_Tbl => g_Token_Tbl
6003: );
6004: l_return_status := FND_API.G_RET_STS_ERROR;
6005: END IF;
6006:
6007: -- Validate rev_component attributes
6008:

Line 6014: AND (p_rev_component_rec.from_end_item_unit_number IS NOT NULL AND p_rev_component_rec.from_end_item_unit_number <> FND_API.G_MISS_CHAR)

6010:
6011: -- Validate from_end_item_unit_number 5482117
6012:
6013: IF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE
6014: AND (p_rev_component_rec.from_end_item_unit_number IS NOT NULL AND p_rev_component_rec.from_end_item_unit_number <> FND_API.G_MISS_CHAR)
6015: AND BOM_EAMUTIL.Asset_group_Item(item_id => l_assembly_item_id, org_id => l_org_Id) = 'N'
6016: THEN
6017: IF NOT Bom_Validate.End_Item_Unit_Number
6018: ( p_from_end_item_unit_number => p_rev_component_rec.from_end_item_unit_number

Line 6035: l_return_status := FND_API.G_RET_STS_ERROR;

6031: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6032: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6033: , p_Token_Tbl => g_Token_Tbl
6034: );
6035: l_return_status := FND_API.G_RET_STS_ERROR;
6036: END IF;
6037: END IF;
6038:
6039: IF p_rev_component_rec.transaction_type =

Line 6044: FND_API.G_MISS_CHAR) AND

6040: BOM_GLOBALS.G_OPR_CREATE AND
6041: (p_rev_component_rec.to_end_item_unit_number IS NOT NULL
6042: AND
6043: p_rev_component_rec.to_end_item_unit_number <>
6044: FND_API.G_MISS_CHAR) AND
6045: BOM_EAMUTIL.Asset_group_Item(
6046: item_id => l_assembly_item_id,
6047: org_id => l_org_Id) = 'N'
6048: THEN

Line 6057: l_return_status := FND_API.G_RET_STS_ERROR;

6053: p_rev_comp_unexp_rec.component_item_id
6054: , x_err_text => l_err_text
6055: )
6056: THEN
6057: l_return_status := FND_API.G_RET_STS_ERROR;
6058: g_token_tbl(1).token_name :=
6059: 'FROM_END_ITEM_UNIT_NUMBER';
6060: g_token_tbl(1).token_value :=
6061: p_rev_component_rec.to_end_item_unit_number;

Line 6095: l_return_status := FND_API.G_RET_STS_ERROR;

6091: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6092: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6093: , p_Token_Tbl => g_Token_Tbl
6094: );
6095: l_return_status := FND_API.G_RET_STS_ERROR;
6096: END IF;
6097:
6098:
6099: /* Comment Out by MK on 11/20/00

Line 6103: ( p_rev_component_rec.from_end_item_unit_number <> FND_API.G_MISS_CHAR OR

6099: /* Comment Out by MK on 11/20/00
6100: -- This validation is not required
6101: -- Modified condition by MK on 11/08/00
6102: IF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE AND
6103: ( p_rev_component_rec.from_end_item_unit_number <> FND_API.G_MISS_CHAR OR
6104: p_rev_component_rec.from_end_item_unit_number IS NOT NULL ) AND
6105: ( p_rev_component_rec.to_end_item_unit_number = FND_API.G_MISS_CHAR OR
6106: p_rev_component_rec.to_end_item_unit_number IS NULL )
6107: THEN

Line 6105: ( p_rev_component_rec.to_end_item_unit_number = FND_API.G_MISS_CHAR OR

6101: -- Modified condition by MK on 11/08/00
6102: IF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE AND
6103: ( p_rev_component_rec.from_end_item_unit_number <> FND_API.G_MISS_CHAR OR
6104: p_rev_component_rec.from_end_item_unit_number IS NOT NULL ) AND
6105: ( p_rev_component_rec.to_end_item_unit_number = FND_API.G_MISS_CHAR OR
6106: p_rev_component_rec.to_end_item_unit_number IS NULL )
6107: THEN
6108: Error_Handler.Add_Error_Token
6109: ( p_Message_Name => 'BOM_CMP_TO_UNIT_NUM_NULL'

Line 6114: l_return_status := FND_API.G_RET_STS_ERROR;

6110: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6111: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6112: , p_Token_Tbl => g_Token_Tbl
6113: );
6114: l_return_status := FND_API.G_RET_STS_ERROR;
6115: END IF;
6116: */
6117:
6118: -- Validations specific to EAM items (Asset Groups and Asset Activities)

Line 6136: l_return_status := FND_API.G_RET_STS_ERROR;

6132: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6133: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6134: , p_Token_Tbl => g_Token_Tbl
6135: );
6136: l_return_status := FND_API.G_RET_STS_ERROR;
6137: END IF;
6138: END LOOP;
6139:
6140: -- Validate the from_end_item_unit_number

Line 6157: l_return_status := FND_API.G_RET_STS_ERROR;

6153: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6154: , p_Token_Tbl => g_Token_Tbl
6155: , p_message_text => l_err_text
6156: );
6157: l_return_status := FND_API.G_RET_STS_ERROR;
6158: END IF;
6159:
6160: -- Validate the to_end_item_unit_number
6161:

Line 6163: p_rev_component_rec.to_end_item_unit_number <> FND_API.G_MISS_CHAR

6159:
6160: -- Validate the to_end_item_unit_number
6161:
6162: IF p_rev_component_rec.to_end_item_unit_number IS NOT NULL AND
6163: p_rev_component_rec.to_end_item_unit_number <> FND_API.G_MISS_CHAR
6164: THEN
6165:
6166: IF NOT Bom_Validate.Asset_Group_Serial_Number
6167: ( p_assembly_item_id => l_assembly_item_id,

Line 6181: l_return_status := FND_API.G_RET_STS_ERROR;

6177: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6178: , p_Token_Tbl => g_Token_Tbl
6179: , p_message_text => l_err_text
6180: );
6181: l_return_status := FND_API.G_RET_STS_ERROR;
6182: END IF;
6183: END IF;
6184:
6185: -- An asset group or activity cannnot be a component of another asset group

Line 6204: l_return_status := FND_API.G_RET_STS_ERROR;

6200: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6201: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6202: , p_Token_Tbl => g_Token_Tbl
6203: );
6204: l_return_status := FND_API.G_RET_STS_ERROR;
6205: END IF;
6206:
6207: END IF;
6208:

Line 6224: l_return_status := FND_API.G_RET_STS_ERROR;

6220: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6221: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6222: , p_Token_Tbl => g_Token_Tbl
6223: );
6224: l_return_status := FND_API.G_RET_STS_ERROR;
6225: END IF;
6226:
6227: -- An asset group cannnot be a component for an asset activity
6228:

Line 6242: l_return_status := FND_API.G_RET_STS_ERROR;

6238: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6239: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6240: , p_Token_Tbl => g_Token_Tbl
6241: );
6242: l_return_status := FND_API.G_RET_STS_ERROR;
6243: END IF;
6244:
6245: END IF;
6246:

Line 6266: l_return_status := FND_API.G_RET_STS_ERROR;

6262: , p_Token_Tbl => g_Token_Tbl
6263: );
6264: g_token_tbl.delete(2);
6265: END IF;
6266: l_return_status := FND_API.G_RET_STS_ERROR;
6267:
6268: ELSIF p_rev_component_rec.wip_supply_type IS NOT NULL AND
6269: p_rev_component_rec.wip_supply_type <> 7 AND
6270: NOT Bom_Validate.Wip_Supply_Type

Line 6292: l_return_status := FND_API.G_RET_STS_ERROR;

6288: g_token_tbl(1).token_value :=
6289: p_rev_component_rec.component_item_name;
6290:
6291: END IF;
6292: l_return_status := FND_API.G_RET_STS_ERROR;
6293: END IF;
6294:
6295: IF p_rev_component_rec.operation_sequence_number IS NOT NULL AND
6296: p_rev_component_rec.operation_sequence_number <= 0

Line 6307: l_return_status := FND_API.G_RET_STS_ERROR;

6303: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6304: , p_Token_Tbl => g_Token_Tbl
6305: );
6306: END IF;
6307: l_return_status := FND_API.G_RET_STS_ERROR;
6308: END IF;
6309:
6310: -- dbms_output.put_line('After Operation Sequence Num . . . ' || l_return_status);
6311:

Line 6328: l_return_status := FND_API.G_RET_STS_ERROR;

6324: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6325: , p_token_tbl => g_Token_Tbl
6326: );
6327: END IF;
6328: l_return_status := FND_API.G_RET_STS_ERROR;
6329: END IF;
6330:
6331: IF p_rev_component_rec.projected_yield IS NOT NULL AND
6332: p_rev_component_rec.projected_yield < 0 OR

Line 6347: --l_return_status := FND_API.G_RET_STS_ERROR;

6343: , p_token_tbl => g_token_tbl
6344: , p_message_type => 'W' -- Bug 3226917
6345: );
6346: END IF;
6347: --l_return_status := FND_API.G_RET_STS_ERROR;
6348: END IF;
6349:
6350: IF p_rev_component_rec.include_in_cost_rollup IS NOT NULL AND
6351: p_rev_component_rec.include_in_cost_rollup NOT IN (1,2)

Line 6362: l_return_status := FND_API.G_RET_STS_ERROR;

6358: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6359: , p_Token_Tbl => g_Token_Tbl
6360: );
6361: END IF;
6362: l_return_status := FND_API.G_RET_STS_ERROR;
6363: END IF;
6364:
6365: IF p_rev_component_rec.SO_Basis IS NOT NULL AND
6366: p_rev_component_rec.SO_Basis NOT IN (1, 2)

Line 6377: l_return_status := FND_API.G_RET_STS_ERROR;

6373: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6374: , p_Token_Tbl => g_Token_Tbl
6375: );
6376: END IF;
6377: l_return_status := FND_API.G_RET_STS_ERROR;
6378: END IF;
6379:
6380: IF p_rev_component_rec.optional IS NOT NULL AND
6381: p_rev_component_rec.optional NOT IN (1, 2)

Line 6392: l_return_status := FND_API.G_RET_STS_ERROR;

6388: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6389: , p_Token_Tbl => g_Token_Tbl
6390: );
6391: END IF;
6392: l_return_status := FND_API.G_RET_STS_ERROR;
6393: END IF;
6394:
6395: IF p_rev_component_rec.mutually_exclusive IS NOT NULL AND
6396: p_rev_component_rec.mutually_exclusive NOT IN (1, 2)

Line 6407: l_return_status := FND_API.G_RET_STS_ERROR;

6403: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6404: , p_Token_Tbl => g_Token_Tbl
6405: );
6406: END IF;
6407: l_return_status := FND_API.G_RET_STS_ERROR;
6408: END IF;
6409:
6410: IF p_rev_component_rec.check_atp IS NOT NULL AND
6411: p_rev_component_rec.check_atp NOT IN (1, 2)

Line 6422: l_return_status := FND_API.G_RET_STS_ERROR;

6418: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6419: , p_Token_Tbl => g_Token_Tbl
6420: );
6421: END IF;
6422: l_return_status := FND_API.G_RET_STS_ERROR;
6423: END IF;
6424:
6425: IF p_rev_component_rec.shipping_allowed IS NOT NULL AND
6426: p_rev_component_rec.shipping_allowed NOT IN (1, 2)

Line 6437: l_return_status := FND_API.G_RET_STS_ERROR;

6433: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6434: , p_Token_Tbl => g_Token_Tbl
6435: );
6436: END IF;
6437: l_return_status := FND_API.G_RET_STS_ERROR;
6438: END IF;
6439:
6440: IF p_rev_component_rec.required_to_ship IS NOT NULL AND
6441: p_rev_component_rec.required_to_ship NOT IN (1, 2)

Line 6452: l_return_status := FND_API.G_RET_STS_ERROR;

6448: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6449: , p_Token_Tbl => g_Token_Tbl
6450: );
6451: END IF;
6452: l_return_status := FND_API.G_RET_STS_ERROR;
6453: END IF;
6454:
6455: IF p_rev_component_rec.required_for_revenue IS NOT NULL AND
6456: p_rev_component_rec.required_for_revenue NOT IN (1, 2)

Line 6467: l_return_status := FND_API.G_RET_STS_ERROR;

6463: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6464: , p_Token_Tbl => g_Token_Tbl
6465: );
6466: END IF;
6467: l_return_status := FND_API.G_RET_STS_ERROR;
6468: END IF;
6469:
6470: IF p_rev_component_rec.include_on_ship_docs IS NOT NULL AND
6471: p_rev_component_rec.include_on_ship_docs NOT IN (1, 2)

Line 6482: l_return_status := FND_API.G_RET_STS_ERROR;

6478: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6479: , p_Token_Tbl => g_Token_Tbl
6480: );
6481: END IF;
6482: l_return_status := FND_API.G_RET_STS_ERROR;
6483: END IF;
6484:
6485: IF p_rev_component_rec.quantity_related IS NOT NULL AND
6486: p_rev_component_rec.quantity_related NOT IN (1, 2)

Line 6497: l_return_status := FND_API.G_RET_STS_ERROR;

6493: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6494: , p_Token_Tbl => g_Token_Tbl
6495: );
6496: END IF;
6497: l_return_status := FND_API.G_RET_STS_ERROR;
6498: END IF;
6499:
6500: -- Validation specific to unimplemented BOM
6501: Error_handler.write_debug ('BOM Implementation date is '||p_rev_comp_unexp_rec.bom_implementation_date);

Line 6508: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND

6504: /* added a dummy condition to make sure this validation happens for any BOM, no matter whether the BOM is fluid or not */
6505: OR 1=1
6506: THEN
6507: IF p_rev_component_rec.new_effectivity_date IS NOT NULL AND
6508: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND
6509: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
6510: THEN
6511: /* Check revision exists for revised item */
6512: IF NOT Item_Revision_Exists(p_rev_comp_unexp_rec.revised_item_id,

Line 6529: l_return_status := FND_API.G_RET_STS_ERROR;

6525: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6526: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6527: , p_Token_Tbl => g_Token_Tbl
6528: );
6529: l_return_status := FND_API.G_RET_STS_ERROR;
6530: END IF;
6531:
6532: /* Check revision exists for component item */
6533:

Line 6551: l_return_status := FND_API.G_RET_STS_ERROR;

6547: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6548: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6549: , p_Token_Tbl => g_Token_Tbl
6550: );
6551: l_return_status := FND_API.G_RET_STS_ERROR;
6552: END IF;
6553: END IF;
6554:
6555: ELSE

Line 6563: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND

6559: Null;
6560:
6561: /* commented for bug 3281414
6562: IF p_rev_component_rec.new_effectivity_date IS NOT NULL AND
6563: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND
6564: p_rev_component_rec.new_effectivity_date < SYSDATE AND
6565: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
6566: THEN
6567: g_token_tbl(1).token_name := 'COMPONENT_ITEM_NAME';

Line 6580: l_return_status := FND_API.G_RET_STS_ERROR;

6576: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6577: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6578: , p_Token_Tbl => g_Token_Tbl
6579: );
6580: l_return_status := FND_API.G_RET_STS_ERROR;
6581:
6582: END IF;
6583: */
6584: END IF;

Line 6592: p_rev_component_rec.start_effective_date <> FND_API.G_MISS_DATE AND

6588: /* OR (p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE)*/
6589: --Commented for bug 5702625.
6590: THEN
6591: IF p_rev_component_rec.start_effective_date IS NOT NULL AND
6592: p_rev_component_rec.start_effective_date <> FND_API.G_MISS_DATE AND
6593: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
6594: THEN
6595: /* Check revision exists for revised item */
6596: Error_handler.write_debug ('Checking for item revision start date');

Line 6614: l_return_status := FND_API.G_RET_STS_ERROR;

6610: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6611: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6612: , p_Token_Tbl => g_Token_Tbl
6613: );
6614: l_return_status := FND_API.G_RET_STS_ERROR;
6615: END IF;
6616:
6617: /* Check revision exists for component item */
6618:

Line 6635: l_return_status := FND_API.G_RET_STS_ERROR;

6631: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6632: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6633: , p_Token_Tbl => g_Token_Tbl
6634: );
6635: l_return_status := FND_API.G_RET_STS_ERROR;
6636: END IF;
6637: END IF;
6638:
6639: ELSE

Line 6649: p_rev_component_rec.start_effective_date <> FND_API.G_MISS_DATE AND

6645: Null;
6646:
6647: /*
6648: IF p_rev_component_rec.start_effective_date IS NOT NULL AND
6649: p_rev_component_rec.start_effective_date <> FND_API.G_MISS_DATE AND
6650: trunc(p_rev_component_rec.start_effective_date) < trunc(SYSDATE) AND
6651: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
6652: THEN
6653: g_token_tbl(1).token_name := 'COMPONENT_ITEM_NAME';

Line 6664: l_return_status := FND_API.G_RET_STS_ERROR;

6660: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6661: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6662: , p_Token_Tbl => g_Token_Tbl
6663: );
6664: l_return_status := FND_API.G_RET_STS_ERROR;
6665:
6666: END IF;
6667: */
6668:

Line 6693: l_return_status := FND_API.G_RET_STS_ERROR;

6689: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6690: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6691: , p_Token_Tbl => g_Token_Tbl
6692: );
6693: l_return_status := FND_API.G_RET_STS_ERROR;
6694: END;
6695:
6696: END IF;
6697:

Line 6702: AND (p_rev_component_rec.eco_name IS NULL OR p_rev_component_rec.eco_name = FND_API.G_MISS_CHAR)

6698: --Validation to ensure that a pending structure header cannot be modified without an ECO
6699: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking if the BOM header is implemented . . .'); END IF;
6700:
6701: IF BOM_GLOBALS.Get_Bill_Header_ECN(p_rev_comp_unexp_rec.bill_Sequence_id) IS NOT NULL
6702: AND (p_rev_component_rec.eco_name IS NULL OR p_rev_component_rec.eco_name = FND_API.G_MISS_CHAR)
6703: THEN
6704: g_token_tbl(1).token_name := 'ALTERNATE';
6705: g_token_tbl(1).token_value := nvl(p_rev_component_rec.Alternate_BOM_Code, bom_globals.retrieve_message('BOM', 'BOM_PRIMARY'));
6706: g_token_tbl(2).token_name := 'ASSY_ITEM';

Line 6717: l_return_status := FND_API.G_RET_STS_ERROR;

6713: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6714: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6715: , p_Token_Tbl => g_Token_Tbl
6716: );
6717: l_return_status := FND_API.G_RET_STS_ERROR;
6718:
6719: END IF;
6720:
6721: -- Done validating attributes

Line 6741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6737: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6738: , p_Mesg_Token_Tbl => l_Mesg_token_Tbl
6739: );
6740: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6742:
6743: END Check_Attributes;
6744:
6745:

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

6757: , p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
6758: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
6759: )
6760: IS
6761: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
6762: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
6763:
6764: BEGIN
6765:

Line 6803: l_return_status := FND_API.G_RET_STS_ERROR;

6799: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
6800: , p_Token_Tbl => g_Token_Tbl
6801: );
6802: END IF;
6803: l_return_status := FND_API.G_RET_STS_ERROR;
6804: EXCEPTION
6805: WHEN NO_DATA_FOUND THEN
6806: null; -- do nothing the record is valid.
6807: END;

Line 6815: WHEN FND_API.G_EXC_ERROR THEN

6811: x_return_status := l_return_status;
6812:
6813: EXCEPTION
6814:
6815: WHEN FND_API.G_EXC_ERROR THEN
6816:
6817: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6818: x_return_status := FND_API.G_RET_STS_ERROR;
6819:

Line 6818: x_return_status := FND_API.G_RET_STS_ERROR;

6814:
6815: WHEN FND_API.G_EXC_ERROR THEN
6816:
6817: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6818: x_return_status := FND_API.G_RET_STS_ERROR;
6819:
6820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6821: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6822: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 6820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6816:
6817: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6818: x_return_status := FND_API.G_RET_STS_ERROR;
6819:
6820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6821: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6822: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6823:
6824: WHEN OTHERS THEN

Line 6822: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6818: x_return_status := FND_API.G_RET_STS_ERROR;
6819:
6820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6821: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6822: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6823:
6824: WHEN OTHERS THEN
6825: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 6826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6822: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6823:
6824: WHEN OTHERS THEN
6825: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6827:
6828: END Check_Entity_Delete;
6829:
6830: /******************************************************************

Line 6892: l_return_status := FND_API.G_RET_STS_ERROR;

6888: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6889: , p_message_name => 'BOM_REV_COMP_ALREADY_EXISTS'
6890: , p_token_tbl => l_token_tbl
6891: );
6892: l_return_status := FND_API.G_RET_STS_ERROR;
6893: ELSIF l_return_status = BOM_Globals.G_RECORD_NOT_FOUND AND
6894: p_rev_component_rec.transaction_type IN
6895: (BOM_Globals.G_OPR_UPDATE, BOM_Globals.G_OPR_DELETE)
6896: THEN

Line 6903: l_return_status := FND_API.G_RET_STS_ERROR;

6899: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6900: , p_message_name => 'BOM_REV_COMP_DOESNOT_EXIST'
6901: , p_token_tbl => l_token_tbl
6902: );
6903: l_return_status := FND_API.G_RET_STS_ERROR;
6904: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
6905: THEN
6906: Error_Handler.Add_Error_Token
6907: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl

Line 6904: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR

6900: , p_message_name => 'BOM_REV_COMP_DOESNOT_EXIST'
6901: , p_token_tbl => l_token_tbl
6902: );
6903: l_return_status := FND_API.G_RET_STS_ERROR;
6904: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
6905: THEN
6906: Error_Handler.Add_Error_Token
6907: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
6908: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6930: l_return_status := FND_API.G_RET_STS_SUCCESS;

6926: x_old_rev_component_rec.transaction_type :=
6927: Bom_Globals.G_OPR_CREATE;
6928: END IF;
6929: END IF;
6930: l_return_status := FND_API.G_RET_STS_SUCCESS;
6931:
6932: END IF;
6933:
6934: x_return_status := l_return_status;

Line 6970: l_return_status := FND_API.G_RET_STS_SUCCESS;

6966: l_return_status VARCHAR2(1);
6967: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
6968:
6969: BEGIN
6970: l_return_status := FND_API.G_RET_STS_SUCCESS;
6971:
6972: /*************************************************************
6973: --
6974: -- In case of an update, based on the revised item information

Line 7009: FND_API.G_RET_STS_ERROR;

7005: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7006: , p_Token_Tbl => l_Token_Tbl
7007: );
7008: l_return_status :=
7009: FND_API.G_RET_STS_ERROR;
7010: END IF;
7011: END LOOP;
7012: END IF;
7013:

Line 7095: l_return_status := FND_API.G_RET_STS_SUCCESS;

7091: AND organization_id = p_organization_id;
7092:
7093:
7094: BEGIN
7095: l_return_status := FND_API.G_RET_STS_SUCCESS;
7096:
7097: /**********************************************************
7098: --
7099: -- Check if the user has access to the revised component's

Line 7142: l_return_status := FND_API.G_RET_STS_ERROR;

7138: , x_Mesg_Token_Tbl => l_mesg_token_tbl
7139: , p_Token_Tbl => l_token_tbl
7140: );
7141: l_token_tbl.DELETE(2);
7142: l_return_status := FND_API.G_RET_STS_ERROR;
7143: END IF;
7144:
7145: IF l_rev_comp_item_type = 5 /* Product Family */
7146: THEN

Line 7153: l_return_status := FND_API.G_RET_STS_ERROR;

7149: , p_Mesg_Token_Tbl => l_mesg_token_tbl
7150: , x_Mesg_Token_Tbl => l_mesg_token_tbl
7151: , p_Token_Tbl => l_token_tbl
7152: );
7153: l_return_status := FND_API.G_RET_STS_ERROR;
7154: END IF;
7155:
7156: /****************************************************************
7157: --

Line 7179: l_return_status := FND_API.G_RET_STS_ERROR;

7175: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7176: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
7177: , p_Token_Tbl => l_token_tbl
7178: );
7179: l_return_status := FND_API.G_RET_STS_ERROR;
7180: END LOOP;
7181: END IF;
7182:
7183: /*********************************************************************

Line 7205: l_return_status := FND_API.G_RET_STS_ERROR;

7201: , p_Mesg_Token_Tbl => l_mesg_token_tbl
7202: , x_Mesg_Token_Tbl => l_mesg_token_tbl
7203: , p_Token_Tbl => l_token_tbl
7204: );
7205: l_return_status := FND_API.G_RET_STS_ERROR;
7206: END IF;
7207: ELSE
7208: IF NOT BOM_Globals.Get_Unit_Controlled_Item AND
7209: BOM_Globals.Get_Unit_Controlled_Component

Line 7223: l_return_status := FND_API.G_RET_STS_ERROR;

7219: , p_Mesg_Token_Tbl => l_mesg_token_tbl
7220: , x_Mesg_Token_Tbl => l_mesg_token_tbl
7221: , p_Token_Tbl => l_token_tbl
7222: );
7223: l_return_status := FND_API.G_RET_STS_ERROR;
7224: END IF;
7225: END IF;
7226:
7227:

Line 7264: l_return_status := FND_API.G_RET_STS_ERROR;

7260: , p_Token_Tbl => l_Token_Tbl
7261: );
7262:
7263: END IF;
7264: l_return_status := FND_API.G_RET_STS_ERROR;
7265: END IF;
7266: **************************************************************/
7267:
7268:

Line 7297: l_return_status := FND_API.G_RET_STS_ERROR;

7293:
7294: l_token_tbl(2).token_name := 'REVISED_COMPONENT_NAME';
7295: l_token_tbl(2).token_value := p_component_name;
7296:
7297: l_return_status := FND_API.G_RET_STS_ERROR;
7298:
7299: Error_Handler.Add_Error_Token
7300: ( p_Message_Name => l_error_name
7301: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 7337: l_return_status := FND_API.G_RET_STS_SUCCESS;

7333: l_Token_Tbl Error_Handler.Token_Tbl_Type;
7334: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
7335: l_return_status VARCHAR2(1);
7336: BEGIN
7337: l_return_status := FND_API.G_RET_STS_SUCCESS;
7338: IF BOM_EAMUTIL.Direct_Item ( item_id => p_bom_comp_unexp_rec.Component_Item_Id,
7339: org_id => p_bom_comp_unexp_rec.Organization_Id ) = 'N' THEN
7340: IF (p_bom_component_rec.Suggested_Vendor_Name IS NOT NULL
7341: OR p_bom_component_rec.Suggested_Vendor_Name <> FND_API.G_MISS_CHAR)

Line 7341: OR p_bom_component_rec.Suggested_Vendor_Name <> FND_API.G_MISS_CHAR)

7337: l_return_status := FND_API.G_RET_STS_SUCCESS;
7338: IF BOM_EAMUTIL.Direct_Item ( item_id => p_bom_comp_unexp_rec.Component_Item_Id,
7339: org_id => p_bom_comp_unexp_rec.Organization_Id ) = 'N' THEN
7340: IF (p_bom_component_rec.Suggested_Vendor_Name IS NOT NULL
7341: OR p_bom_component_rec.Suggested_Vendor_Name <> FND_API.G_MISS_CHAR)
7342: THEN
7343: x_bom_component_rec.Suggested_Vendor_Name := '';
7344: -- x_bom_component_rec.Vendor_Id := '';
7345: Error_Handler.Add_Error_Token

Line 7353: OR p_bom_component_rec.Unit_Price <> FND_API.G_MISS_NUM)

7349: , p_Token_Tbl => l_token_tbl
7350: );
7351: END IF;
7352: IF (p_bom_component_rec.Unit_Price IS NOT NULL
7353: OR p_bom_component_rec.Unit_Price <> FND_API.G_MISS_NUM)
7354: THEN
7355: x_bom_component_rec.Unit_Price := '';
7356: Error_Handler.Add_Error_Token
7357: ( p_Message_Name => 'BOM_COMP_PRICE_IGNORED'

Line 7370: l_return_status := FND_API.G_RET_STS_ERROR;

7366: org_id => p_bom_comp_unexp_rec.Organization_Id ) = 'N'
7367: AND BOM_EAMUTIL.Asset_Activity_Item ( item_id => p_bom_comp_unexp_rec.Assembly_Item_Id,
7368: org_id => p_bom_comp_unexp_rec.Organization_Id ) = 'N'
7369: THEN
7370: l_return_status := FND_API.G_RET_STS_ERROR;
7371: END IF;
7372: */
7373: END IF;
7374: -- l_bom_component_rec := x_bom_component_rec;

Line 7505: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

7501: ELSE
7502: Bom_Globals.Set_Unit_Effectivity (FALSE);
7503: END IF;
7504:
7505: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
7506: THEN
7507: RAISE EXC_ERR_PVT_API_MAIN;
7508: END IF;
7509: