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 2265: <= DECODE(g_rev_component_rec.new_from_end_item_unit_number,FND_API.G_MISS_NUM,

2261: AND bic.component_sequence_id <> g_rev_comp_unexp_rec.component_sequence_id
2262: /* Added extra condition to accomodate bill components
2263: */
2264: AND (( bic.from_end_item_unit_number
2265: <= DECODE(g_rev_component_rec.new_from_end_item_unit_number,FND_API.G_MISS_NUM,
2266: g_rev_component_rec.from_end_item_unit_number,
2267: NULL, g_rev_component_rec.from_end_item_unit_number,
2268: g_rev_component_rec.new_from_end_item_unit_number
2269: )

Line 2275: > DECODE(g_rev_component_rec.new_from_end_item_unit_number,FND_API.G_MISS_NUM,

2271: >= g_rev_component_rec.from_end_item_unit_number
2272: )
2273: OR
2274: ( bic.from_end_item_unit_number
2275: > DECODE(g_rev_component_rec.new_from_end_item_unit_number,FND_API.G_MISS_NUM,
2276: g_rev_component_rec.from_end_item_unit_number,
2277: NULL, g_rev_component_rec.from_end_item_unit_number,
2278: g_rev_component_rec.new_from_end_item_unit_number
2279: )

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

3031: , p_Old_Rev_Component_Rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
3032: , p_Old_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
3033: )
3034: IS
3035: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
3036: l_bill_sequence_id NUMBER;
3037: l_processed BOOLEAN;
3038: l_result NUMBER;
3039: l_Err_Text VARCHAR2(2000);

Line 3210: l_return_status := FND_API.G_RET_STS_ERROR;

3206: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3207: , p_message_name => 'BOM_LOT_BASED_RDS'
3208: , p_Token_Tbl => l_Token_Tbl
3209: );
3210: l_return_status := FND_API.G_RET_STS_ERROR;
3211: END IF;
3212: END IF;
3213: END IF;
3214:

Line 3336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3332: x_err_text => l_err_text
3333: );
3334:
3335: EXCEPTION
3336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3337: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3338: END;
3339: END IF;
3340: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check Eco Status . . .' || l_return_status); END IF;

Line 3337: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3333: );
3334:
3335: EXCEPTION
3336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3337: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3338: END;
3339: END IF;
3340: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check Eco Status . . .' || l_return_status); END IF;
3341:

Line 3371: l_return_status := FND_API.G_RET_STS_ERROR;

3367: , p_mesg_token_tbl => l_Mesg_Token_Tbl
3368: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3369: , p_token_tbl => g_token_tbl
3370: );
3371: l_return_status := FND_API.G_RET_STS_ERROR;
3372: g_token_tbl.delete;
3373: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
3374: g_Token_Tbl(1).Token_Value := p_rev_component_rec.component_item_name;
3375: END IF ;

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

3383: -- To End Item Unit Number must be greater than or equal to
3384: -- From End Item Unit Number
3385:
3386: IF (p_rev_component_rec.To_End_Item_Unit_Number IS NOT NULL AND
3387: p_rev_component_rec.To_End_Item_Unit_Number <> FND_API.G_MISS_CHAR AND
3388: p_rev_component_rec.From_End_Item_Unit_Number IS NOT NULL AND
3389: p_rev_component_rec.From_End_Item_Unit_Number <> FND_API.G_MISS_CHAR
3390: )
3391: AND

Line 3389: p_rev_component_rec.From_End_Item_Unit_Number <> FND_API.G_MISS_CHAR

3385:
3386: IF (p_rev_component_rec.To_End_Item_Unit_Number IS NOT NULL AND
3387: p_rev_component_rec.To_End_Item_Unit_Number <> FND_API.G_MISS_CHAR AND
3388: p_rev_component_rec.From_End_Item_Unit_Number IS NOT NULL AND
3389: p_rev_component_rec.From_End_Item_Unit_Number <> FND_API.G_MISS_CHAR
3390: )
3391: AND
3392: (p_rev_component_rec.From_End_Item_Unit_Number > p_rev_component_rec.To_End_Item_Unit_Number)
3393: THEN

Line 3405: l_return_status := FND_API.G_RET_STS_ERROR;

3401: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3402: , p_token_tbl => g_token_tbl
3403: );
3404:
3405: l_return_status := FND_API.G_RET_STS_ERROR;
3406:
3407: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check to end item unit number. . .' || l_return_status); END IF;
3408:
3409: END IF;

Line 3428: l_return_status := FND_API.G_RET_STS_ERROR;

3424: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3425: , p_token_tbl => g_token_tbl
3426: );
3427:
3428: l_return_status := FND_API.G_RET_STS_ERROR;
3429: /* g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
3430: g_token_tbl(1).token_value :=
3431: p_rev_component_rec.component_item_name;*/
3432:

Line 3468: l_return_status := FND_API.G_RET_STS_ERROR;

3464: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3465: , p_token_tbl => g_token_tbl
3466: );
3467:
3468: l_return_status := FND_API.G_RET_STS_ERROR;
3469: END IF;
3470: END IF;
3471: -- Component can be unit controlled only if parent revised item is
3472: -- unit controlled.

Line 3499: l_return_status := FND_API.G_RET_STS_ERROR;

3495: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3496: , p_token_tbl => g_token_tbl
3497: );
3498:
3499: l_return_status := FND_API.G_RET_STS_ERROR;
3500: END IF;
3501: -- Unit controlled revised items can only have non-ATO or non-PTO
3502: -- standard items as components.
3503: -- Added by AS on 07/08/99 as part of unit effectivity changes

Line 3523: l_return_status := FND_API.G_RET_STS_ERROR;

3519: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3520: , p_token_tbl => g_token_tbl
3521: );
3522:
3523: l_return_status := FND_API.G_RET_STS_ERROR;
3524: END IF;
3525: --
3526: -- Verify that the Parent has BOM Enabled
3527: --

Line 3542: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 3570: l_return_status := FND_API.G_RET_STS_ERROR;

3566: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3567: , p_token_tbl => g_token_tbl
3568: );
3569: END IF;
3570: l_return_status := FND_API.G_RET_STS_ERROR;
3571: END IF;
3572:
3573: END IF; -- End checking of ACD Type
3574:

Line 3602: l_return_status := FND_API.G_RET_STS_ERROR;

3598: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3599: , p_Token_Tbl => g_Token_Tbl
3600: );
3601: END IF;
3602: l_return_status := FND_API.G_RET_STS_ERROR;
3603: -- END IF;
3604:
3605: EXCEPTION
3606: WHEN NO_DATA_FOUND THEN

Line 3629: l_return_status := FND_API.G_RET_STS_ERROR;

3625: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3626: , p_Token_Tbl => g_Token_Tbl
3627: );
3628: END IF;
3629: l_return_status := FND_API.G_RET_STS_ERROR;
3630: END IF;
3631: WHEN OTHERS THEN
3632: IF FND_MSG_PUB.Check_Msg_Level
3633: (FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 3645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3641: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3642: );
3643: END IF;
3644: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3646:
3647: END; -- Check if parent Common Ends
3648:
3649: /*****************************************************************

Line 3670: l_return_status := FND_API.G_RET_STS_ERROR;

3666: , p_Message_name => 'BOM_COMP_SAME_AS_BILL'
3667: , p_token_tbl => g_token_tbl
3668: );
3669: END IF;
3670: l_return_status := FND_API.G_RET_STS_ERROR;
3671: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
3672: g_token_tbl(1).token_value :=
3673: p_rev_component_rec.component_item_name;
3674:

Line 3701: l_return_status := FND_API.G_RET_STS_ERROR;

3697: , p_Message_name => 'BOM_COMP_ITEM_BOM_NOT_ENABLED'
3698: , p_token_tbl => g_token_tbl
3699: );
3700: END IF;
3701: l_return_status := FND_API.G_RET_STS_ERROR;
3702: END IF;
3703: END IF;
3704:
3705:

Line 3787: l_return_status := FND_API.G_RET_STS_ERROR;

3783: IF NOT Verify_Item_Attributes( p_Mesg_token_Tbl => l_Mesg_Token_Tbl
3784: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3785: )
3786: THEN
3787: l_return_status := FND_API.G_RET_STS_ERROR;
3788: END IF;
3789:
3790: IF BOM_Globals.get_debug = 'Y' THEN
3791: error_handler.write_debug('Check Item Attribute Validation. . .' || l_Return_Status );

Line 3825: l_return_status := FND_API.G_RET_STS_ERROR;

3821: , p_message_name => l_err_text
3822: , p_token_tbl => g_token_tbl
3823: );
3824: END IF;
3825: l_return_status := FND_API.G_RET_STS_ERROR;
3826: END IF; -- Check if exists in other orgs if common Ends
3827:
3828: END IF; -- End of Operation Type CREATE
3829:

Line 3855: l_return_status := FND_API.G_RET_STS_ERROR;

3851: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3852: , p_token_tbl => g_token_tbl
3853: );
3854: END IF;
3855: l_return_status := FND_API.G_RET_STS_ERROR;
3856: END IF;
3857:
3858: --Since now we can update some attributes of common bills as well,
3859: --ensure that:

Line 3880: l_return_status := FND_API.G_RET_STS_ERROR;

3876: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3877: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3878: , p_token_tbl => g_token_tbl
3879: );
3880: l_return_status := FND_API.G_RET_STS_ERROR;
3881: END IF;
3882: END IF;
3883:
3884: /*******************************************************************

Line 3900: l_return_status := FND_API.G_RET_STS_ERROR;

3896: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3897: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3898: , p_token_tbl => g_token_tbl
3899: );
3900: l_return_status := FND_API.G_RET_STS_ERROR;
3901: END IF;
3902:
3903:
3904: /*******************bug:4240031 ends here***********************************/

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

3903:
3904: /*******************bug:4240031 ends here***********************************/
3905:
3906: IF p_rev_component_rec.old_effectivity_date IS NOT NULL AND
3907: p_rev_component_rec.old_effectivity_date <> FND_API.G_MISS_DATE AND
3908: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
3909: THEN
3910: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3911: THEN

Line 3919: l_return_status := FND_API.G_RET_STS_ERROR;

3915: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3916: , p_token_tbl => g_token_tbl
3917: );
3918: END IF;
3919: l_return_status := FND_API.G_RET_STS_ERROR;
3920:
3921: END IF;
3922:
3923: IF p_rev_component_rec.old_operation_sequence_number IS NOT NULL AND

Line 3925: FND_API.G_MISS_NUM AND

3921: END IF;
3922:
3923: IF p_rev_component_rec.old_operation_sequence_number IS NOT NULL AND
3924: p_rev_component_rec.old_operation_sequence_number <>
3925: FND_API.G_MISS_NUM AND
3926: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_ECO_BO
3927: THEN
3928: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3929: THEN

Line 3937: l_return_status := FND_API.G_RET_STS_ERROR;

3933: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3934: , p_token_tbl => g_token_tbl
3935: );
3936: END IF;
3937: l_return_status := FND_API.G_RET_STS_ERROR;
3938:
3939: END IF;
3940: --
3941: -- ACD Type not updateable

Line 3956: l_return_status := FND_API.G_RET_STS_ERROR;

3952: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3953: , p_token_tbl => g_token_tbl
3954: );
3955: END IF;
3956: l_return_status := FND_API.G_RET_STS_ERROR;
3957: END IF;
3958:
3959: --
3960: -- Verify that the user is not trying to update a component which

Line 3975: l_return_status := FND_API.G_RET_STS_ERROR;

3971: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3972: , p_token_tbl => g_token_tbl
3973: );
3974: END IF;
3975: l_return_status := FND_API.G_RET_STS_ERROR;
3976: END IF;
3977:
3978: -- User cannot update to_end_item_unit_number when the component
3979: -- is disabled.

Line 3994: l_return_status := FND_API.G_RET_STS_ERROR;

3990: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3991: , p_token_tbl => g_token_tbl
3992: );
3993: END IF;
3994: l_return_status := FND_API.G_RET_STS_ERROR;
3995: END IF;
3996:
3997: END IF; /* Operation UPDATE ENDS */
3998:

Line 4042: l_return_status := FND_API.G_RET_STS_ERROR;

4038: , p_Token_Tbl => g_Token_Tbl
4039: );
4040: g_token_tbl.delete(2);
4041: END IF;
4042: l_return_status := FND_API.G_RET_STS_ERROR;
4043: END IF;
4044:
4045: IF p_rev_component_rec.projected_yield <=0
4046: THEN

Line 4062: l_return_status := FND_API.G_RET_STS_ERROR;

4058: , p_Token_Tbl => g_Token_Tbl
4059: );
4060: g_token_tbl.delete(2);
4061: END IF;
4062: l_return_status := FND_API.G_RET_STS_ERROR;
4063: END IF;
4064:
4065: IF p_rev_component_rec.projected_yield > 1
4066: THEN

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

4081:
4082: -- BASIS type should be 2 or null
4083:
4084: IF not(p_rev_component_rec.BASIS_TYPE is null or p_rev_component_rec.BASIS_TYPE=2
4085: or p_rev_component_rec.BASIS_TYPE =FND_API.G_MISS_NUM)
4086: THEN
4087: Error_Handler.Add_Error_Token
4088: ( p_Message_Name => 'BOM_BASIS_TYPE_INVALID'
4089: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4093: l_return_status := FND_API.G_RET_STS_ERROR;

4089: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4090: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4091: , p_message_type => 'E'
4092: );
4093: l_return_status := FND_API.G_RET_STS_ERROR;
4094: END IF;
4095:
4096: -- Validations Related to Basis Type : Basis_type can not be lot if the
4097: -- WIP supply type is Phantom. Basis_type can not be lot for Model/OC items

Line 4107: l_return_status := FND_API.G_RET_STS_ERROR;

4103: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4104: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4105: , p_message_type => 'E'
4106: );
4107: l_return_status := FND_API.G_RET_STS_ERROR;
4108: END IF;
4109:
4110: -- For Components of PTO Kits, Models, Option Classes, Basis type should be item.
4111: IF(g_Assy_PTO_flag ='Y' and p_rev_component_rec.BASIS_TYPE=2) then

Line 4118: l_return_status := FND_API.G_RET_STS_ERROR;

4114: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4115: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4116: , p_message_type => 'E'
4117: );
4118: l_return_status := FND_API.G_RET_STS_ERROR;
4119: END IF;
4120:
4121: --For ATO model, option class bills, optional,model,option class
4122: -- components should not be lot based.

Line 4132: l_return_status := FND_API.G_RET_STS_ERROR;

4128: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4129: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4130: , p_message_type => 'E'
4131: );
4132: l_return_status := FND_API.G_RET_STS_ERROR;
4133: END IF;
4134:
4135: /* Validations for OPM convergence Project, Dual UOM tracking items should not be allowed
4136: for updates and creates */

Line 4144: l_return_status := FND_API.G_RET_STS_ERROR;

4140: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4141: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4142: , p_message_type => 'E'
4143: );
4144: l_return_status := FND_API.G_RET_STS_ERROR;
4145: END IF;
4146:
4147: IF p_control_rec.caller_type <> 'FORM'
4148: THEN

Line 4175: l_return_status := FND_API.G_RET_STS_ERROR;

4171: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4172: , p_Token_Tbl => g_Token_Tbl
4173: );
4174: END IF;
4175: l_return_status := FND_API.G_RET_STS_ERROR;
4176:
4177: ELSIF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_UPDATE AND
4178: p_rev_component_rec.new_effectivity_date IS NOT NULL AND
4179: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND

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

4175: l_return_status := FND_API.G_RET_STS_ERROR;
4176:
4177: ELSIF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_UPDATE AND
4178: p_rev_component_rec.new_effectivity_date IS NOT NULL AND
4179: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND
4180: (
4181: -- p_rev_component_rec.new_effectivity_date < SYSDATE OR -- Bug3281414
4182: p_rev_component_rec.disable_date < p_rev_component_rec.new_effectivity_date
4183: )

Line 4191: l_return_status := FND_API.G_RET_STS_ERROR;

4187: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4188: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4189: , p_Token_Tbl => g_Token_Tbl
4190: );
4191: l_return_status := FND_API.G_RET_STS_ERROR;
4192: END IF;
4193:
4194: -- dbms_output.put_line('Verified disable date . . . ' || l_return_status);
4195:

Line 4241: l_return_status := FND_API.G_RET_STS_ERROR;

4237: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
4238: , p_Token_Tbl => g_Token_Tbl
4239: );
4240:
4241: l_return_status := FND_API.G_RET_STS_ERROR;
4242: END IF;
4243:
4244: /********************************************************************
4245: --

Line 4280: l_return_status := FND_API.G_RET_STS_ERROR;

4276: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4277: , p_Token_Tbl => g_Token_Tbl
4278: );
4279: END IF;
4280: l_return_status := FND_API.G_RET_STS_ERROR;
4281: WHEN OTHERS THEN
4282: -- dbms_output.put_line(SQLERRM);
4283: Error_Handler.Add_Error_Token
4284: ( p_message_name => NULL

Line 4291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4287: TO_CHAR(SQLCODE)
4288: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4289: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4290: );
4291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4292: END;
4293: END IF;
4294:
4295: ** End of Comment **/

Line 4301: p_rev_component_rec.new_from_end_item_unit_number <> FND_API.G_MISS_CHAR

4297: -- If the user is attempting to change the from_end_item_unit number or to_end_item_unit_number
4298: -- then verify that the change is not creating a component with overlapping dates
4299: IF (p_rev_component_rec.from_end_item_unit_number IS NOT NULL AND
4300: p_rev_component_rec.new_from_end_item_unit_number IS NOT NULL AND
4301: p_rev_component_rec.new_from_end_item_unit_number <> FND_API.G_MISS_CHAR
4302: )
4303: THEN
4304: l_result := Check_Unit_Number();
4305:

Line 4326: l_return_status := FND_API.G_RET_STS_ERROR;

4322: --
4323: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
4324: g_Token_Tbl(1).Token_Value :=
4325: g_Rev_Component_rec.component_item_name;
4326: l_return_status := FND_API.G_RET_STS_ERROR;
4327: END IF;
4328: END IF;
4329:
4330:

Line 4362: l_return_status := FND_API.G_RET_STS_ERROR;

4358: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4359: , p_Token_Tbl => g_Token_Tbl
4360: );
4361: END IF;
4362: l_return_status := FND_API.G_RET_STS_ERROR;
4363: END LOOP ;
4364:
4365: IF Bom_Globals.Get_Debug = 'Y' THEN
4366: Error_Handler.Write_Debug('After checking old component. Return status is '|| l_return_status);

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

4380: p_rev_component_rec.transaction_type = BOM_Globals.G_OPR_CREATE
4381: ) OR
4382: ( p_rev_component_rec.operation_sequence_number <> 1 AND
4383: NVL(p_rev_Component_rec.ACD_Type, 1) = 2 AND
4384: NVL(p_rev_component_rec.new_operation_sequence_number,FND_API.G_MISS_NUM)
4385: = FND_API.G_MISS_NUM
4386: ) OR
4387: ( NVL(p_rev_component_rec.new_operation_sequence_number,1) <> 1 AND
4388: ( ( p_rev_component_rec.ACD_Type = 2 AND

Line 4385: = FND_API.G_MISS_NUM

4381: ) OR
4382: ( p_rev_component_rec.operation_sequence_number <> 1 AND
4383: NVL(p_rev_Component_rec.ACD_Type, 1) = 2 AND
4384: NVL(p_rev_component_rec.new_operation_sequence_number,FND_API.G_MISS_NUM)
4385: = FND_API.G_MISS_NUM
4386: ) OR
4387: ( NVL(p_rev_component_rec.new_operation_sequence_number,1) <> 1 AND
4388: ( ( p_rev_component_rec.ACD_Type = 2 AND
4389: p_rev_component_rec.transaction_type =

Line 4398: p_rev_component_rec.new_operation_sequence_number <> FND_API.G_MISS_NUM

4394: ) AND
4395: (
4396: NVL(p_old_rev_component_rec.operation_sequence_number, 1) <>
4397: NVL(p_rev_component_rec.new_operation_sequence_number, 1) AND
4398: p_rev_component_rec.new_operation_sequence_number <> FND_API.G_MISS_NUM
4399: )
4400: )
4401: THEN
4402:

Line 4423: l_return_status := FND_API.G_RET_STS_ERROR;

4419: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4420: , p_Token_Tbl => g_Token_Tbl
4421: );
4422: END IF;
4423: l_return_status := FND_API.G_RET_STS_ERROR;
4424: ELSE
4425:
4426: /*************************************************************
4427: --

Line 4455: l_return_status := FND_API.G_RET_STS_ERROR;

4451: --
4452: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
4453: g_Token_Tbl(1).Token_Value :=
4454: g_Rev_Component_rec.component_item_name;
4455: l_return_status := FND_API.G_RET_STS_ERROR;
4456: /* bug:4240031 If there are comp ops then op seq num can not be
4457: * changed to that
4458: */
4459: ELSIF l_result = 3 THEN

Line 4468: l_return_status := FND_API.G_RET_STS_ERROR;

4464: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4465: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4466: , p_Token_Tbl => g_Token_Tbl
4467: );
4468: l_return_status := FND_API.G_RET_STS_ERROR;
4469: ELSIF l_result = 2 THEN
4470: IF Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO THEN
4471: g_Token_Tbl(2).Token_Name := 'OP_SEQ_NUM';
4472: g_Token_Tbl(2).Token_Value :=

Line 4482: l_return_status := FND_API.G_RET_STS_ERROR;

4478: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4479: , p_Token_Tbl => g_Token_Tbl
4480: );
4481: g_Token_Tbl.DELETE(2);
4482: l_return_status := FND_API.G_RET_STS_ERROR;
4483: ELSE
4484: g_Token_Tbl(2).Token_Name := 'OP_SEQ_NUM';
4485: g_Token_Tbl(2).Token_Value :=
4486: to_char

Line 4504: l_return_status := FND_API.G_RET_STS_ERROR;

4500: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4501: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4502: , p_Token_Tbl => g_Token_Tbl
4503: );
4504: l_return_status := FND_API.G_RET_STS_ERROR;
4505: ELSIF l_result = 0 AND
4506: p_Rev_Component_rec.old_operation_sequence_number
4507: IS NOT NULL AND
4508: p_Rev_Component_rec.old_operation_sequence_number <>

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

4505: ELSIF l_result = 0 AND
4506: p_Rev_Component_rec.old_operation_sequence_number
4507: IS NOT NULL AND
4508: p_Rev_Component_rec.old_operation_sequence_number <>
4509: FND_API.G_MISS_NUM AND Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
4510: THEN
4511: BEGIN
4512: SELECT operation_seq_num
4513: INTO l_result

Line 4538: l_return_status := FND_API.G_RET_STS_ERROR;

4534: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4535: , p_Token_Tbl => g_Token_Tbl
4536: );
4537: g_Token_Tbl.DELETE(2);
4538: l_return_status := FND_API.G_RET_STS_ERROR;
4539: END IF;
4540: END IF;
4541: END IF;
4542: END IF; -- Operation_seq_Num Check Ends.

Line 4676: l_return_status := FND_API.G_RET_STS_ERROR;

4672: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4673: , p_message_type => 'E'
4674: );
4675: END IF;
4676: l_return_status := FND_API.G_RET_STS_ERROR;
4677: END IF;
4678: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified overlapping dates . . . ' || l_return_status); END IF;
4679:
4680: ELSE

Line 4713: l_return_status := FND_API.G_RET_STS_ERROR;

4709: , p_token_tbl => g_token_tbl
4710: , p_message_type => 'E'
4711: );
4712: END IF;
4713: l_return_status := FND_API.G_RET_STS_ERROR;
4714: END IF;
4715: END IF;
4716: END IF; -- Validate for Plm check ends
4717: END IF;

Line 4737: l_return_status := FND_API.G_RET_STS_ERROR;

4733: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4734: , p_Token_Tbl => g_Token_Tbl
4735: );
4736: END IF;
4737: l_return_status := FND_API.G_RET_STS_ERROR;
4738: END IF;
4739: End if;
4740:
4741: /*********************************************************************

Line 4772: l_return_status := FND_API.G_RET_STS_ERROR;

4768: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4769: , p_Token_Tbl => g_Token_Tbl
4770: );
4771: END IF;
4772: l_return_status := FND_API.G_RET_STS_ERROR;
4773: ELSIF l_Result = 2
4774: THEN
4775: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4776: THEN

Line 4783: l_return_status := FND_API.G_RET_STS_ERROR;

4779: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4780: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4781: );
4782: END IF;
4783: l_return_status := FND_API.G_RET_STS_ERROR;
4784: END IF;
4785: END IF;
4786:
4787: -- dbms_output.put_line('Verified PTO / ATO . . .' || l_return_status);

Line 4827: l_return_status := FND_API.G_RET_STS_ERROR;

4823: , p_Token_Tbl => g_Token_Tbl
4824: );
4825: g_Token_Tbl.DELETE(2);
4826: END IF;
4827: l_return_status := FND_API.G_RET_STS_ERROR;
4828: ELSIF l_Result = 2 THEN
4829: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4830: THEN
4831: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';

Line 4851: l_return_status := FND_API.G_RET_STS_ERROR;

4847: , p_Token_Tbl => g_Token_Tbl
4848: );
4849: g_Token_Tbl.DELETE(2);
4850: g_Token_Tbl.DELETE(3);
4851: l_return_status := FND_API.G_RET_STS_ERROR;
4852: END IF;
4853: ELSIF l_Result = 3 THEN
4854: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4855: THEN

Line 4872: l_return_status := FND_API.G_RET_STS_ERROR;

4868: g_Token_Tbl(1).Token_Value :=
4869: g_rev_component_rec.component_item_name;
4870:
4871: END IF;
4872: l_return_status := FND_API.G_RET_STS_ERROR;
4873: END IF; -- If Result Ends
4874: END IF; -- If Plannng <> 100 Ends
4875:
4876: -- dbms_output.put_line('Verified Planning % . . .' || l_return_status);

Line 4919: l_return_status := FND_API.G_RET_STS_ERROR;

4915: , p_Token_Tbl => g_Token_Tbl
4916: );
4917: g_Token_Tbl.DELETE(2);
4918: END IF;
4919: l_return_status := FND_API.G_RET_STS_ERROR;
4920: ELSIF l_Result = 2 THEN
4921: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
4922: g_Token_Tbl(2).Token_Value :=
4923: g_rev_component_rec.revised_item_name;

Line 4931: l_return_status := FND_API.G_RET_STS_ERROR;

4927: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4928: , p_Token_Tbl => g_Token_Tbl
4929: );
4930: g_Token_Tbl.DELETE(2);
4931: l_return_status := FND_API.G_RET_STS_ERROR;
4932: ELSIF l_Result = 3 THEN
4933: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
4934: g_Token_Tbl(2).Token_Value :=
4935: g_rev_component_rec.revised_item_name;

Line 4954: l_return_status := FND_API.G_RET_STS_ERROR;

4950: , p_Token_Tbl => g_Token_Tbl
4951: );
4952:
4953: g_Token_Tbl.DELETE(2);
4954: l_return_status := FND_API.G_RET_STS_ERROR;
4955: END IF;
4956: END IF;
4957:
4958: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Verified Req for Rev and Shipping . . . ' || l_return_status); END IF;

Line 4975: l_Return_Status := FND_API.G_RET_STS_ERROR;

4971: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4972: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4973: , p_Token_Tbl => g_Token_Tbl
4974: );
4975: l_Return_Status := FND_API.G_RET_STS_ERROR;
4976: END IF;
4977:
4978: /********************************************************************
4979: -- ATP Validation for components is changed and now there is no restriction

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

5020: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5021: , p_Token_Tbl => g_Token_Tbl
5022: );
5023: g_Token_Tbl.DELETE(2);
5024: -- l_return_status := FND_API.G_RET_STS_ERROR;
5025: END IF;
5026: l_return_status := FND_API.G_RET_STS_ERROR;
5027: END IF ;
5028: END IF;

Line 5026: l_return_status := FND_API.G_RET_STS_ERROR;

5022: );
5023: g_Token_Tbl.DELETE(2);
5024: -- l_return_status := FND_API.G_RET_STS_ERROR;
5025: END IF;
5026: l_return_status := FND_API.G_RET_STS_ERROR;
5027: END IF ;
5028: END IF;
5029:
5030: IF Bom_Globals.Get_Debug = 'Y' THEN

Line 5072: l_return_status := FND_API.G_RET_STS_ERROR;

5068: );
5069: END IF;
5070: END IF;
5071:
5072: l_return_status := FND_API.G_RET_STS_ERROR;
5073: END IF;
5074: END IF;
5075:
5076: -- dbms_output.put_line('After verification of Mutually exclusive . . .' ||

Line 5107: l_return_status := FND_API.G_RET_STS_ERROR;

5103: NOT Check_Supply_Type
5104: ( p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5105: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl )
5106: THEN
5107: l_return_status := FND_API.G_RET_STS_ERROR;
5108: END IF;
5109:
5110: -- dbms_output.put_line
5111: -- ('After verification of Supply Type . . .' || l_return_status);

Line 5135: l_return_status := FND_API.G_RET_STS_ERROR;

5131: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5132: , p_Token_Tbl => g_Token_Tbl
5133: );
5134: END IF;
5135: l_return_status := FND_API.G_RET_STS_ERROR;
5136: END IF;
5137:
5138: -- Check Maximun Quantity which must be >= Component Quantity or
5139: -- should be NULL if the minimum quantity is NULL.

Line 5155: l_return_status := FND_API.G_RET_STS_ERROR;

5151: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5152: , p_Token_Tbl => g_Token_Tbl
5153: );
5154: END IF;
5155: l_return_status := FND_API.G_RET_STS_ERROR;
5156: END IF;
5157: END IF;
5158:
5159: -- dbms_output.put_line('After verification of Min / Max quantity . . .');

Line 5205: l_return_status := FND_API.G_RET_STS_ERROR;

5201: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5202: , p_Token_Tbl => g_Token_Tbl
5203: );
5204: END IF;
5205: l_return_status := FND_API.G_RET_STS_ERROR;
5206: END IF;
5207: commented for bug 5011929 */
5208: -- dbms_output.put_line('Checked if fractional quantity is valid . . .' ||
5209: -- l_return_status);

Line 5231: l_return_status := FND_API.G_RET_STS_ERROR;

5227: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5228: , p_Token_Tbl => g_Token_Tbl
5229: );
5230: END IF;
5231: l_return_status := FND_API.G_RET_STS_ERROR;
5232: END IF;
5233:
5234: /********************************************************************
5235: --

Line 5252: l_return_status := FND_API.G_RET_STS_ERROR;

5248: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5249: , p_Token_Tbl => g_Token_Tbl
5250: );
5251: END IF;
5252: l_return_status := FND_API.G_RET_STS_ERROR;
5253: END IF;
5254:
5255: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking Supply Subinventory . . . ' || p_rev_component_rec.Supply_SubInventory); END IF;
5256:

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

5261: ********************************************************************/
5262:
5263: IF -- p_control_rec.caller_type = 'FORM' -- Comment out by MK on 11/13/00
5264: -- AND
5265: p_rev_component_rec.Supply_SubInventory <> FND_API.G_MISS_CHAR AND
5266: (( p_rev_component_rec.Transaction_Type=BOM_GLOBALS.G_OPR_CREATE AND
5267: NVL(p_rev_component_rec.acd_type, 1) = 1 AND
5268: p_rev_component_rec.Supply_SubInventory IS NOT NULL
5269: ) OR

Line 5291: l_return_status := FND_API.G_RET_STS_ERROR;

5287: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5288: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5289: );
5290: END IF;
5291: l_return_status := FND_API.G_RET_STS_ERROR;
5292: END IF;
5293: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After checking Subinventory . . . ' || l_return_status); END IF;
5294:
5295: -- dbms_output.put_line('Checking Locators . . . .');

Line 5307: p_rev_component_rec.Supply_SubInventory <> FND_API.G_MISS_CHAR

5303: AND
5304: (( p_rev_component_rec.Transaction_Type=BOM_GLOBALS.G_OPR_CREATE AND
5305: NVL(p_rev_component_rec.acd_type, 1) = 1 AND
5306: p_rev_component_rec.Supply_SubInventory IS NOT NULL AND
5307: p_rev_component_rec.Supply_SubInventory <> FND_API.G_MISS_CHAR
5308: ) OR
5309: ((( p_rev_component_rec.Transaction_Type=BOM_GLOBALS.G_OPR_CREATE AND
5310: p_rev_component_rec.acd_type = 2
5311: ) OR

Line 5404: l_return_status := FND_API.G_RET_STS_ERROR;

5400: );
5401: END IF;
5402:
5403: END IF;
5404: l_return_status := FND_API.G_RET_STS_ERROR;
5405: ELSIF p_rev_component_rec.location_name IS NOT NULL AND
5406: p_rev_component_rec.supply_subinventory IS NULL
5407: THEN
5408: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 5417: l_return_status := FND_API.G_RET_STS_ERROR;

5413: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5414: , p_Token_Tbl => g_Token_Tbl
5415: );
5416: END IF;
5417: l_return_status := FND_API.G_RET_STS_ERROR;
5418: END IF;
5419:
5420: -- dbms_output.put_line('Operation CREATE ENDS . . .' || l_return_status);
5421: /*******************************************************************

Line 5480: p_rev_comp_unexp_rec.Delete_Group_Name = FND_API.G_MISS_CHAR

5476: IF BOM_Globals.Get_Bo_Identifier = BOM_Globals.G_BOM_BO AND
5477: p_rev_component_rec.transaction_type = BOM_Globals.G_OPR_DELETE
5478: THEN
5479: IF p_rev_comp_unexp_rec.Delete_Group_Name IS NULL OR
5480: p_rev_comp_unexp_rec.Delete_Group_Name = FND_API.G_MISS_CHAR
5481: THEN
5482:
5483: Error_Handler.Add_Error_Token
5484: ( p_message_name => 'BOM_DG_NAME_MISSING'

Line 5489: l_return_status := FND_API.G_RET_STS_ERROR;

5485: , p_mesg_token_tbl => l_mesg_token_tbl
5486: , x_mesg_token_tbl => l_mesg_token_tbl
5487: );
5488:
5489: l_return_status := FND_API.G_RET_STS_ERROR;
5490:
5491: END IF;
5492:
5493: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 5523: l_return_status := FND_API.G_RET_STS_ERROR;

5519: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
5520: , p_Token_Tbl => g_Token_Tbl
5521: );
5522:
5523: l_return_status := FND_API.G_RET_STS_ERROR;
5524: END IF;
5525: IF round(p_rev_component_rec.quantity_per_assembly) <> p_rev_component_rec.quantity_per_assembly
5526: THEN
5527: Error_Handler.Add_Error_Token

Line 5534: l_return_status := FND_API.G_RET_STS_ERROR;

5530: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
5531: , p_Token_Tbl => g_Token_Tbl
5532: );
5533:
5534: l_return_status := FND_API.G_RET_STS_ERROR;
5535: END IF;
5536: END IF;
5537: END IF;
5538:

Line 5541: IF (l_return_status = FND_API.G_RET_STS_SUCCESS)

5537: END IF;
5538:
5539: -- Component Type Rule Validations.
5540: -- Bug No: 4397973. Check Component types only when the current retrun status is success.
5541: IF (l_return_status = FND_API.G_RET_STS_SUCCESS)
5542: THEN
5543: IF ( p_rev_component_rec.Transaction_Type = BOM_GLOBALS.G_OPR_CREATE )
5544: THEN
5545: Bom_Validate_Bom_Component.Check_Component_Type_Rule

Line 5554: IF (l_return_status = FND_API.G_RET_STS_ERROR)

5550: , p_child_item_id => p_Rev_Comp_Unexp_Rec.Component_Item_Id
5551: , p_organization_id => p_Rev_Comp_Unexp_Rec.Organization_Id
5552: );
5553:
5554: IF (l_return_status = FND_API.G_RET_STS_ERROR)
5555: THEN
5556: Error_Handler.Add_Error_Token
5557: ( p_Message_Text => l_debug_error_mesg
5558: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5576: WHEN FND_API.G_EXC_ERROR THEN

5572: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Validation done . . . Return Status is ' || l_return_status); END IF;
5573:
5574: EXCEPTION
5575:
5576: WHEN FND_API.G_EXC_ERROR THEN
5577:
5578: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Expected Error in Rev. Comp. Entity Validation . . .'); END IF;
5579:
5580: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5580: x_return_status := FND_API.G_RET_STS_ERROR;

5576: WHEN FND_API.G_EXC_ERROR THEN
5577:
5578: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Expected Error in Rev. Comp. Entity Validation . . .'); END IF;
5579:
5580: x_return_status := FND_API.G_RET_STS_ERROR;
5581: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5582:
5583: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5584:

Line 5583: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5579:
5580: x_return_status := FND_API.G_RET_STS_ERROR;
5581: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5582:
5583: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5584:
5585: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('UNExpected Error in Rev. Comp. Entity Validation . . .'); END IF;
5586:
5587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5583: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5584:
5585: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('UNExpected Error in Rev. Comp. Entity Validation . . .'); END IF;
5586:
5587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5588: IF FND_MSG_PUB.Check_Msg_Level
5589: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5590: THEN
5591: l_err_text := G_PKG_NAME ||

Line 5604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5600: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
5601:
5602: WHEN OTHERS THEN
5603: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(SQLERRM || ' ' || TO_CHAR(SQLCODE)); END IF;
5604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5605: IF FND_MSG_PUB.Check_Msg_Level
5606: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5607: THEN
5608: l_err_text := G_PKG_NAME ||

Line 5655: x_return_status := FND_API.G_RET_STS_SUCCESS;

5651: organization_id = l_org_id;
5652:
5653: BEGIN
5654:
5655: x_return_status := FND_API.G_RET_STS_SUCCESS;
5656: l_return_status := FND_API.G_RET_STS_SUCCESS;
5657:
5658: g_rev_component_rec := p_rev_component_rec;
5659:

Line 5656: l_return_status := FND_API.G_RET_STS_SUCCESS;

5652:
5653: BEGIN
5654:
5655: x_return_status := FND_API.G_RET_STS_SUCCESS;
5656: l_return_status := FND_API.G_RET_STS_SUCCESS;
5657:
5658: g_rev_component_rec := p_rev_component_rec;
5659:
5660: -- Set the first token to be equal to the component_name

Line 5672: IF p_rev_component_rec.item_sequence_number = FND_API.G_MISS_NUM

5668: --
5669: -- Check if the user is trying to create/update a record with
5670: -- missing value when the column value is required.
5671: --
5672: IF p_rev_component_rec.item_sequence_number = FND_API.G_MISS_NUM
5673: THEN
5674: Error_Handler.Add_Error_Token
5675: ( p_Message_Name => 'BOM_ITEM_NUM_MISSING'
5676: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5680: l_return_status := FND_API.G_RET_STS_ERROR;

5676: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5677: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5678: , p_Token_Tbl => g_Token_Tbl
5679: );
5680: l_return_status := FND_API.G_RET_STS_ERROR;
5681: END IF;
5682:
5683: IF p_rev_component_rec.quantity_per_assembly =
5684: FND_API.G_MISS_NUM

Line 5684: FND_API.G_MISS_NUM

5680: l_return_status := FND_API.G_RET_STS_ERROR;
5681: END IF;
5682:
5683: IF p_rev_component_rec.quantity_per_assembly =
5684: FND_API.G_MISS_NUM
5685: THEN
5686: Error_Handler.Add_Error_Token
5687: ( p_Message_Name => 'BOM_COMP_QUANTITY_MISSING'
5688: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5692: l_return_status := FND_API.G_RET_STS_ERROR;

5688: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5689: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5690: , p_Token_Tbl => g_Token_Tbl
5691: );
5692: l_return_status := FND_API.G_RET_STS_ERROR;
5693: END IF;
5694:
5695: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM
5696: THEN

Line 5695: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM

5691: );
5692: l_return_status := FND_API.G_RET_STS_ERROR;
5693: END IF;
5694:
5695: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM
5696: THEN
5697: Error_Handler.Add_Error_Token
5698: ( p_Message_Name => 'BOM_COMP_YIELD_MISSING'
5699: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5703: l_return_status := FND_API.G_RET_STS_ERROR;

5699: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5700: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5701: , p_Token_Tbl => g_Token_Tbl
5702: );
5703: l_return_status := FND_API.G_RET_STS_ERROR;
5704: END IF;
5705:
5706: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM
5707: THEN

Line 5706: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM

5702: );
5703: l_return_status := FND_API.G_RET_STS_ERROR;
5704: END IF;
5705:
5706: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM
5707: THEN
5708: Error_Handler.Add_Error_Token
5709: ( p_Message_Name => 'BOM_PLAN_PERCENT_MISSING'
5710: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5714: l_return_status := FND_API.G_RET_STS_ERROR;

5710: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5711: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5712: , p_Token_Tbl => g_Token_Tbl
5713: );
5714: l_return_status := FND_API.G_RET_STS_ERROR;
5715: END IF;
5716:
5717: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM
5718: THEN

Line 5717: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM

5713: );
5714: l_return_status := FND_API.G_RET_STS_ERROR;
5715: END IF;
5716:
5717: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM
5718: THEN
5719: Error_Handler.Add_Error_Token
5720: ( p_Message_Name => 'BOM_QUANTITY_RELATED_MISSING'
5721: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5725: l_return_status := FND_API.G_RET_STS_ERROR;

5721: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5722: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5723: , p_Token_Tbl => g_Token_Tbl
5724: );
5725: l_return_status := FND_API.G_RET_STS_ERROR;
5726: END IF;
5727:
5728: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM
5729: THEN

Line 5728: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM

5724: );
5725: l_return_status := FND_API.G_RET_STS_ERROR;
5726: END IF;
5727:
5728: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM
5729: THEN
5730: Error_Handler.Add_Error_Token
5731: ( p_Message_Name => 'BOM_INCL_IN_CST_ROLLUP_MISSING'
5732: -- 'BOM_INCL_IN_COST_ROLLUP_MISSING'

Line 5737: l_return_status := FND_API.G_RET_STS_ERROR;

5733: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5734: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5735: , p_Token_Tbl => g_Token_Tbl
5736: );
5737: l_return_status := FND_API.G_RET_STS_ERROR;
5738: END IF;
5739:
5740: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM
5741: THEN

Line 5740: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM

5736: );
5737: l_return_status := FND_API.G_RET_STS_ERROR;
5738: END IF;
5739:
5740: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM
5741: THEN
5742: Error_Handler.Add_Error_Token
5743: ( p_Message_Name => 'BOM_CHECK_ATP_MISSING'
5744: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 5748: l_return_status := FND_API.G_RET_STS_ERROR;

5744: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5745: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5746: , p_Token_Tbl => g_Token_Tbl
5747: );
5748: l_return_status := FND_API.G_RET_STS_ERROR;
5749: END IF;
5750:
5751:
5752: IF p_rev_component_rec.acd_type IS NOT NULL AND

Line 5765: l_return_status := FND_API.G_RET_STS_ERROR;

5761: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5762: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5763: , p_Token_Tbl => g_Token_Tbl
5764: );
5765: l_return_status := FND_API.G_RET_STS_ERROR;
5766: END IF;
5767:
5768: -- Validate rev_component attributes
5769:

Line 5775: 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)

5771:
5772: -- Validate from_end_item_unit_number 5482117
5773:
5774: IF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE
5775: 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)
5776: AND BOM_EAMUTIL.Asset_group_Item(item_id => l_assembly_item_id, org_id => l_org_Id) = 'N'
5777: THEN
5778: IF NOT Bom_Validate.End_Item_Unit_Number
5779: ( p_from_end_item_unit_number => p_rev_component_rec.from_end_item_unit_number

Line 5796: l_return_status := FND_API.G_RET_STS_ERROR;

5792: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5793: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5794: , p_Token_Tbl => g_Token_Tbl
5795: );
5796: l_return_status := FND_API.G_RET_STS_ERROR;
5797: END IF;
5798: END IF;
5799:
5800: IF p_rev_component_rec.transaction_type =

Line 5805: FND_API.G_MISS_CHAR) AND

5801: BOM_GLOBALS.G_OPR_CREATE AND
5802: (p_rev_component_rec.to_end_item_unit_number IS NOT NULL
5803: AND
5804: p_rev_component_rec.to_end_item_unit_number <>
5805: FND_API.G_MISS_CHAR) AND
5806: BOM_EAMUTIL.Asset_group_Item(
5807: item_id => l_assembly_item_id,
5808: org_id => l_org_Id) = 'N'
5809: THEN

Line 5818: l_return_status := FND_API.G_RET_STS_ERROR;

5814: p_rev_comp_unexp_rec.component_item_id
5815: , x_err_text => l_err_text
5816: )
5817: THEN
5818: l_return_status := FND_API.G_RET_STS_ERROR;
5819: g_token_tbl(1).token_name :=
5820: 'FROM_END_ITEM_UNIT_NUMBER';
5821: g_token_tbl(1).token_value :=
5822: p_rev_component_rec.to_end_item_unit_number;

Line 5856: l_return_status := FND_API.G_RET_STS_ERROR;

5852: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5853: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5854: , p_Token_Tbl => g_Token_Tbl
5855: );
5856: l_return_status := FND_API.G_RET_STS_ERROR;
5857: END IF;
5858:
5859:
5860: /* Comment Out by MK on 11/20/00

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

5860: /* Comment Out by MK on 11/20/00
5861: -- This validation is not required
5862: -- Modified condition by MK on 11/08/00
5863: IF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE AND
5864: ( p_rev_component_rec.from_end_item_unit_number <> FND_API.G_MISS_CHAR OR
5865: p_rev_component_rec.from_end_item_unit_number IS NOT NULL ) AND
5866: ( p_rev_component_rec.to_end_item_unit_number = FND_API.G_MISS_CHAR OR
5867: p_rev_component_rec.to_end_item_unit_number IS NULL )
5868: THEN

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

5862: -- Modified condition by MK on 11/08/00
5863: IF p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE AND
5864: ( p_rev_component_rec.from_end_item_unit_number <> FND_API.G_MISS_CHAR OR
5865: p_rev_component_rec.from_end_item_unit_number IS NOT NULL ) AND
5866: ( p_rev_component_rec.to_end_item_unit_number = FND_API.G_MISS_CHAR OR
5867: p_rev_component_rec.to_end_item_unit_number IS NULL )
5868: THEN
5869: Error_Handler.Add_Error_Token
5870: ( p_Message_Name => 'BOM_CMP_TO_UNIT_NUM_NULL'

Line 5875: l_return_status := FND_API.G_RET_STS_ERROR;

5871: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5872: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5873: , p_Token_Tbl => g_Token_Tbl
5874: );
5875: l_return_status := FND_API.G_RET_STS_ERROR;
5876: END IF;
5877: */
5878:
5879: -- Validations specific to EAM items (Asset Groups and Asset Activities)

Line 5897: l_return_status := FND_API.G_RET_STS_ERROR;

5893: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5894: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5895: , p_Token_Tbl => g_Token_Tbl
5896: );
5897: l_return_status := FND_API.G_RET_STS_ERROR;
5898: END IF;
5899: END LOOP;
5900:
5901: -- Validate the from_end_item_unit_number

Line 5918: l_return_status := FND_API.G_RET_STS_ERROR;

5914: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5915: , p_Token_Tbl => g_Token_Tbl
5916: , p_message_text => l_err_text
5917: );
5918: l_return_status := FND_API.G_RET_STS_ERROR;
5919: END IF;
5920:
5921: -- Validate the to_end_item_unit_number
5922:

Line 5924: p_rev_component_rec.to_end_item_unit_number <> FND_API.G_MISS_CHAR

5920:
5921: -- Validate the to_end_item_unit_number
5922:
5923: IF p_rev_component_rec.to_end_item_unit_number IS NOT NULL AND
5924: p_rev_component_rec.to_end_item_unit_number <> FND_API.G_MISS_CHAR
5925: THEN
5926:
5927: IF NOT Bom_Validate.Asset_Group_Serial_Number
5928: ( p_assembly_item_id => l_assembly_item_id,

Line 5942: l_return_status := FND_API.G_RET_STS_ERROR;

5938: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5939: , p_Token_Tbl => g_Token_Tbl
5940: , p_message_text => l_err_text
5941: );
5942: l_return_status := FND_API.G_RET_STS_ERROR;
5943: END IF;
5944: END IF;
5945:
5946: -- An asset group or activity cannnot be a component of another asset group

Line 5965: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 5985: l_return_status := FND_API.G_RET_STS_ERROR;

5981: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5982: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5983: , p_Token_Tbl => g_Token_Tbl
5984: );
5985: l_return_status := FND_API.G_RET_STS_ERROR;
5986: END IF;
5987:
5988: -- An asset group cannnot be a component for an asset activity
5989:

Line 6003: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 6027: l_return_status := FND_API.G_RET_STS_ERROR;

6023: , p_Token_Tbl => g_Token_Tbl
6024: );
6025: g_token_tbl.delete(2);
6026: END IF;
6027: l_return_status := FND_API.G_RET_STS_ERROR;
6028:
6029: ELSIF p_rev_component_rec.wip_supply_type IS NOT NULL AND
6030: p_rev_component_rec.wip_supply_type <> 7 AND
6031: NOT Bom_Validate.Wip_Supply_Type

Line 6053: l_return_status := FND_API.G_RET_STS_ERROR;

6049: g_token_tbl(1).token_value :=
6050: p_rev_component_rec.component_item_name;
6051:
6052: END IF;
6053: l_return_status := FND_API.G_RET_STS_ERROR;
6054: END IF;
6055:
6056: IF p_rev_component_rec.operation_sequence_number IS NOT NULL AND
6057: p_rev_component_rec.operation_sequence_number <= 0

Line 6068: l_return_status := FND_API.G_RET_STS_ERROR;

6064: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6065: , p_Token_Tbl => g_Token_Tbl
6066: );
6067: END IF;
6068: l_return_status := FND_API.G_RET_STS_ERROR;
6069: END IF;
6070:
6071: -- dbms_output.put_line('After Operation Sequence Num . . . ' || l_return_status);
6072:

Line 6089: l_return_status := FND_API.G_RET_STS_ERROR;

6085: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6086: , p_token_tbl => g_Token_Tbl
6087: );
6088: END IF;
6089: l_return_status := FND_API.G_RET_STS_ERROR;
6090: END IF;
6091:
6092: IF p_rev_component_rec.projected_yield IS NOT NULL AND
6093: p_rev_component_rec.projected_yield < 0 OR

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

6104: , p_token_tbl => g_token_tbl
6105: , p_message_type => 'W' -- Bug 3226917
6106: );
6107: END IF;
6108: --l_return_status := FND_API.G_RET_STS_ERROR;
6109: END IF;
6110:
6111: IF p_rev_component_rec.include_in_cost_rollup IS NOT NULL AND
6112: p_rev_component_rec.include_in_cost_rollup NOT IN (1,2)

Line 6123: l_return_status := FND_API.G_RET_STS_ERROR;

6119: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6120: , p_Token_Tbl => g_Token_Tbl
6121: );
6122: END IF;
6123: l_return_status := FND_API.G_RET_STS_ERROR;
6124: END IF;
6125:
6126: IF p_rev_component_rec.SO_Basis IS NOT NULL AND
6127: p_rev_component_rec.SO_Basis NOT IN (1, 2)

Line 6138: l_return_status := FND_API.G_RET_STS_ERROR;

6134: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6135: , p_Token_Tbl => g_Token_Tbl
6136: );
6137: END IF;
6138: l_return_status := FND_API.G_RET_STS_ERROR;
6139: END IF;
6140:
6141: IF p_rev_component_rec.optional IS NOT NULL AND
6142: p_rev_component_rec.optional NOT IN (1, 2)

Line 6153: l_return_status := FND_API.G_RET_STS_ERROR;

6149: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6150: , p_Token_Tbl => g_Token_Tbl
6151: );
6152: END IF;
6153: l_return_status := FND_API.G_RET_STS_ERROR;
6154: END IF;
6155:
6156: IF p_rev_component_rec.mutually_exclusive IS NOT NULL AND
6157: p_rev_component_rec.mutually_exclusive NOT IN (1, 2)

Line 6168: l_return_status := FND_API.G_RET_STS_ERROR;

6164: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6165: , p_Token_Tbl => g_Token_Tbl
6166: );
6167: END IF;
6168: l_return_status := FND_API.G_RET_STS_ERROR;
6169: END IF;
6170:
6171: IF p_rev_component_rec.check_atp IS NOT NULL AND
6172: p_rev_component_rec.check_atp NOT IN (1, 2)

Line 6183: l_return_status := FND_API.G_RET_STS_ERROR;

6179: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6180: , p_Token_Tbl => g_Token_Tbl
6181: );
6182: END IF;
6183: l_return_status := FND_API.G_RET_STS_ERROR;
6184: END IF;
6185:
6186: IF p_rev_component_rec.shipping_allowed IS NOT NULL AND
6187: p_rev_component_rec.shipping_allowed NOT IN (1, 2)

Line 6198: l_return_status := FND_API.G_RET_STS_ERROR;

6194: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6195: , p_Token_Tbl => g_Token_Tbl
6196: );
6197: END IF;
6198: l_return_status := FND_API.G_RET_STS_ERROR;
6199: END IF;
6200:
6201: IF p_rev_component_rec.required_to_ship IS NOT NULL AND
6202: p_rev_component_rec.required_to_ship NOT IN (1, 2)

Line 6213: l_return_status := FND_API.G_RET_STS_ERROR;

6209: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6210: , p_Token_Tbl => g_Token_Tbl
6211: );
6212: END IF;
6213: l_return_status := FND_API.G_RET_STS_ERROR;
6214: END IF;
6215:
6216: IF p_rev_component_rec.required_for_revenue IS NOT NULL AND
6217: p_rev_component_rec.required_for_revenue NOT IN (1, 2)

Line 6228: l_return_status := FND_API.G_RET_STS_ERROR;

6224: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6225: , p_Token_Tbl => g_Token_Tbl
6226: );
6227: END IF;
6228: l_return_status := FND_API.G_RET_STS_ERROR;
6229: END IF;
6230:
6231: IF p_rev_component_rec.include_on_ship_docs IS NOT NULL AND
6232: p_rev_component_rec.include_on_ship_docs NOT IN (1, 2)

Line 6243: l_return_status := FND_API.G_RET_STS_ERROR;

6239: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6240: , p_Token_Tbl => g_Token_Tbl
6241: );
6242: END IF;
6243: l_return_status := FND_API.G_RET_STS_ERROR;
6244: END IF;
6245:
6246: IF p_rev_component_rec.quantity_related IS NOT NULL AND
6247: p_rev_component_rec.quantity_related NOT IN (1, 2)

Line 6258: l_return_status := FND_API.G_RET_STS_ERROR;

6254: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6255: , p_Token_Tbl => g_Token_Tbl
6256: );
6257: END IF;
6258: l_return_status := FND_API.G_RET_STS_ERROR;
6259: END IF;
6260:
6261: -- Validation specific to unimplemented BOM
6262: Error_handler.write_debug ('BOM Implementation date is '||p_rev_comp_unexp_rec.bom_implementation_date);

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

6265: /* added a dummy condition to make sure this validation happens for any BOM, no matter whether the BOM is fluid or not */
6266: OR 1=1
6267: THEN
6268: IF p_rev_component_rec.new_effectivity_date IS NOT NULL AND
6269: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND
6270: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
6271: THEN
6272: /* Check revision exists for revised item */
6273: IF NOT Item_Revision_Exists(p_rev_comp_unexp_rec.revised_item_id,

Line 6290: l_return_status := FND_API.G_RET_STS_ERROR;

6286: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6287: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6288: , p_Token_Tbl => g_Token_Tbl
6289: );
6290: l_return_status := FND_API.G_RET_STS_ERROR;
6291: END IF;
6292:
6293: /* Check revision exists for component item */
6294:

Line 6312: l_return_status := FND_API.G_RET_STS_ERROR;

6308: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6309: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6310: , p_Token_Tbl => g_Token_Tbl
6311: );
6312: l_return_status := FND_API.G_RET_STS_ERROR;
6313: END IF;
6314: END IF;
6315:
6316: ELSE

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

6320: Null;
6321:
6322: /* commented for bug 3281414
6323: IF p_rev_component_rec.new_effectivity_date IS NOT NULL AND
6324: p_rev_component_rec.new_effectivity_date <> FND_API.G_MISS_DATE AND
6325: p_rev_component_rec.new_effectivity_date < SYSDATE AND
6326: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
6327: THEN
6328: g_token_tbl(1).token_name := 'COMPONENT_ITEM_NAME';

Line 6341: l_return_status := FND_API.G_RET_STS_ERROR;

6337: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6338: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6339: , p_Token_Tbl => g_Token_Tbl
6340: );
6341: l_return_status := FND_API.G_RET_STS_ERROR;
6342:
6343: END IF;
6344: */
6345: END IF;

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

6349: /* OR (p_rev_component_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE)*/
6350: --Commented for bug 5702625.
6351: THEN
6352: IF p_rev_component_rec.start_effective_date IS NOT NULL AND
6353: p_rev_component_rec.start_effective_date <> FND_API.G_MISS_DATE AND
6354: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
6355: THEN
6356: /* Check revision exists for revised item */
6357: Error_handler.write_debug ('Checking for item revision start date');

Line 6375: l_return_status := FND_API.G_RET_STS_ERROR;

6371: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6372: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6373: , p_Token_Tbl => g_Token_Tbl
6374: );
6375: l_return_status := FND_API.G_RET_STS_ERROR;
6376: END IF;
6377:
6378: /* Check revision exists for component item */
6379:

Line 6396: l_return_status := FND_API.G_RET_STS_ERROR;

6392: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6393: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6394: , p_Token_Tbl => g_Token_Tbl
6395: );
6396: l_return_status := FND_API.G_RET_STS_ERROR;
6397: END IF;
6398: END IF;
6399:
6400: ELSE

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

6406: Null;
6407:
6408: /*
6409: IF p_rev_component_rec.start_effective_date IS NOT NULL AND
6410: p_rev_component_rec.start_effective_date <> FND_API.G_MISS_DATE AND
6411: trunc(p_rev_component_rec.start_effective_date) < trunc(SYSDATE) AND
6412: Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO
6413: THEN
6414: g_token_tbl(1).token_name := 'COMPONENT_ITEM_NAME';

Line 6425: l_return_status := FND_API.G_RET_STS_ERROR;

6421: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6422: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6423: , p_Token_Tbl => g_Token_Tbl
6424: );
6425: l_return_status := FND_API.G_RET_STS_ERROR;
6426:
6427: END IF;
6428: */
6429:

Line 6454: l_return_status := FND_API.G_RET_STS_ERROR;

6450: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6451: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6452: , p_Token_Tbl => g_Token_Tbl
6453: );
6454: l_return_status := FND_API.G_RET_STS_ERROR;
6455: END;
6456:
6457: END IF;
6458:

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

6459: --Validation to ensure that a pending structure header cannot be modified without an ECO
6460: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking if the BOM header is implemented . . .'); END IF;
6461:
6462: IF BOM_GLOBALS.Get_Bill_Header_ECN(p_rev_comp_unexp_rec.bill_Sequence_id) IS NOT NULL
6463: AND (p_rev_component_rec.eco_name IS NULL OR p_rev_component_rec.eco_name = FND_API.G_MISS_CHAR)
6464: THEN
6465: g_token_tbl(1).token_name := 'ALTERNATE';
6466: g_token_tbl(1).token_value := nvl(p_rev_component_rec.Alternate_BOM_Code, bom_globals.retrieve_message('BOM', 'BOM_PRIMARY'));
6467: g_token_tbl(2).token_name := 'ASSY_ITEM';

Line 6478: l_return_status := FND_API.G_RET_STS_ERROR;

6474: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6475: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6476: , p_Token_Tbl => g_Token_Tbl
6477: );
6478: l_return_status := FND_API.G_RET_STS_ERROR;
6479:
6480: END IF;
6481:
6482: -- Done validating attributes

Line 6502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6498: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6499: , p_Mesg_Token_Tbl => l_Mesg_token_Tbl
6500: );
6501: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6502: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6503:
6504: END Check_Attributes;
6505:
6506:

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

6518: , p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
6519: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
6520: )
6521: IS
6522: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
6523: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
6524:
6525: BEGIN
6526:

Line 6564: l_return_status := FND_API.G_RET_STS_ERROR;

6560: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
6561: , p_Token_Tbl => g_Token_Tbl
6562: );
6563: END IF;
6564: l_return_status := FND_API.G_RET_STS_ERROR;
6565: EXCEPTION
6566: WHEN NO_DATA_FOUND THEN
6567: null; -- do nothing the record is valid.
6568: END;

Line 6576: WHEN FND_API.G_EXC_ERROR THEN

6572: x_return_status := l_return_status;
6573:
6574: EXCEPTION
6575:
6576: WHEN FND_API.G_EXC_ERROR THEN
6577:
6578: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6579: x_return_status := FND_API.G_RET_STS_ERROR;
6580:

Line 6579: x_return_status := FND_API.G_RET_STS_ERROR;

6575:
6576: WHEN FND_API.G_EXC_ERROR THEN
6577:
6578: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6579: x_return_status := FND_API.G_RET_STS_ERROR;
6580:
6581: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6582: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 6581: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6577:
6578: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6579: x_return_status := FND_API.G_RET_STS_ERROR;
6580:
6581: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6582: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6584:
6585: WHEN OTHERS THEN

Line 6583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6579: x_return_status := FND_API.G_RET_STS_ERROR;
6580:
6581: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6582: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6584:
6585: WHEN OTHERS THEN
6586: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 6587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6584:
6585: WHEN OTHERS THEN
6586: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
6587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6588:
6589: END Check_Entity_Delete;
6590:
6591: /******************************************************************

Line 6653: l_return_status := FND_API.G_RET_STS_ERROR;

6649: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6650: , p_message_name => 'BOM_REV_COMP_ALREADY_EXISTS'
6651: , p_token_tbl => l_token_tbl
6652: );
6653: l_return_status := FND_API.G_RET_STS_ERROR;
6654: ELSIF l_return_status = BOM_Globals.G_RECORD_NOT_FOUND AND
6655: p_rev_component_rec.transaction_type IN
6656: (BOM_Globals.G_OPR_UPDATE, BOM_Globals.G_OPR_DELETE)
6657: THEN

Line 6664: l_return_status := FND_API.G_RET_STS_ERROR;

6660: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6661: , p_message_name => 'BOM_REV_COMP_DOESNOT_EXIST'
6662: , p_token_tbl => l_token_tbl
6663: );
6664: l_return_status := FND_API.G_RET_STS_ERROR;
6665: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
6666: THEN
6667: Error_Handler.Add_Error_Token
6668: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl

Line 6665: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR

6661: , p_message_name => 'BOM_REV_COMP_DOESNOT_EXIST'
6662: , p_token_tbl => l_token_tbl
6663: );
6664: l_return_status := FND_API.G_RET_STS_ERROR;
6665: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
6666: THEN
6667: Error_Handler.Add_Error_Token
6668: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
6669: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 6691: l_return_status := FND_API.G_RET_STS_SUCCESS;

6687: x_old_rev_component_rec.transaction_type :=
6688: Bom_Globals.G_OPR_CREATE;
6689: END IF;
6690: END IF;
6691: l_return_status := FND_API.G_RET_STS_SUCCESS;
6692:
6693: END IF;
6694:
6695: x_return_status := l_return_status;

Line 6731: l_return_status := FND_API.G_RET_STS_SUCCESS;

6727: l_return_status VARCHAR2(1);
6728: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
6729:
6730: BEGIN
6731: l_return_status := FND_API.G_RET_STS_SUCCESS;
6732:
6733: /*************************************************************
6734: --
6735: -- In case of an update, based on the revised item information

Line 6770: FND_API.G_RET_STS_ERROR;

6766: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6767: , p_Token_Tbl => l_Token_Tbl
6768: );
6769: l_return_status :=
6770: FND_API.G_RET_STS_ERROR;
6771: END IF;
6772: END LOOP;
6773: END IF;
6774:

Line 6856: l_return_status := FND_API.G_RET_STS_SUCCESS;

6852: AND organization_id = p_organization_id;
6853:
6854:
6855: BEGIN
6856: l_return_status := FND_API.G_RET_STS_SUCCESS;
6857:
6858: /**********************************************************
6859: --
6860: -- Check if the user has access to the revised component's

Line 6903: l_return_status := FND_API.G_RET_STS_ERROR;

6899: , x_Mesg_Token_Tbl => l_mesg_token_tbl
6900: , p_Token_Tbl => l_token_tbl
6901: );
6902: l_token_tbl.DELETE(2);
6903: l_return_status := FND_API.G_RET_STS_ERROR;
6904: END IF;
6905:
6906: IF l_rev_comp_item_type = 5 /* Product Family */
6907: THEN

Line 6914: l_return_status := FND_API.G_RET_STS_ERROR;

6910: , p_Mesg_Token_Tbl => l_mesg_token_tbl
6911: , x_Mesg_Token_Tbl => l_mesg_token_tbl
6912: , p_Token_Tbl => l_token_tbl
6913: );
6914: l_return_status := FND_API.G_RET_STS_ERROR;
6915: END IF;
6916:
6917: /****************************************************************
6918: --

Line 6940: l_return_status := FND_API.G_RET_STS_ERROR;

6936: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6937: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
6938: , p_Token_Tbl => l_token_tbl
6939: );
6940: l_return_status := FND_API.G_RET_STS_ERROR;
6941: END LOOP;
6942: END IF;
6943:
6944: /*********************************************************************

Line 6966: l_return_status := FND_API.G_RET_STS_ERROR;

6962: , p_Mesg_Token_Tbl => l_mesg_token_tbl
6963: , x_Mesg_Token_Tbl => l_mesg_token_tbl
6964: , p_Token_Tbl => l_token_tbl
6965: );
6966: l_return_status := FND_API.G_RET_STS_ERROR;
6967: END IF;
6968: ELSE
6969: IF NOT BOM_Globals.Get_Unit_Controlled_Item AND
6970: BOM_Globals.Get_Unit_Controlled_Component

Line 6984: l_return_status := FND_API.G_RET_STS_ERROR;

6980: , p_Mesg_Token_Tbl => l_mesg_token_tbl
6981: , x_Mesg_Token_Tbl => l_mesg_token_tbl
6982: , p_Token_Tbl => l_token_tbl
6983: );
6984: l_return_status := FND_API.G_RET_STS_ERROR;
6985: END IF;
6986: END IF;
6987:
6988:

Line 7025: l_return_status := FND_API.G_RET_STS_ERROR;

7021: , p_Token_Tbl => l_Token_Tbl
7022: );
7023:
7024: END IF;
7025: l_return_status := FND_API.G_RET_STS_ERROR;
7026: END IF;
7027: **************************************************************/
7028:
7029:

Line 7058: l_return_status := FND_API.G_RET_STS_ERROR;

7054:
7055: l_token_tbl(2).token_name := 'REVISED_COMPONENT_NAME';
7056: l_token_tbl(2).token_value := p_component_name;
7057:
7058: l_return_status := FND_API.G_RET_STS_ERROR;
7059:
7060: Error_Handler.Add_Error_Token
7061: ( p_Message_Name => l_error_name
7062: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 7098: l_return_status := FND_API.G_RET_STS_SUCCESS;

7094: l_Token_Tbl Error_Handler.Token_Tbl_Type;
7095: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
7096: l_return_status VARCHAR2(1);
7097: BEGIN
7098: l_return_status := FND_API.G_RET_STS_SUCCESS;
7099: IF BOM_EAMUTIL.Direct_Item ( item_id => p_bom_comp_unexp_rec.Component_Item_Id,
7100: org_id => p_bom_comp_unexp_rec.Organization_Id ) = 'N' THEN
7101: IF (p_bom_component_rec.Suggested_Vendor_Name IS NOT NULL
7102: OR p_bom_component_rec.Suggested_Vendor_Name <> FND_API.G_MISS_CHAR)

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

7098: l_return_status := FND_API.G_RET_STS_SUCCESS;
7099: IF BOM_EAMUTIL.Direct_Item ( item_id => p_bom_comp_unexp_rec.Component_Item_Id,
7100: org_id => p_bom_comp_unexp_rec.Organization_Id ) = 'N' THEN
7101: IF (p_bom_component_rec.Suggested_Vendor_Name IS NOT NULL
7102: OR p_bom_component_rec.Suggested_Vendor_Name <> FND_API.G_MISS_CHAR)
7103: THEN
7104: x_bom_component_rec.Suggested_Vendor_Name := '';
7105: -- x_bom_component_rec.Vendor_Id := '';
7106: Error_Handler.Add_Error_Token

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

7110: , p_Token_Tbl => l_token_tbl
7111: );
7112: END IF;
7113: IF (p_bom_component_rec.Unit_Price IS NOT NULL
7114: OR p_bom_component_rec.Unit_Price <> FND_API.G_MISS_NUM)
7115: THEN
7116: x_bom_component_rec.Unit_Price := '';
7117: Error_Handler.Add_Error_Token
7118: ( p_Message_Name => 'BOM_COMP_PRICE_IGNORED'

Line 7131: l_return_status := FND_API.G_RET_STS_ERROR;

7127: org_id => p_bom_comp_unexp_rec.Organization_Id ) = 'N'
7128: AND BOM_EAMUTIL.Asset_Activity_Item ( item_id => p_bom_comp_unexp_rec.Assembly_Item_Id,
7129: org_id => p_bom_comp_unexp_rec.Organization_Id ) = 'N'
7130: THEN
7131: l_return_status := FND_API.G_RET_STS_ERROR;
7132: END IF;
7133: */
7134: END IF;
7135: -- l_bom_component_rec := x_bom_component_rec;

Line 7266: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

7262: ELSE
7263: Bom_Globals.Set_Unit_Effectivity (FALSE);
7264: END IF;
7265:
7266: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
7267: THEN
7268: RAISE EXC_ERR_PVT_API_MAIN;
7269: END IF;
7270: