406: * and a return satus of success or failure will be
407: * returned to the calling program.
408: *********************************************************************/
409: PROCEDURE BOM_Header_UUI_To_UI
410: ( p_bom_header_Rec IN Bom_Bo_Pub.Bom_Head_Rec_Type
411: , p_bom_header_unexp_Rec IN Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
412: , x_bom_header_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
413: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
414: , x_Return_Status IN OUT NOCOPY VARCHAR2
407: * returned to the calling program.
408: *********************************************************************/
409: PROCEDURE BOM_Header_UUI_To_UI
410: ( p_bom_header_Rec IN Bom_Bo_Pub.Bom_Head_Rec_Type
411: , p_bom_header_unexp_Rec IN Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
412: , x_bom_header_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
413: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
414: , x_Return_Status IN OUT NOCOPY VARCHAR2
415: )
408: *********************************************************************/
409: PROCEDURE BOM_Header_UUI_To_UI
410: ( p_bom_header_Rec IN Bom_Bo_Pub.Bom_Head_Rec_Type
411: , p_bom_header_unexp_Rec IN Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
412: , x_bom_header_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
413: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
414: , x_Return_Status IN OUT NOCOPY VARCHAR2
415: )
416: IS
414: , x_Return_Status IN OUT NOCOPY VARCHAR2
415: )
416: IS
417: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
418: l_bom_header_unexp_rec Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type;
419: l_return_status VARCHAR2(1);
420: l_err_text VARCHAR2(2000);
421:
422: CURSOR c_Check_Alternate( p_alt_designator VARCHAR2,
548: *********************************************************************/
549: PROCEDURE Bom_Header_VID
550: ( x_Return_Status IN OUT NOCOPY VARCHAR2
551: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
552: , p_bom_head_unexp_rec IN Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
553: , x_bom_head_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
554: , p_bom_header_Rec IN Bom_Bo_Pub.Bom_Head_Rec_Type
555: )
556: IS
549: PROCEDURE Bom_Header_VID
550: ( x_Return_Status IN OUT NOCOPY VARCHAR2
551: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
552: , p_bom_head_unexp_rec IN Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
553: , x_bom_head_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
554: , p_bom_header_Rec IN Bom_Bo_Pub.Bom_Head_Rec_Type
555: )
556: IS
557: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
550: ( x_Return_Status IN OUT NOCOPY VARCHAR2
551: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
552: , p_bom_head_unexp_rec IN Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
553: , x_bom_head_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
554: , p_bom_header_Rec IN Bom_Bo_Pub.Bom_Head_Rec_Type
555: )
556: IS
557: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
558: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
557: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
558: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
559: l_err_text VARCHAR2(2000);
560: l_Token_Tbl Error_Handler.Token_Tbl_Type;
561: l_bom_head_unexp_rec Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
562: := p_bom_head_unexp_rec;
563: l_src_bill_sequence_id NUMBER;
564:
565: BEGIN
752: * convert the user friendly values for the primary key
753: * of Revisions entity columns.
754: *******************************************************************/
755: PROCEDURE Bom_Revision_UUI_To_UI2
756: ( p_bom_revision_rec IN Bom_Bo_Pub.Bom_Revision_Rec_Type
757: , p_bom_rev_unexp_rec IN Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type
758: , x_bom_rev_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type
759: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
760: , x_return_status IN OUT NOCOPY VARCHAR2
753: * of Revisions entity columns.
754: *******************************************************************/
755: PROCEDURE Bom_Revision_UUI_To_UI2
756: ( p_bom_revision_rec IN Bom_Bo_Pub.Bom_Revision_Rec_Type
757: , p_bom_rev_unexp_rec IN Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type
758: , x_bom_rev_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type
759: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
760: , x_return_status IN OUT NOCOPY VARCHAR2
761: )
754: *******************************************************************/
755: PROCEDURE Bom_Revision_UUI_To_UI2
756: ( p_bom_revision_rec IN Bom_Bo_Pub.Bom_Revision_Rec_Type
757: , p_bom_rev_unexp_rec IN Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type
758: , x_bom_rev_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type
759: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
760: , x_return_status IN OUT NOCOPY VARCHAR2
761: )
762: IS
760: , x_return_status IN OUT NOCOPY VARCHAR2
761: )
762: IS
763: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
764: l_bom_rev_unexp_rec Bom_Bo_Pub.Bom_Rev_Unexposed_Rec_Type;
765: l_err_text VARCHAR2(2000);
766: BEGIN
767: x_bom_rev_unexp_rec := p_bom_rev_unexp_rec;
768: l_bom_rev_unexp_rec := p_bom_rev_unexp_rec;
1166: ********************************************************************/
1167: PROCEDURE Rev_Component_VID
1168: ( x_Return_Status IN OUT NOCOPY Varchar2
1169: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1170: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1171: , x_Rev_Comp_Unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1172: , p_Rev_Component_Rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1173: ) IS
1174: l_return_value NUMBER;
1167: PROCEDURE Rev_Component_VID
1168: ( x_Return_Status IN OUT NOCOPY Varchar2
1169: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1170: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1171: , x_Rev_Comp_Unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1172: , p_Rev_Component_Rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1173: ) IS
1174: l_return_value NUMBER;
1175: l_Return_Status VARCHAR2(1);
1168: ( x_Return_Status IN OUT NOCOPY Varchar2
1169: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1170: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1171: , x_Rev_Comp_Unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1172: , p_Rev_Component_Rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1173: ) IS
1174: l_return_value NUMBER;
1175: l_Return_Status VARCHAR2(1);
1176: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1174: l_return_value NUMBER;
1175: l_Return_Status VARCHAR2(1);
1176: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1177: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1178: l_Rev_Comp_Unexp_Rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
1179:
1180: BEGIN
1181: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
1182: l_Rev_Comp_Unexp_Rec := p_Rev_Comp_Unexp_Rec;
1409: * for all the revised component columns that form the
1410: * unique key for this entity.
1411: *********************************************************************/
1412: PROCEDURE Rev_Component_UUI_To_UI
1413: ( p_rev_component_Rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1414: , p_rev_comp_unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1415: , x_rev_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1416: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1417: , x_Return_Status IN OUT NOCOPY VARCHAR2
1410: * unique key for this entity.
1411: *********************************************************************/
1412: PROCEDURE Rev_Component_UUI_To_UI
1413: ( p_rev_component_Rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1414: , p_rev_comp_unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1415: , x_rev_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1416: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1417: , x_Return_Status IN OUT NOCOPY VARCHAR2
1418: )
1411: *********************************************************************/
1412: PROCEDURE Rev_Component_UUI_To_UI
1413: ( p_rev_component_Rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1414: , p_rev_comp_unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1415: , x_rev_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1416: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1417: , x_Return_Status IN OUT NOCOPY VARCHAR2
1418: )
1419: IS
1417: , x_Return_Status IN OUT NOCOPY VARCHAR2
1418: )
1419: IS
1420: l_err_text VARCHAR2(2000);
1421: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
1422: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1423: l_Return_status VARCHAR2(1);
1424: BEGIN
1425: l_rev_comp_unexp_rec := p_rev_comp_unexp_Rec;
1534: * This procedure will convert all those values which
1535: * will cause the siblings to error out.
1536: ********************************************************************/
1537: PROCEDURE Rev_Component_UUI_to_UI2
1538: ( p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1539: , p_rev_comp_unexp_rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1540: , x_rev_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1541: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1542: , x_other_message IN OUT NOCOPY VARCHAR2
1535: * will cause the siblings to error out.
1536: ********************************************************************/
1537: PROCEDURE Rev_Component_UUI_to_UI2
1538: ( p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1539: , p_rev_comp_unexp_rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1540: , x_rev_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1541: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1542: , x_other_message IN OUT NOCOPY VARCHAR2
1543: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
1536: ********************************************************************/
1537: PROCEDURE Rev_Component_UUI_to_UI2
1538: ( p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1539: , p_rev_comp_unexp_rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1540: , x_rev_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1541: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1542: , x_other_message IN OUT NOCOPY VARCHAR2
1543: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
1544: , x_Return_Status IN OUT NOCOPY VARCHAR2
1545: )
1546: IS
1547: l_return_status VARCHAR2(1);
1548: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
1549: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1550: := p_rev_comp_unexp_rec;
1551: l_err_text VARCHAR2(2000);
1552: BEGIN
1553:
1859: * the Substitute component columns that form the unique
1860: * key for this entity.
1861: ********************************************************************/
1862: PROCEDURE Sub_Component_UUI_To_UI
1863: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
1864: , p_sub_comp_unexp_rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
1865: , x_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
1866: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1867: , x_Return_Status IN OUT NOCOPY VARCHAR2
1860: * key for this entity.
1861: ********************************************************************/
1862: PROCEDURE Sub_Component_UUI_To_UI
1863: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
1864: , p_sub_comp_unexp_rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
1865: , x_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
1866: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1867: , x_Return_Status IN OUT NOCOPY VARCHAR2
1868: )
1861: ********************************************************************/
1862: PROCEDURE Sub_Component_UUI_To_UI
1863: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
1864: , p_sub_comp_unexp_rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
1865: , x_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
1866: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1867: , x_Return_Status IN OUT NOCOPY VARCHAR2
1868: )
1869: IS
1866: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1867: , x_Return_Status IN OUT NOCOPY VARCHAR2
1868: )
1869: IS
1870: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
1871: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1872: l_Err_Text VARCHAR2(2000);
1873: l_return_status VARCHAR2(1);
1874: l_token_tbl Error_Handler.Token_Tbl_Type;
2052: * the scope of the error when conversion in this procedure
2053: * fail and would then error all the siblings.
2054: ***************************************************************************/
2055: PROCEDURE Sub_Component_UUI_To_UI2
2056: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
2057: , p_sub_comp_unexp_rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
2058: , x_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
2059: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2060: , x_other_message IN OUT NOCOPY VARCHAR2
2053: * fail and would then error all the siblings.
2054: ***************************************************************************/
2055: PROCEDURE Sub_Component_UUI_To_UI2
2056: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
2057: , p_sub_comp_unexp_rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
2058: , x_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
2059: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2060: , x_other_message IN OUT NOCOPY VARCHAR2
2061: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
2054: ***************************************************************************/
2055: PROCEDURE Sub_Component_UUI_To_UI2
2056: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
2057: , p_sub_comp_unexp_rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
2058: , x_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
2059: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2060: , x_other_message IN OUT NOCOPY VARCHAR2
2061: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
2062: , x_Return_Status IN OUT NOCOPY VARCHAR2
2061: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
2062: , x_Return_Status IN OUT NOCOPY VARCHAR2
2063: )
2064: IS
2065: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
2066: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
2067: l_Err_Text VARCHAR2(2000);
2068: l_return_status VARCHAR2(1);
2069: l_dummy NUMBER;
2501: * Purpose : This procedure will convert user unique idx columns
2502: * into unique id columns.
2503: ********************************************************************/
2504: PROCEDURE Ref_Designator_UUI_To_UI
2505: ( p_ref_designator_rec IN Bom_Bo_Pub.Ref_Designator_Rec_Type
2506: , p_ref_desg_unexp_rec IN Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2507: , x_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2508: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2509: , x_Return_Status IN OUT NOCOPY VARCHAR2
2502: * into unique id columns.
2503: ********************************************************************/
2504: PROCEDURE Ref_Designator_UUI_To_UI
2505: ( p_ref_designator_rec IN Bom_Bo_Pub.Ref_Designator_Rec_Type
2506: , p_ref_desg_unexp_rec IN Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2507: , x_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2508: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2509: , x_Return_Status IN OUT NOCOPY VARCHAR2
2510: )
2503: ********************************************************************/
2504: PROCEDURE Ref_Designator_UUI_To_UI
2505: ( p_ref_designator_rec IN Bom_Bo_Pub.Ref_Designator_Rec_Type
2506: , p_ref_desg_unexp_rec IN Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2507: , x_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2508: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2509: , x_Return_Status IN OUT NOCOPY VARCHAR2
2510: )
2511: IS
2508: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2509: , x_Return_Status IN OUT NOCOPY VARCHAR2
2510: )
2511: IS
2512: l_ref_desg_unexp_rec Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type;
2513: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
2514: l_Err_Text VARCHAR2(2000);
2515: l_Return_Status VARCHAR2(1);
2516: l_token_tbl Error_Handler.Token_Tbl_Type;
2656: * program can decide on the scope of the error if the
2657: * conversion in this procedure fails.
2658: ******************************************************************/
2659: PROCEDURE Ref_Designator_UUI_To_UI2
2660: ( p_ref_designator_rec IN Bom_Bo_Pub.Ref_Designator_Rec_Type
2661: , p_ref_desg_unexp_rec IN Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2662: , x_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2663: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2664: , x_other_message IN OUT NOCOPY VARCHAR2
2657: * conversion in this procedure fails.
2658: ******************************************************************/
2659: PROCEDURE Ref_Designator_UUI_To_UI2
2660: ( p_ref_designator_rec IN Bom_Bo_Pub.Ref_Designator_Rec_Type
2661: , p_ref_desg_unexp_rec IN Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2662: , x_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2663: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2664: , x_other_message IN OUT NOCOPY VARCHAR2
2665: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
2658: ******************************************************************/
2659: PROCEDURE Ref_Designator_UUI_To_UI2
2660: ( p_ref_designator_rec IN Bom_Bo_Pub.Ref_Designator_Rec_Type
2661: , p_ref_desg_unexp_rec IN Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2662: , x_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
2663: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
2664: , x_other_message IN OUT NOCOPY VARCHAR2
2665: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
2666: , x_Return_Status IN OUT NOCOPY VARCHAR2
2665: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
2666: , x_Return_Status IN OUT NOCOPY VARCHAR2
2667: )
2668: IS
2669: l_ref_desg_unexp_rec Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type :=
2670: p_ref_desg_unexp_rec;
2671: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
2672: l_Err_Text VARCHAR2(2000);
2673: l_Return_Status VARCHAR2(1);
3066: ** Procedures used by BOM Business Object
3067: */
3068:
3069: PROCEDURE Bom_Component_UUI_To_UI
3070: ( p_bom_component_Rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3071: , p_bom_comp_unexp_Rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3072: , x_bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3073: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3074: , x_Return_Status IN OUT NOCOPY VARCHAR2
3067: */
3068:
3069: PROCEDURE Bom_Component_UUI_To_UI
3070: ( p_bom_component_Rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3071: , p_bom_comp_unexp_Rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3072: , x_bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3073: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3074: , x_Return_Status IN OUT NOCOPY VARCHAR2
3075: )
3068:
3069: PROCEDURE Bom_Component_UUI_To_UI
3070: ( p_bom_component_Rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3071: , p_bom_comp_unexp_Rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3072: , x_bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3073: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3074: , x_Return_Status IN OUT NOCOPY VARCHAR2
3075: )
3076: IS
3073: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3074: , x_Return_Status IN OUT NOCOPY VARCHAR2
3075: )
3076: IS
3077: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3078: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3079: l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
3080: BEGIN
3081:
3074: , x_Return_Status IN OUT NOCOPY VARCHAR2
3075: )
3076: IS
3077: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3078: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3079: l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
3080: BEGIN
3081:
3082: --
3075: )
3076: IS
3077: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3078: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3079: l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
3080: BEGIN
3081:
3082: --
3083: -- Convert the BOM Record to ECO
3081:
3082: --
3083: -- Convert the BOM Record to ECO
3084: --
3085: Bom_Bo_Pub.Convert_BomComp_To_EcoComp
3086: ( p_bom_component_rec => p_bom_component_rec
3087: , p_bom_comp_unexp_rec => p_bom_comp_unexp_rec
3088: , x_rev_component_rec => l_rev_component_rec
3089: , x_rev_comp_unexp_rec => l_rev_comp_unexp_rec
3099:
3100: --
3101: -- Convert the Eco Component back to BOM
3102: --
3103: Bom_Bo_Pub.Convert_EcoComp_To_BomComp
3104: ( p_rev_component_rec => l_rev_component_rec
3105: , p_rev_comp_unexp_rec => l_rev_comp_unexp_rec
3106: , x_bom_component_rec => l_bom_component_rec
3107: , x_bom_comp_unexp_rec => x_bom_comp_unexp_rec
3110: END Bom_Component_UUI_To_UI;
3111:
3112:
3113: PROCEDURE Bom_Component_UUI_to_UI2
3114: ( p_Bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3115: , p_Bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3116: , x_Bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3117: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3118: , x_other_message IN OUT NOCOPY VARCHAR2
3111:
3112:
3113: PROCEDURE Bom_Component_UUI_to_UI2
3114: ( p_Bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3115: , p_Bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3116: , x_Bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3117: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3118: , x_other_message IN OUT NOCOPY VARCHAR2
3119: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3112:
3113: PROCEDURE Bom_Component_UUI_to_UI2
3114: ( p_Bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3115: , p_Bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3116: , x_Bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3117: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3118: , x_other_message IN OUT NOCOPY VARCHAR2
3119: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3120: , x_Return_Status IN OUT NOCOPY VARCHAR2
3119: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3120: , x_Return_Status IN OUT NOCOPY VARCHAR2
3121: )
3122: IS
3123: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3124: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3125: l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
3126: BEGIN
3127:
3120: , x_Return_Status IN OUT NOCOPY VARCHAR2
3121: )
3122: IS
3123: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3124: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3125: l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
3126: BEGIN
3127:
3128: --
3121: )
3122: IS
3123: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3124: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3125: l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
3126: BEGIN
3127:
3128: --
3129: -- Convert the BOM Record to ECO
3127:
3128: --
3129: -- Convert the BOM Record to ECO
3130: --
3131: Bom_Bo_Pub.Convert_BomComp_To_EcoComp
3132: ( p_bom_component_rec => p_bom_component_rec
3133: , p_bom_comp_unexp_rec => p_bom_comp_unexp_rec
3134: , x_rev_component_rec => l_rev_component_rec
3135: , x_rev_comp_unexp_rec => l_rev_comp_unexp_rec
3147:
3148: --
3149: -- Convert the Eco Component back to BOM
3150: --
3151: Bom_Bo_Pub.Convert_EcoComp_To_BomComp
3152: ( p_rev_component_rec => l_rev_component_rec
3153: , p_rev_comp_unexp_rec => l_rev_comp_unexp_rec
3154: , x_bom_component_rec => l_bom_component_rec
3155: , x_bom_comp_unexp_rec => x_bom_comp_unexp_rec
3160:
3161: PROCEDURE Bom_Component_VID
3162: ( x_return_status IN OUT NOCOPY VARCHAR2
3163: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3164: , x_bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3165: , p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3166: , p_bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3167: )
3168: IS
3161: PROCEDURE Bom_Component_VID
3162: ( x_return_status IN OUT NOCOPY VARCHAR2
3163: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3164: , x_bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3165: , p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3166: , p_bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3167: )
3168: IS
3169: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3162: ( x_return_status IN OUT NOCOPY VARCHAR2
3163: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3164: , x_bom_comp_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3165: , p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3166: , p_bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3167: )
3168: IS
3169: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3170: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3165: , p_bom_component_rec IN Bom_Bo_Pub.Bom_Comps_Rec_Type
3166: , p_bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3167: )
3168: IS
3169: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3170: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3171: l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
3172: BEGIN
3173:
3166: , p_bom_comp_unexp_rec IN Bom_Bo_Pub.Bom_Comps_Unexposed_Rec_Type
3167: )
3168: IS
3169: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3170: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3171: l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
3172: BEGIN
3173:
3174: --
3167: )
3168: IS
3169: l_rev_component_rec Bom_Bo_Pub.Rev_Component_Rec_Type;
3170: l_rev_comp_unexp_rec Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type;
3171: l_bom_component_rec Bom_Bo_Pub.Bom_Comps_Rec_Type;
3172: BEGIN
3173:
3174: --
3175: -- Convert the BOM Record to ECO
3173:
3174: --
3175: -- Convert the BOM Record to ECO
3176: --
3177: Bom_Bo_Pub.Convert_BomComp_To_EcoComp
3178: ( p_bom_component_rec => p_bom_component_rec
3179: , p_bom_comp_unexp_rec => p_bom_comp_unexp_rec
3180: , x_rev_component_rec => l_rev_component_rec
3181: , x_rev_comp_unexp_rec => l_rev_comp_unexp_rec
3191:
3192: --
3193: -- Convert the Eco Component back to BOM
3194: --
3195: Bom_Bo_Pub.Convert_EcoComp_To_BomComp
3196: ( p_rev_component_rec => l_rev_component_rec
3197: , p_rev_comp_unexp_rec => l_rev_comp_unexp_rec
3198: , x_bom_component_rec => l_bom_component_rec
3199: , x_bom_comp_unexp_rec => x_bom_comp_unexp_rec
3201:
3202: END Bom_Component_VID;
3203:
3204: PROCEDURE Sub_Component_UUI_To_UI
3205: ( p_bom_sub_component_rec IN Bom_Bo_Pub.Bom_Sub_Component_Rec_Type
3206: , p_bom_sub_comp_unexp_rec IN Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3207: , x_bom_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3208: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3209: , x_Return_Status IN OUT NOCOPY VARCHAR2
3202: END Bom_Component_VID;
3203:
3204: PROCEDURE Sub_Component_UUI_To_UI
3205: ( p_bom_sub_component_rec IN Bom_Bo_Pub.Bom_Sub_Component_Rec_Type
3206: , p_bom_sub_comp_unexp_rec IN Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3207: , x_bom_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3208: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3209: , x_Return_Status IN OUT NOCOPY VARCHAR2
3210: )
3203:
3204: PROCEDURE Sub_Component_UUI_To_UI
3205: ( p_bom_sub_component_rec IN Bom_Bo_Pub.Bom_Sub_Component_Rec_Type
3206: , p_bom_sub_comp_unexp_rec IN Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3207: , x_bom_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3208: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3209: , x_Return_Status IN OUT NOCOPY VARCHAR2
3210: )
3211: IS
3208: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3209: , x_Return_Status IN OUT NOCOPY VARCHAR2
3210: )
3211: IS
3212: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
3213: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
3214: l_bom_sub_component_rec Bom_Bo_Pub.Bom_Sub_Component_Rec_Type;
3215: BEGIN
3216: --
3209: , x_Return_Status IN OUT NOCOPY VARCHAR2
3210: )
3211: IS
3212: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
3213: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
3214: l_bom_sub_component_rec Bom_Bo_Pub.Bom_Sub_Component_Rec_Type;
3215: BEGIN
3216: --
3217: -- Convert the BOM Substitute Component to ECO
3210: )
3211: IS
3212: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
3213: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
3214: l_bom_sub_component_rec Bom_Bo_Pub.Bom_Sub_Component_Rec_Type;
3215: BEGIN
3216: --
3217: -- Convert the BOM Substitute Component to ECO
3218: --
3216: --
3217: -- Convert the BOM Substitute Component to ECO
3218: --
3219:
3220: Bom_Bo_Pub.Convert_BomSComp_To_EcoSComp
3221: ( p_bom_sub_component_rec => p_bom_sub_component_rec
3222: , p_bom_sub_comp_unexp_rec => p_bom_sub_comp_unexp_rec
3223: , x_sub_component_rec => l_sub_component_rec
3224: , x_sub_comp_unexp_rec => l_sub_comp_unexp_rec
3235: );
3236:
3237: -- Convert the ECO Record back to BOM
3238:
3239: Bom_Bo_Pub.Convert_EcoSComp_to_BomSComp
3240: ( p_sub_component_rec => l_sub_component_rec
3241: , p_sub_comp_unexp_rec => l_sub_comp_unexp_rec
3242: , x_bom_sub_component_rec => l_bom_sub_component_rec
3243: , x_bom_sub_comp_unexp_rec => x_bom_sub_comp_unexp_rec
3245:
3246: END Sub_Component_UUI_To_UI;
3247:
3248: PROCEDURE Sub_Component_UUI_To_UI2
3249: ( p_bom_sub_component_rec IN Bom_Bo_Pub.Bom_Sub_Component_Rec_Type
3250: , p_bom_sub_comp_unexp_rec IN Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3251: , x_bom_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3252: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3253: , x_other_message IN OUT NOCOPY VARCHAR2
3246: END Sub_Component_UUI_To_UI;
3247:
3248: PROCEDURE Sub_Component_UUI_To_UI2
3249: ( p_bom_sub_component_rec IN Bom_Bo_Pub.Bom_Sub_Component_Rec_Type
3250: , p_bom_sub_comp_unexp_rec IN Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3251: , x_bom_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3252: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3253: , x_other_message IN OUT NOCOPY VARCHAR2
3254: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3247:
3248: PROCEDURE Sub_Component_UUI_To_UI2
3249: ( p_bom_sub_component_rec IN Bom_Bo_Pub.Bom_Sub_Component_Rec_Type
3250: , p_bom_sub_comp_unexp_rec IN Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3251: , x_bom_sub_Comp_unexp_Rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Sub_Comp_Unexp_Rec_Type
3252: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3253: , x_other_message IN OUT NOCOPY VARCHAR2
3254: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3255: , x_Return_Status IN OUT NOCOPY VARCHAR2
3254: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3255: , x_Return_Status IN OUT NOCOPY VARCHAR2
3256: )
3257: IS
3258: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
3259: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
3260: l_bom_sub_component_rec Bom_Bo_Pub.Bom_Sub_Component_Rec_Type;
3261: BEGIN
3262: --
3255: , x_Return_Status IN OUT NOCOPY VARCHAR2
3256: )
3257: IS
3258: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
3259: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
3260: l_bom_sub_component_rec Bom_Bo_Pub.Bom_Sub_Component_Rec_Type;
3261: BEGIN
3262: --
3263: -- Convert the BOM Substitute Component to ECO
3256: )
3257: IS
3258: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
3259: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
3260: l_bom_sub_component_rec Bom_Bo_Pub.Bom_Sub_Component_Rec_Type;
3261: BEGIN
3262: --
3263: -- Convert the BOM Substitute Component to ECO
3264: --
3262: --
3263: -- Convert the BOM Substitute Component to ECO
3264: --
3265:
3266: Bom_Bo_Pub.Convert_BomSComp_To_EcoSComp
3267: ( p_bom_sub_component_rec => p_bom_sub_component_rec
3268: , p_bom_sub_comp_unexp_rec => p_bom_sub_comp_unexp_rec
3269: , x_sub_component_rec => l_sub_component_rec
3270: , x_sub_comp_unexp_rec => l_sub_comp_unexp_rec
3283: );
3284:
3285: -- Convert the ECO Record back to BOM
3286:
3287: Bom_Bo_Pub.Convert_EcoSComp_to_BomSComp
3288: ( p_sub_component_rec => l_sub_component_rec
3289: , p_sub_comp_unexp_rec => l_sub_comp_unexp_rec
3290: , x_bom_sub_component_rec => l_bom_sub_component_rec
3291: , x_bom_sub_comp_unexp_rec => x_bom_sub_comp_unexp_rec
3294: END Sub_Component_UUI_To_UI2;
3295:
3296:
3297: PROCEDURE Ref_Designator_UUI_To_UI
3298: ( p_bom_ref_designator_rec IN Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type
3299: , p_bom_ref_desg_unexp_rec IN Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3300: , x_bom_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3301: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3302: , x_Return_Status IN OUT NOCOPY VARCHAR2
3295:
3296:
3297: PROCEDURE Ref_Designator_UUI_To_UI
3298: ( p_bom_ref_designator_rec IN Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type
3299: , p_bom_ref_desg_unexp_rec IN Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3300: , x_bom_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3301: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3302: , x_Return_Status IN OUT NOCOPY VARCHAR2
3303: )
3296:
3297: PROCEDURE Ref_Designator_UUI_To_UI
3298: ( p_bom_ref_designator_rec IN Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type
3299: , p_bom_ref_desg_unexp_rec IN Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3300: , x_bom_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3301: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3302: , x_Return_Status IN OUT NOCOPY VARCHAR2
3303: )
3304: IS
3301: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3302: , x_Return_Status IN OUT NOCOPY VARCHAR2
3303: )
3304: IS
3305: l_ref_designator_rec Bom_Bo_Pub.Ref_Designator_Rec_Type;
3306: l_ref_desg_unexp_rec Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type;
3307: l_bom_ref_designator_rec Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type;
3308: BEGIN
3309: --
3302: , x_Return_Status IN OUT NOCOPY VARCHAR2
3303: )
3304: IS
3305: l_ref_designator_rec Bom_Bo_Pub.Ref_Designator_Rec_Type;
3306: l_ref_desg_unexp_rec Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type;
3307: l_bom_ref_designator_rec Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type;
3308: BEGIN
3309: --
3310: -- Convert the BOM reference designator record to ECO
3303: )
3304: IS
3305: l_ref_designator_rec Bom_Bo_Pub.Ref_Designator_Rec_Type;
3306: l_ref_desg_unexp_rec Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type;
3307: l_bom_ref_designator_rec Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type;
3308: BEGIN
3309: --
3310: -- Convert the BOM reference designator record to ECO
3311: --
3308: BEGIN
3309: --
3310: -- Convert the BOM reference designator record to ECO
3311: --
3312: Bom_Bo_Pub.Convert_BomDesg_To_EcoDesg
3313: ( p_bom_ref_designator_rec => p_bom_ref_designator_rec
3314: , p_bom_ref_desg_unexp_rec => p_bom_ref_desg_unexp_rec
3315: , x_ref_designator_rec => l_ref_designator_rec
3316: , x_ref_desg_unexp_rec => l_ref_desg_unexp_rec
3327: );
3328:
3329: -- Convert the ECO Reference Designator back to BOM
3330:
3331: Bom_Bo_Pub.Convert_EcoDesg_To_BomDesg
3332: ( p_ref_designator_rec => l_ref_designator_rec
3333: , p_ref_desg_unexp_rec => l_ref_desg_unexp_rec
3334: , x_bom_ref_designator_rec => l_bom_ref_designator_rec
3335: , x_bom_ref_desg_unexp_rec => x_bom_ref_desg_unexp_rec
3337:
3338: END Ref_Designator_UUI_To_UI;
3339:
3340: PROCEDURE Ref_Designator_UUI_To_UI2
3341: ( p_Bom_ref_designator_rec IN Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type
3342: , p_Bom_ref_desg_unexp_rec IN Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3343: , x_Bom_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3344: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3345: , x_other_message IN OUT NOCOPY VARCHAR2
3338: END Ref_Designator_UUI_To_UI;
3339:
3340: PROCEDURE Ref_Designator_UUI_To_UI2
3341: ( p_Bom_ref_designator_rec IN Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type
3342: , p_Bom_ref_desg_unexp_rec IN Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3343: , x_Bom_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3344: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3345: , x_other_message IN OUT NOCOPY VARCHAR2
3346: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3339:
3340: PROCEDURE Ref_Designator_UUI_To_UI2
3341: ( p_Bom_ref_designator_rec IN Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type
3342: , p_Bom_ref_desg_unexp_rec IN Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3343: , x_Bom_ref_desg_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Ref_Desg_Unexp_Rec_Type
3344: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3345: , x_other_message IN OUT NOCOPY VARCHAR2
3346: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3347: , x_Return_Status IN OUT NOCOPY VARCHAR2
3346: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3347: , x_Return_Status IN OUT NOCOPY VARCHAR2
3348: )
3349: IS
3350: l_ref_designator_rec Bom_Bo_Pub.Ref_Designator_Rec_Type;
3351: l_ref_desg_unexp_rec Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type;
3352: l_bom_ref_designator_rec Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type;
3353: BEGIN
3354: --
3347: , x_Return_Status IN OUT NOCOPY VARCHAR2
3348: )
3349: IS
3350: l_ref_designator_rec Bom_Bo_Pub.Ref_Designator_Rec_Type;
3351: l_ref_desg_unexp_rec Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type;
3352: l_bom_ref_designator_rec Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type;
3353: BEGIN
3354: --
3355: -- Convert the BOM reference designator record to ECO
3348: )
3349: IS
3350: l_ref_designator_rec Bom_Bo_Pub.Ref_Designator_Rec_Type;
3351: l_ref_desg_unexp_rec Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type;
3352: l_bom_ref_designator_rec Bom_Bo_Pub.Bom_Ref_Designator_Rec_Type;
3353: BEGIN
3354: --
3355: -- Convert the BOM reference designator record to ECO
3356: --
3353: BEGIN
3354: --
3355: -- Convert the BOM reference designator record to ECO
3356: --
3357: Bom_Bo_Pub.Convert_BomDesg_To_EcoDesg
3358: ( p_bom_ref_designator_rec => p_bom_ref_designator_rec
3359: , p_bom_ref_desg_unexp_rec => p_bom_ref_desg_unexp_rec
3360: , x_ref_designator_rec => l_ref_designator_rec
3361: , x_ref_desg_unexp_rec => l_ref_desg_unexp_rec
3374: );
3375:
3376: -- Convert the ECO Reference Designator back to BOM
3377:
3378: Bom_Bo_Pub.Convert_EcoDesg_To_BomDesg
3379: ( p_ref_designator_rec => l_ref_designator_rec
3380: , p_ref_desg_unexp_rec => l_ref_desg_unexp_rec
3381: , x_bom_ref_designator_rec => l_bom_ref_designator_rec
3382: , x_bom_ref_desg_unexp_rec => x_bom_ref_desg_unexp_rec
3395: * Purpose : This procedure will convert user unique idx columns
3396: * into unique id columns.
3397: ********************************************************************/
3398: PROCEDURE Bom_Comp_Operation_UUI_To_UI
3399: ( p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
3400: , p_bom_comp_ops_unexp_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3401: , x_bom_comp_ops_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3402: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3403: , x_Return_Status IN OUT NOCOPY VARCHAR2
3396: * into unique id columns.
3397: ********************************************************************/
3398: PROCEDURE Bom_Comp_Operation_UUI_To_UI
3399: ( p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
3400: , p_bom_comp_ops_unexp_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3401: , x_bom_comp_ops_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3402: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3403: , x_Return_Status IN OUT NOCOPY VARCHAR2
3404: )
3397: ********************************************************************/
3398: PROCEDURE Bom_Comp_Operation_UUI_To_UI
3399: ( p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
3400: , p_bom_comp_ops_unexp_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3401: , x_bom_comp_ops_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3402: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3403: , x_Return_Status IN OUT NOCOPY VARCHAR2
3404: )
3405: IS
3402: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3403: , x_Return_Status IN OUT NOCOPY VARCHAR2
3404: )
3405: IS
3406: l_bom_comp_ops_unexp_rec Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type;
3407: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3408: l_Err_Text VARCHAR2(2000);
3409: l_Return_Status VARCHAR2(1);
3410: l_token_tbl Error_Handler.Token_Tbl_Type;
3523: * program can decide on the scope of the error if the
3524: * conversion in this procedure fails.
3525: ******************************************************************/
3526: PROCEDURE Bom_Comp_Operation_UUI_To_UI2
3527: ( p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
3528: , p_bom_comp_ops_unexp_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3529: , x_bom_comp_ops_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3530: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3531: , x_other_message IN OUT NOCOPY VARCHAR2
3524: * conversion in this procedure fails.
3525: ******************************************************************/
3526: PROCEDURE Bom_Comp_Operation_UUI_To_UI2
3527: ( p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
3528: , p_bom_comp_ops_unexp_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3529: , x_bom_comp_ops_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3530: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3531: , x_other_message IN OUT NOCOPY VARCHAR2
3532: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3525: ******************************************************************/
3526: PROCEDURE Bom_Comp_Operation_UUI_To_UI2
3527: ( p_bom_comp_ops_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Rec_Type
3528: , p_bom_comp_ops_unexp_rec IN Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3529: , x_bom_comp_ops_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type
3530: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3531: , x_other_message IN OUT NOCOPY VARCHAR2
3532: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3533: , x_Return_Status IN OUT NOCOPY VARCHAR2
3532: , x_other_token_tbl IN OUT NOCOPY Error_Handler.Token_Tbl_Type
3533: , x_Return_Status IN OUT NOCOPY VARCHAR2
3534: )
3535: IS
3536: l_bom_comp_ops_unexp_rec Bom_Bo_Pub.Bom_Comp_Ops_Unexp_Rec_Type :=
3537: p_bom_comp_ops_unexp_rec;
3538: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3539: l_Err_Text VARCHAR2(2000);
3540: l_Return_Status VARCHAR2(1);