21: -- different combinations of key input data(group id,
22: -- name and segments)
23: ****************************************************************************/
24: G_Pkg_Name VARCHAR2(30) := 'EGO_ItemCat_Val_To_Id';
25: g_token_tbl Error_Handler.Token_Tbl_Type;
26:
27:
28: G_Error_Msg_Text VARCHAR2(2000);
29:
430: * Return Status
431: * Purpose :
432: *********************************************************************/
433: PROCEDURE EGO_ItemCatalog_UUI_To_UI
434: ( x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
435: , x_Return_Status OUT NOCOPY VARCHAR2
436: )
437: IS
438: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
434: ( x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
435: , x_Return_Status OUT NOCOPY VARCHAR2
436: )
437: IS
438: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
439: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
440: l_result VARCHAR2(2000);
441:
442: is_valid boolean;
473: IF EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name IS NULL
474: THEN
475: -- dbms_output.put_line('concat group name is NULL ' );
476:
477: Error_Handler.Add_Error_Token
478: ( x_mesg_token_Tbl => l_mesg_token_tbl
479: , p_application_id => 'EGO'
480: , p_message_name => 'EGO_CAT_SEGMENTS_INVALID'
481: );
502:
503: IF EGO_Globals.G_Catalog_Group_Rec.Transaction_Type =
504: EGO_Globals.G_OPR_CREATE
505: THEN
506: Error_Handler.Add_Error_Token
507: ( x_mesg_token_Tbl => l_mesg_token_tbl
508: , p_application_id => 'EGO'
509: , p_message_name => 'EGO_CATALOG_ALREADY_EXISTS'
510: );
519:
520: IF EGO_Globals.G_Catalog_Group_Rec.Transaction_Type IN
521: (EGO_Globals.G_OPR_UPDATE,EGO_Globals.G_OPR_DELETE)
522: THEN
523: Error_Handler.Add_Error_Token
524: ( x_mesg_token_Tbl => l_mesg_token_tbl
525: , p_application_id => 'EGO'
526: , p_message_name => 'EGO_CATALOG_DOESNOT_EXIST'
527: );
547: Generate_Catalog_Group_Id;
548:
549: -- dbms_output.put_line('ccid assigned: ' || EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id);
550: ELSE
551: Error_Handler.Add_Error_Token
552: ( x_mesg_token_Tbl => l_mesg_token_tbl
553: , p_application_id => 'EGO'
554: , p_message_name => 'EGO_CAT_SEGMENTS_INVALID'
555: );
591:
592: IF l_Catalog_Group_Name IS NOT NULL AND EGO_Globals.G_Catalog_Group_Rec.Transaction_Type =
593: EGO_Globals.G_OPR_CREATE
594: THEN
595: Error_Handler.Add_Error_Token
596: ( x_mesg_token_Tbl => l_mesg_token_tbl
597: , p_application_id => 'EGO'
598: , p_message_name => 'EGO_CATALOG_ALREADY_EXISTS'
599: );
605: ELSIF l_Catalog_Group_Name IS NULL AND
606: EGO_Globals.G_Catalog_Group_Rec.Transaction_Type <> EGO_Globals.G_OPR_CREATE
607: THEN
608:
609: Error_Handler.Add_Error_Token
610: ( x_mesg_token_Tbl => l_mesg_token_tbl
611: , p_application_id => 'EGO'
612: , p_message_name => 'EGO_CATALOG_DOESNOT_EXIST'
613: );
658: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name :=
659: concat_Group_Name;
660: END IF;
661: ELSE
662: Error_Handler.Add_Error_Token
663: ( x_mesg_token_Tbl => l_mesg_token_tbl
664: , p_application_id => 'EGO'
665: , p_message_name => 'EGO_CAT_SEGMENTS_INVALID'
666: );
674: -- the Segments apart from the Id
675:
676: IF EGO_Globals.G_Catalog_Group_Rec.Transaction_Type = EGO_Globals.G_OPR_CREATE
677: THEN
678: Error_Handler.Add_Error_Token
679: ( x_mesg_token_Tbl => l_mesg_token_tbl
680: , p_application_id => 'EGO'
681: , p_message_name => 'EGO_CAT_SEGMENTS_INVALID'
682: );
694: THEN
695:
696: is_passed := TRUE;
697:
698: Error_Handler.Write_Debug('getting id for ' ||
699: EGO_Globals.G_Catalog_Group_Rec.catalog_group_name);
700:
701: -- dbms_output.put_line('getting id for ' || EGO_Globals.G_Catalog_Group_Rec.catalog_group_name);
702:
715: when the transaction type is CREATE */
716:
717: IF EGO_Globals.G_Catalog_Group_Rec.Transaction_Type = EGO_Globals.G_OPR_CREATE
718: THEN
719: Error_Handler.Add_Error_Token
720: ( x_mesg_token_Tbl => l_mesg_token_tbl
721: , p_application_id => 'EGO'
722: , p_message_name => 'EGO_CATALOG_ALREADY_EXISTS'
723: );
730:
731: IF EGO_Globals.G_Catalog_Group_Rec.Transaction_Type IN
732: (EGO_Globals.G_OPR_UPDATE,EGO_Globals.G_OPR_DELETE)
733: THEN
734: Error_Handler.Add_Error_Token
735: ( x_mesg_token_Tbl => l_mesg_token_tbl
736: , p_application_id => 'EGO'
737: , p_message_name => 'EGO_CATALOG_DOESNOT_EXIST'
738: );
754:
755: -- dbms_output.put_line('ccid assigned: ' || EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id);
756: ELSIF (check_status = 0)
757: THEN
758: Error_Handler.Add_Error_Token
759: ( x_mesg_token_Tbl => l_mesg_token_tbl
760: , p_application_id => 'EGO'
761: , p_message_text => G_Error_Msg_Text
762: );
768:
769: -- If there are no key values passed for this row, then raise error
770: --
771: IF NOT is_passed THEN
772: Error_Handler.Add_Error_Token
773: ( x_mesg_token_Tbl => l_mesg_token_tbl
774: , p_application_id => 'EGO'
775: , p_message_text => 'EGO_CAT_KEYCOLS_NOT_PASSED'
776: );
788: EGO_Globals.G_Catalog_Group_Rec.parent_catalog_group_name
789: , p_operation => 'FIND_COMBINATION'
790: );
791:
792: Error_Handler.Write_Debug('Parent Catalog Group Id: ' ||
793: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id);
794:
795: -- dbms_output.put_line('Parent Catalog Group Id: ' || EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id);
796:
797: IF EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id IS NULL
798: THEN
799:
800: -- dbms_output.put_line('Parent Catalog Group Id NOT FOUND . . . ');
801: Error_Handler.Add_Error_Token
802: ( x_mesg_token_Tbl => l_mesg_token_tbl
803: , p_application_id => 'EGO'
804: , p_message_text => G_Error_Msg_Text
805: );
823:
824: IF EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name IS NULL
825: THEN
826:
827: Error_Handler.Add_Error_Token
828: ( x_mesg_token_Tbl => l_mesg_token_tbl
829: , p_application_id => 'EGO'
830: , p_message_text => G_Error_Msg_Text
831: );
835:
836: END IF;
837:
838: -- dbms_output.put_line('UUI Conversion done . . .returning ' || l_return_status);
839: Error_Handler.Write_Debug('UUI Conversion done . . . returning ' || l_return_status) ;
840:
841: x_return_status := l_return_status;
842: x_mesg_token_tbl := l_mesg_token_tbl;
843:
853: * Return Status
854: * Purpose :
855: *********************************************************************/
856: PROCEDURE EGO_ItemCatalog_UUI_To_UI2
857: ( x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
858: , x_Return_Status OUT NOCOPY VARCHAR2
859: )
860: IS
861: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
857: ( x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
858: , x_Return_Status OUT NOCOPY VARCHAR2
859: )
860: IS
861: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
862: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
863: l_result VARCHAR2(2000);
864:
865: is_valid boolean;
899: IF EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Name IS NULL
900: THEN
901: -- dbms_output.put_line('concat group name is NULL ' );
902:
903: Error_Handler.Add_Error_Token
904: ( x_mesg_token_Tbl => l_mesg_token_tbl
905: , p_application_id => 'EGO'
906: , p_message_name => 'EGO_CAT_SEGMENTS_INVALID'
907: );
959:
960: IF l_Catalog_Group_Name IS NULL
961: THEN
962:
963: Error_Handler.Add_Error_Token
964: ( x_mesg_token_Tbl => l_mesg_token_tbl
965: , p_application_id => 'EGO'
966: , p_message_text => G_Error_Msg_Text
967: );
1004: -- during database writes.
1005: check_status := Perform_Segment_Breakup(p_create_new => false);
1006: END IF;
1007: ELSE
1008: Error_Handler.Add_Error_Token
1009: ( x_mesg_token_Tbl => l_mesg_token_tbl
1010: , p_application_id => 'EGO'
1011: , p_message_name => 'EGO_CAT_SEGMENTS_INVALID'
1012: );
1026: EGO_Globals.G_Catalog_Group_Rec.catalog_group_id = FND_API.G_MISS_NUM
1027: )
1028: )
1029: THEN
1030: Error_Handler.Write_Debug('getting id for ' || EGO_Globals.G_Catalog_Group_Rec.catalog_group_name);
1031: -- dbms_output.put_line('getting id for ' || EGO_Globals.G_Catalog_Group_Rec.catalog_group_name);
1032: EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_id :=
1033: Get_Catalog_Group_Id( p_catalog_group_name =>
1034: EGO_Globals.G_Catalog_Group_Rec.catalog_group_name
1054:
1055: -- dbms_output.put_line('ccid assigned: ' || EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id);
1056: ELSIF (check_status = 0)
1057: THEN
1058: Error_Handler.Add_Error_Token
1059: ( x_mesg_token_Tbl => l_mesg_token_tbl
1060: , p_application_id => 'EGO'
1061: , p_message_text => G_Error_Msg_Text
1062: );
1096:
1097: -- dbms_output.put_line('ccid assigned: ' || EGO_Globals.G_Catalog_Group_Rec.Catalog_Group_Id);
1098: ELSIF (check_status = 0)
1099: THEN
1100: Error_Handler.Add_Error_Token
1101: ( x_mesg_token_Tbl => l_mesg_token_tbl
1102: , p_application_id => 'EGO'
1103: , p_message_text => G_Error_Msg_Text
1104: );
1121: EGO_Globals.G_Catalog_Group_Rec.parent_catalog_group_name
1122: , p_operation => 'FIND_COMBINATION'
1123: );
1124:
1125: Error_Handler.Write_Debug('Parent Catalog Group Id: ' ||
1126: EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id);
1127:
1128: -- dbms_output.put_line('Parent Catalog Group Id: ' || EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id);
1129:
1130: IF EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Id IS NULL
1131: THEN
1132:
1133: -- dbms_output.put_line('Parent Catalog Group Id NOT FOUND . . . ');
1134: Error_Handler.Add_Error_Token
1135: ( x_mesg_token_Tbl => l_mesg_token_tbl
1136: , p_application_id => 'EGO'
1137: , p_message_text => G_Error_Msg_Text
1138: );
1156:
1157: IF EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name IS NULL
1158: THEN
1159:
1160: Error_Handler.Add_Error_Token
1161: ( x_mesg_token_Tbl => l_mesg_token_tbl
1162: , p_application_id => 'EGO'
1163: , p_message_text => G_Error_Msg_Text
1164: );
1167: -- dbms_output.put_line('Getting Parent Group Name from ID ... ' || EGO_Globals.G_Catalog_Group_Rec.Parent_Catalog_Group_Name);
1168: END IF;
1169:
1170: -- dbms_output.put_line('UUI Conversion done . . .returning ' || l_return_status);
1171: Error_Handler.Write_Debug('UUI Conversion done . . . returning ' || l_return_status) ;
1172:
1173: x_return_status := l_return_status;
1174: x_mesg_token_tbl := l_mesg_token_tbl;
1175:
1185: * Purpose :
1186: *********************************************************************/
1187: PROCEDURE EGO_ItemCatalog_VID
1188: ( x_Return_Status OUT NOCOPY VARCHAR2
1189: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1190: )
1191: IS
1192: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1193: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1189: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1190: )
1191: IS
1192: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1193: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1194: l_err_text VARCHAR2(2000);
1195: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1196: BEGIN
1197:
1191: IS
1192: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1193: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1194: l_err_text VARCHAR2(2000);
1195: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1196: BEGIN
1197:
1198: Error_Handler.Write_Debug('VID conversion . . . ');
1199:
1194: l_err_text VARCHAR2(2000);
1195: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1196: BEGIN
1197:
1198: Error_Handler.Write_Debug('VID conversion . . . ');
1199:
1200: x_return_status := l_return_status;
1201: x_mesg_token_tbl := l_mesg_token_tbl;
1202: