70: l_trans_status := 'ERROR';
71: END IF;
72:
73: -- Get message that will be send to SEND_ACKN :
74: FND_MESSAGE.SET_NAME('ENG', 'BOM_ERES_ACKN_BILL');
75: l_ackn_by := FND_MESSAGE.GET;
76:
77: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Acknowledging eRecord_id='||l_erecord_id||' with status='||l_trans_status);
78: QA_EDR_STANDARD.SEND_ACKN
71: END IF;
72:
73: -- Get message that will be send to SEND_ACKN :
74: FND_MESSAGE.SET_NAME('ENG', 'BOM_ERES_ACKN_BILL');
75: l_ackn_by := FND_MESSAGE.GET;
76:
77: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Acknowledging eRecord_id='||l_erecord_id||' with status='||l_trans_status);
78: QA_EDR_STANDARD.SEND_ACKN
79: ( p_api_version => 1.0
600: END LOOP ;
601: END IF ;
602: END IF;
603: ELSE
604: FND_MESSAGE.SET_NAME('BOM','BOM_BILL_EXISTS');
605: FND_MESSAGE.SET_TOKEN('ORG_CODE',t_org_code_list(I));
606: msg := FND_MESSAGE.GET ;
607: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
608: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Bill already exists for organization '||t_org_code_list(I)) ;
601: END IF ;
602: END IF;
603: ELSE
604: FND_MESSAGE.SET_NAME('BOM','BOM_BILL_EXISTS');
605: FND_MESSAGE.SET_TOKEN('ORG_CODE',t_org_code_list(I));
606: msg := FND_MESSAGE.GET ;
607: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
608: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Bill already exists for organization '||t_org_code_list(I)) ;
609: END IF ;
602: END IF;
603: ELSE
604: FND_MESSAGE.SET_NAME('BOM','BOM_BILL_EXISTS');
605: FND_MESSAGE.SET_TOKEN('ORG_CODE',t_org_code_list(I));
606: msg := FND_MESSAGE.GET ;
607: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
608: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Bill already exists for organization '||t_org_code_list(I)) ;
609: END IF ;
610: ELSE
607: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
608: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Bill already exists for organization '||t_org_code_list(I)) ;
609: END IF ;
610: ELSE
611: FND_MESSAGE.SET_NAME('BOM','BOM_INVALID_ASSEMBLY');
612: FND_MESSAGE.SET_TOKEN('ASSEMBLY_NAME',l_assy_item_name);
613: FND_MESSAGE.SET_TOKEN('ORG_CODE',t_org_code_list(I));
614: msg := FND_MESSAGE.GET ;
615: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
608: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Bill already exists for organization '||t_org_code_list(I)) ;
609: END IF ;
610: ELSE
611: FND_MESSAGE.SET_NAME('BOM','BOM_INVALID_ASSEMBLY');
612: FND_MESSAGE.SET_TOKEN('ASSEMBLY_NAME',l_assy_item_name);
613: FND_MESSAGE.SET_TOKEN('ORG_CODE',t_org_code_list(I));
614: msg := FND_MESSAGE.GET ;
615: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
616: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Assembly item'||l_assy_item_name||'does not exists in organization'||t_org_code_list(I)) ;
609: END IF ;
610: ELSE
611: FND_MESSAGE.SET_NAME('BOM','BOM_INVALID_ASSEMBLY');
612: FND_MESSAGE.SET_TOKEN('ASSEMBLY_NAME',l_assy_item_name);
613: FND_MESSAGE.SET_TOKEN('ORG_CODE',t_org_code_list(I));
614: msg := FND_MESSAGE.GET ;
615: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
616: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Assembly item'||l_assy_item_name||'does not exists in organization'||t_org_code_list(I)) ;
617: END IF ;
610: ELSE
611: FND_MESSAGE.SET_NAME('BOM','BOM_INVALID_ASSEMBLY');
612: FND_MESSAGE.SET_TOKEN('ASSEMBLY_NAME',l_assy_item_name);
613: FND_MESSAGE.SET_TOKEN('ORG_CODE',t_org_code_list(I));
614: msg := FND_MESSAGE.GET ;
615: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
616: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Assembly item'||l_assy_item_name||'does not exists in organization'||t_org_code_list(I)) ;
617: END IF ;
618: END LOOP ;
616: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Assembly item'||l_assy_item_name||'does not exists in organization'||t_org_code_list(I)) ;
617: END IF ;
618: END LOOP ;
619:
620: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
621: FND_MESSAGE.SET_TOKEN('ENTITY1','SUCCEDED');
622: FND_MESSAGE.SET_TOKEN('ENTITY2',success_counter);
623: msg := FND_MESSAGE.GET ;
624: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
617: END IF ;
618: END LOOP ;
619:
620: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
621: FND_MESSAGE.SET_TOKEN('ENTITY1','SUCCEDED');
622: FND_MESSAGE.SET_TOKEN('ENTITY2',success_counter);
623: msg := FND_MESSAGE.GET ;
624: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
625:
618: END LOOP ;
619:
620: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
621: FND_MESSAGE.SET_TOKEN('ENTITY1','SUCCEDED');
622: FND_MESSAGE.SET_TOKEN('ENTITY2',success_counter);
623: msg := FND_MESSAGE.GET ;
624: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
625:
626: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
619:
620: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
621: FND_MESSAGE.SET_TOKEN('ENTITY1','SUCCEDED');
622: FND_MESSAGE.SET_TOKEN('ENTITY2',success_counter);
623: msg := FND_MESSAGE.GET ;
624: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
625:
626: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
627: FND_MESSAGE.SET_TOKEN('ENTITY1','FAILED');
622: FND_MESSAGE.SET_TOKEN('ENTITY2',success_counter);
623: msg := FND_MESSAGE.GET ;
624: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
625:
626: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
627: FND_MESSAGE.SET_TOKEN('ENTITY1','FAILED');
628: FND_MESSAGE.SET_TOKEN('ENTITY2',failure_counter);
629: msg := FND_MESSAGE.GET ;
630: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
623: msg := FND_MESSAGE.GET ;
624: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
625:
626: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
627: FND_MESSAGE.SET_TOKEN('ENTITY1','FAILED');
628: FND_MESSAGE.SET_TOKEN('ENTITY2',failure_counter);
629: msg := FND_MESSAGE.GET ;
630: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
631:
624: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
625:
626: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
627: FND_MESSAGE.SET_TOKEN('ENTITY1','FAILED');
628: FND_MESSAGE.SET_TOKEN('ENTITY2',failure_counter);
629: msg := FND_MESSAGE.GET ;
630: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
631:
632: /*
625:
626: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_SUMMARY');
627: FND_MESSAGE.SET_TOKEN('ENTITY1','FAILED');
628: FND_MESSAGE.SET_TOKEN('ENTITY2',failure_counter);
629: msg := FND_MESSAGE.GET ;
630: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
631:
632: /*
633: FND_FILE.PUT_LINE(FND_FILE.LOG,'*************SUMMARY***************') ;
645: END IF ;
646:
647: EXCEPTION
648: WHEN Hierarchy_not_specified THEN
649: FND_MESSAGE.SET_NAME('BOM','BOM_HIERARCHY_MISSING');
650: msg := FND_MESSAGE.GET ;
651: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
652: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Hierarchy Name must be specified') ;
653: RETCODE := 2;
646:
647: EXCEPTION
648: WHEN Hierarchy_not_specified THEN
649: FND_MESSAGE.SET_NAME('BOM','BOM_HIERARCHY_MISSING');
650: msg := FND_MESSAGE.GET ;
651: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
652: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Hierarchy Name must be specified') ;
653: RETCODE := 2;
654: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',Current_Error_Code);
653: RETCODE := 2;
654: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',Current_Error_Code);
655:
656: WHEN invalid_common_itemorg_to THEN
657: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_ITEM_ORG_INVALID');
658: msg := FND_MESSAGE.GET ;
659: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
660: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Either common item to or common org to is not specified') ;
661: RETCODE := 2;
654: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',Current_Error_Code);
655:
656: WHEN invalid_common_itemorg_to THEN
657: FND_MESSAGE.SET_NAME('BOM','BOM_COMMON_ITEM_ORG_INVALID');
658: msg := FND_MESSAGE.GET ;
659: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
660: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Either common item to or common org to is not specified') ;
661: RETCODE := 2;
662: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',Current_Error_Code);
661: RETCODE := 2;
662: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',Current_Error_Code);
663:
664: WHEN same_common_itemorg_to THEN
665: FND_MESSAGE.SET_NAME('BOM','BOM_TO_ORG_ITEM_SAME');
666: msg := FND_MESSAGE.GET ;
667: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
668: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'For Single Organization Scope, both TO org and item cannot be same as From org and item') ;
669: RETCODE := 2;
662: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',Current_Error_Code);
663:
664: WHEN same_common_itemorg_to THEN
665: FND_MESSAGE.SET_NAME('BOM','BOM_TO_ORG_ITEM_SAME');
666: msg := FND_MESSAGE.GET ;
667: FND_FILE.PUT_LINE(FND_FILE.LOG,msg) ;
668: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'For Single Organization Scope, both TO org and item cannot be same as From org and item') ;
669: RETCODE := 2;
670: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',Current_Error_Code);
872: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
873: , x_Mesg_Token_Tbl => l_mesg_token_tbl
874: , p_Token_Tbl => l_token_table
875: );
876: fnd_message.set_name('BOM', 'BOM_EDIT_COMM_INVALID_EFF');
877: FND_FILE.PUT_LINE(FND_FILE.LOG, FND_MESSAGE.GET);
878: /*Error_Handler.Log_Error
879: (p_error_status => FND_API.G_RET_STS_ERROR
880: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
873: , x_Mesg_Token_Tbl => l_mesg_token_tbl
874: , p_Token_Tbl => l_token_table
875: );
876: fnd_message.set_name('BOM', 'BOM_EDIT_COMM_INVALID_EFF');
877: FND_FILE.PUT_LINE(FND_FILE.LOG, FND_MESSAGE.GET);
878: /*Error_Handler.Log_Error
879: (p_error_status => FND_API.G_RET_STS_ERROR
880: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
881: , p_error_scope => Error_Handler.G_SCOPE_RECORD
886: , x_bom_ref_Designator_tbl => Bom_Bo_Pub.G_MISS_BOM_REF_DESIGNATOR_TBL
887: , x_bom_sub_component_tbl => Bom_Bo_Pub.G_MISS_BOM_SUB_COMPONENT_TBL
888: );*/
889: --arudresh_debug('added error token');
890: fnd_message.set_name('BOM', 'BOM_EDIT_COMM_INVALID_EFF');
891: return;
892: END IF;
893:
894: Validate_Operation_Sequence_Id(p_src_bill_sequence_id => p_src_bill_sequence_id
897: , p_alt_desg => l_alt_bom_desg
898: , x_Return_Status => x_Return_Status);
899: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS
900: THEN
901: fnd_message.set_name('BOM', 'BOM_COMM_OP_SEQ_INVALID');
902: return;
903: END IF;
904:
905: -- FORALL comp_rec in get_source_components(p_src_bill_sequence_id)
1204: );
1205: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1206: END IF;
1207: --arudresh_debug('Error in replicate component'||SQLERRM);
1208: fnd_message.set_name('BOM', 'BOM_REPLICATE_FAILED');
1209: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1210:
1211: END Replicate_Components;
1212:
1326: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1327: , p_Token_Tbl => l_token_tbl
1328: );
1329: x_Return_Status := FND_API.G_RET_STS_ERROR;
1330: fnd_message.set_name('BOM', 'BOM_FIXED_REV_NOT_ALLOWED');
1331: RETURN;
1332:
1333: END IF;
1334:
1341: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1342: , p_Token_Tbl => l_token_tbl
1343: );
1344: x_Return_Status := FND_API.G_RET_STS_ERROR;
1345: fnd_message.set_name('BOM', 'BOM_COMMON_OP_SEQ_INVALID');
1346: RETURN;
1347: END IF;
1348:
1349: for bill_rec in get_related_bills(p_src_bill_seq_id)
1629: , x_Mesg_Token_Tbl => l_mesg_token_tbl
1630: , p_Token_Tbl => l_token_tbl
1631: );
1632:
1633: fnd_message.set_name('BOM', 'BOM_COMMON_OVERLAP');
1634: fnd_message.set_token('COMP_NAME', l_comp_name);
1635: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1636: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1637:
1630: , p_Token_Tbl => l_token_tbl
1631: );
1632:
1633: fnd_message.set_name('BOM', 'BOM_COMMON_OVERLAP');
1634: fnd_message.set_token('COMP_NAME', l_comp_name);
1635: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1636: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1637:
1638: Return;
1631: );
1632:
1633: fnd_message.set_name('BOM', 'BOM_COMMON_OVERLAP');
1634: fnd_message.set_token('COMP_NAME', l_comp_name);
1635: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1636: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1637:
1638: Return;
1639: END IF;
1632:
1633: fnd_message.set_name('BOM', 'BOM_COMMON_OVERLAP');
1634: fnd_message.set_token('COMP_NAME', l_comp_name);
1635: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1636: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1637:
1638: Return;
1639: END IF;
1640:
1682: , x_Mesg_Token_Tbl => l_mesg_token_tbl
1683: , p_Token_Tbl => l_token_tbl
1684: );
1685:
1686: fnd_message.set_name('BOM', 'BOM_COMM_SUPPLY_BASIS_CONFLICT');
1687: fnd_message.set_token('COMP_NAME', l_comp_name);
1688: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1689: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1690:
1683: , p_Token_Tbl => l_token_tbl
1684: );
1685:
1686: fnd_message.set_name('BOM', 'BOM_COMM_SUPPLY_BASIS_CONFLICT');
1687: fnd_message.set_token('COMP_NAME', l_comp_name);
1688: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1689: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1690:
1691: Return;
1684: );
1685:
1686: fnd_message.set_name('BOM', 'BOM_COMM_SUPPLY_BASIS_CONFLICT');
1687: fnd_message.set_token('COMP_NAME', l_comp_name);
1688: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1689: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1690:
1691: Return;
1692:
1685:
1686: fnd_message.set_name('BOM', 'BOM_COMM_SUPPLY_BASIS_CONFLICT');
1687: fnd_message.set_token('COMP_NAME', l_comp_name);
1688: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1689: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1690:
1691: Return;
1692:
1693: EXCEPTION
1721: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1722: );
1723: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1724: END IF; --IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1725: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
1726: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1727:
1728: END Insert_Related_Components;
1729:
1842: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1843: , p_Token_Tbl => l_token_tbl
1844: );
1845: x_Return_Status := FND_API.G_RET_STS_ERROR;
1846: fnd_message.set_name('BOM', 'BOM_FIXED_REV_NOT_ALLOWED');
1847: fnd_message.set_token('COMP_NAME', l_comp_name, true);
1848: RETURN;
1849:
1850: END IF;
1843: , p_Token_Tbl => l_token_tbl
1844: );
1845: x_Return_Status := FND_API.G_RET_STS_ERROR;
1846: fnd_message.set_name('BOM', 'BOM_FIXED_REV_NOT_ALLOWED');
1847: fnd_message.set_token('COMP_NAME', l_comp_name, true);
1848: RETURN;
1849:
1850: END IF;
1851:
1976: , x_Mesg_Token_Tbl => l_mesg_token_tbl
1977: , p_Token_Tbl => l_token_tbl
1978: );
1979:
1980: fnd_message.set_name('BOM', 'BOM_COMMON_OVERLAP');
1981: fnd_message.set_token('COMP_NAME', l_comp_name);
1982: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1983: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1984:
1977: , p_Token_Tbl => l_token_tbl
1978: );
1979:
1980: fnd_message.set_name('BOM', 'BOM_COMMON_OVERLAP');
1981: fnd_message.set_token('COMP_NAME', l_comp_name);
1982: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1983: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1984:
1985: Return;
1978: );
1979:
1980: fnd_message.set_name('BOM', 'BOM_COMMON_OVERLAP');
1981: fnd_message.set_token('COMP_NAME', l_comp_name);
1982: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1983: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1984:
1985: Return;
1986: END IF;
1979:
1980: fnd_message.set_name('BOM', 'BOM_COMMON_OVERLAP');
1981: fnd_message.set_token('COMP_NAME', l_comp_name);
1982: fnd_message.set_token('ORG_CODE', l_dest_org_code);
1983: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
1984:
1985: Return;
1986: END IF;
1987:
2040: , x_Mesg_Token_Tbl => l_mesg_token_tbl
2041: , p_Token_Tbl => l_token_tbl
2042: );
2043:
2044: fnd_message.set_name('BOM', 'BOM_COMM_SUPPLY_BASIS_CONFLICT');
2045: fnd_message.set_token('COMP_NAME', l_comp_name);
2046: fnd_message.set_token('ORG_CODE', l_dest_org_code);
2047: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
2048:
2041: , p_Token_Tbl => l_token_tbl
2042: );
2043:
2044: fnd_message.set_name('BOM', 'BOM_COMM_SUPPLY_BASIS_CONFLICT');
2045: fnd_message.set_token('COMP_NAME', l_comp_name);
2046: fnd_message.set_token('ORG_CODE', l_dest_org_code);
2047: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
2048:
2049: Return;
2042: );
2043:
2044: fnd_message.set_name('BOM', 'BOM_COMM_SUPPLY_BASIS_CONFLICT');
2045: fnd_message.set_token('COMP_NAME', l_comp_name);
2046: fnd_message.set_token('ORG_CODE', l_dest_org_code);
2047: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
2048:
2049: Return;
2050: EXCEPTION
2043:
2044: fnd_message.set_name('BOM', 'BOM_COMM_SUPPLY_BASIS_CONFLICT');
2045: fnd_message.set_token('COMP_NAME', l_comp_name);
2046: fnd_message.set_token('ORG_CODE', l_dest_org_code);
2047: fnd_message.set_token('ASSY_NAME', l_dest_assy_item);
2048:
2049: Return;
2050: EXCEPTION
2051: WHEN NO_DATA_FOUND THEN
2089: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2090: );
2091: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
2092: END IF; --IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2093: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
2094: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
2095: END Update_Related_Components;
2096:
2097:
2231: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2232: );
2233: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
2234: END IF;
2235: fnd_message.set_name('BOM', 'BOM_REPLICATE_FAILED');
2236: --arudresh_debug('error in replicate ref desg'||SQLERRM);
2237: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
2238: END Replicate_Ref_Desg;
2239:
2389: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2390: );
2391: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
2392: END IF;
2393: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
2394: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
2395:
2396: END Insert_Related_Ref_Desg;
2397:
2505: to_char(SQLCODE)
2506: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2507: , x_Mesg_Token_Tbl => x_Mesg_Token_Tbl);
2508:
2509: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
2510: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
2511:
2512:
2513: END Update_Related_Ref_Desg;
2666: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2667: );
2668: END IF; --IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2669: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
2670: fnd_message.set_name('BOM', 'BOM_REPLICATE_FAILED');
2671: --arudresh_debug('error in replicate sub comp '||SQLERRM);
2672: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2673: END Replicate_Sub_Comp;
2674:
2827: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2828: );
2829: END IF; --IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2830: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
2831: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
2832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2833: END Insert_Related_Sub_Comp;
2834:
2835:
2943: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2944: );
2945: END IF; --IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2946: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
2947: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
2948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2949: END Update_Related_Sub_Comp;
2950:
2951: /*
3055: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3056: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3057: , p_Token_Tbl => l_Token_Tbl
3058: );
3059: fnd_message.set_name('BOM', 'BOM_COMMON_OP_SEQ_INVALID');
3060: x_return_status := FND_API.G_RET_STS_ERROR;
3061: Return;
3062: WHEN TOO_MANY_ROWS THEN
3063: --Means just that more than one comp opn is associated with the comp.
3150: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3151: );
3152: END IF; --IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3153: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3154: fnd_message.set_name('BOM', 'BOM_REPLICATE_FAILED');
3155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3156: END Replicate_Comp_Ops;
3157:
3158:
3290: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3291: );
3292: END IF; --IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3293: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3294: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
3295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3296: END Insert_Related_Comp_Ops;
3297:
3298:
3406: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3407: );
3408: END IF; --IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3409: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3410: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
3411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3412: END Update_Related_Comp_Ops;
3413:
3414: /*
3455: AND OPERATION_SEQ_NUM = p_operation_seq_num;
3456: x_return_status := FND_API.G_RET_STS_SUCCESS;
3457: EXCEPTION
3458: WHEN OTHERS THEN
3459: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
3460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3461: END;
3462:
3463:
3673: ,x_msg_data => l_msg_data
3674: );
3675: IF x_Return_Status <> FND_API.G_RET_STS_SUCCESS
3676: THEN
3677: fnd_message.set_name('BOM', 'BOM_REPLICATE_FAILED');
3678: return;
3679: END IF;
3680: end loop; --for comp in get_source_and_dest_components(p_bill_sequence_id => p_dest_bill_seq_id)
3681: END Replicate_Comp_User_Attrs;
3787: ,x_msg_data => l_msg_data
3788: );
3789: IF x_return_status <> FND_API.G_RET_STS_SUCCESS
3790: THEN
3791: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
3792: Return;
3793: END IF;
3794: /* IF l_attributes_row_table IS NOT NULL
3795: THEN
3831: ,x_msg_data => l_msg_data
3832: );
3833: IF x_return_status <> FND_API.G_RET_STS_SUCCESS
3834: THEN
3835: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
3836: Return;
3837: END IF;
3838: END LOOP;
3839: END;
3966: WHERE COMMON_COMPONENT_SEQUENCE_ID = p_src_comp_seq
3967: AND COMPONENT_REFERENCE_DESIGNATOR = p_ref_desg;
3968: EXCEPTION
3969: WHEN OTHERS THEN
3970: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
3971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3972: END;
3973:
3974: /*
3986: WHERE COMMON_COMPONENT_SEQUENCE_ID = p_src_comp_seq
3987: AND SUBSTITUTE_COMPONENT_ID = p_sub_comp_item_id;
3988: EXCEPTION
3989: WHEN OTHERS THEN
3990: fnd_message.set_name('BOM', 'BOM_PROPAGATE_FAILED');
3991: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3992: END;
3993:
3994: