64: TYPE RD_VARCHAR_TBL_TYPE IS TABLE OF VARCHAR2(30) INDEX BY BINARY_INTEGER;
65: G_MISS_RD_VARCHAR_TBL RD_VARCHAR_TBL_TYPE;
66:
67: /* Function that checks if there are any rows to be processed in the
68: * EGO_BULKLOAD_INTF prior to running all the heavy dbms_sqls.
69: * This will give a performance boost if the users are loading data
70: * through the same batch_id
71: */
72: FUNCTION Interface_Rows_Exist
640: -- Constant Values
641: G_DEL_GROUP_NAME VARCHAR2(10) := 'B_BLK_INTF';
642: G_DEL_GROUP_DESC VARCHAR2(240) := 'Delete Group for EGO BOM Bulkload Structures';
643:
644: l_bom_header_columns_tbl DBMS_SQL.VARCHAR2_TABLE;
645:
646: -- Variables for RDs
647: L_SRCSYS_ITEM VARCHAR2(240);
648: L_COMP_REF_DESIG VARCHAR2(3000); --Changed size from 240 to 3000 support larger size of reference designators
1106: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.1-->' || l_dyn_sql_cursor);
1107: END IF;
1108:
1109:
1110: l_cursor_select := Dbms_Sql.Open_Cursor;
1111: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1112: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1113: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1114: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1107: END IF;
1108:
1109:
1110: l_cursor_select := Dbms_Sql.Open_Cursor;
1111: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1112: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1113: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1114: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1115: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1108:
1109:
1110: l_cursor_select := Dbms_Sql.Open_Cursor;
1111: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1112: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1113: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1114: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1115: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1116: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1109:
1110: l_cursor_select := Dbms_Sql.Open_Cursor;
1111: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1112: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1113: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1114: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1115: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1116: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1117: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1110: l_cursor_select := Dbms_Sql.Open_Cursor;
1111: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1112: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1113: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1114: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1115: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1116: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1117: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1118: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1111: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1112: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1113: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1114: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1115: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1116: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1117: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1118: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1119: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1112: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1113: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1114: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1115: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1116: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1117: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1118: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1119: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1120: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1113: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1114: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1115: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1116: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1117: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1118: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1119: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1120: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1121: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1114: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1115: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1116: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1117: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1118: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1119: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1120: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1121: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1122:
1115: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1116: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1117: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1118: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1119: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1120: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1121: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1122:
1123: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1116: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1117: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1118: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1119: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1120: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1121: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1122:
1123: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1124: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1117: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1118: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1119: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1120: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1121: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1122:
1123: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1124: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1125: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1119: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1120: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1121: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1122:
1123: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1124: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1125: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1126: Dbms_Sql.Bind_Variable(l_cursor_select,':4', p_resultfmt_usage_id);
1127:
1120: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1121: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1122:
1123: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1124: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1125: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1126: Dbms_Sql.Bind_Variable(l_cursor_select,':4', p_resultfmt_usage_id);
1127:
1128: IF l_debug = 'Y' THEN
1121: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1122:
1123: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1124: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1125: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1126: Dbms_Sql.Bind_Variable(l_cursor_select,':4', p_resultfmt_usage_id);
1127:
1128: IF l_debug = 'Y' THEN
1129: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.2-->' || p_resultfmt_usage_id);
1122:
1123: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1124: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1125: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1126: Dbms_Sql.Bind_Variable(l_cursor_select,':4', p_resultfmt_usage_id);
1127:
1128: IF l_debug = 'Y' THEN
1129: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.2-->' || p_resultfmt_usage_id);
1130: END IF;
1128: IF l_debug = 'Y' THEN
1129: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.2-->' || p_resultfmt_usage_id);
1130: END IF;
1131:
1132: l_cursor_execute := Dbms_Sql.EXECUTE(l_cursor_select);
1133:
1134: IF l_debug = 'Y' THEN
1135: FND_FILE.PUT_LINE( FND_FILE.LOG,'SUCCESS');
1136: END IF;
1135: FND_FILE.PUT_LINE( FND_FILE.LOG,'SUCCESS');
1136: END IF;
1137: i := 1;
1138: LOOP
1139: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1140: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1141: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1142: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1143: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1136: END IF;
1137: i := 1;
1138: LOOP
1139: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1140: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1141: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1142: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1143: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1144: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1137: i := 1;
1138: LOOP
1139: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1140: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1141: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1142: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1143: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1144: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1145: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1138: LOOP
1139: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1140: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1141: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1142: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1143: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1144: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1145: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1146: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1139: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1140: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1141: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1142: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1143: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1144: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1145: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1146: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1147: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1140: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1141: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1142: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1143: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1144: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1145: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1146: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1147: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1148: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1141: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1142: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1143: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1144: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1145: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1146: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1147: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1148: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1149: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1142: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1143: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1144: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1145: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1146: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1147: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1148: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1149: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1150:
1143: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1144: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1145: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1146: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1147: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1148: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1149: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1150:
1151: IF L_EFFEC_CONTROL IS NOT NULL
1144: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1145: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1146: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1147: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1148: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1149: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1150:
1151: IF L_EFFEC_CONTROL IS NOT NULL
1152: THEN
1145: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1146: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1147: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1148: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1149: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1150:
1151: IF L_EFFEC_CONTROL IS NOT NULL
1152: THEN
1153: SELECT
1379: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 3-->' || l_dyn_sql);
1380: END IF;
1381:
1382:
1383: Dbms_Sql.Close_Cursor(l_cursor_select);
1384: -- End of Creating Structure Header record if that is not available.
1385:
1386: l_dyn_sql_insert := '';
1387: l_dyn_sql_insert := l_dyn_sql_insert || 'INSERT INTO BOM_INVENTORY_COMPS_INTERFACE ( BATCH_ID, ';
1674: l_dyn_sql_cursor := l_dyn_sql_cursor || ' OR UPPER(Transaction_Type) = ''' || G_TXN_UPDATE || ''' OR UPPER(Transaction_Type) = ''' || G_TXN_SYNC || ''' )';
1675:
1676: Write_Debug('Entering SQL R.1' || l_dyn_sql_cursor);
1677:
1678: l_cursor_select := Dbms_Sql.Open_Cursor;
1679: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1680: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1681: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1682: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1675:
1676: Write_Debug('Entering SQL R.1' || l_dyn_sql_cursor);
1677:
1678: l_cursor_select := Dbms_Sql.Open_Cursor;
1679: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1680: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1681: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1682: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1683: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1676: Write_Debug('Entering SQL R.1' || l_dyn_sql_cursor);
1677:
1678: l_cursor_select := Dbms_Sql.Open_Cursor;
1679: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1680: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1681: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1682: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1683: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1684: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1677:
1678: l_cursor_select := Dbms_Sql.Open_Cursor;
1679: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1680: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1681: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1682: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1683: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1684: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1685: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1678: l_cursor_select := Dbms_Sql.Open_Cursor;
1679: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1680: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1681: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1682: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1683: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1684: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1685: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1686: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1679: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1680: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1681: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1682: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1683: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1684: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1685: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1686: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1687: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1680: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1681: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1682: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1683: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1684: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1685: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1686: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1687: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1688: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1681: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1682: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1683: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1684: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1685: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1686: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1687: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1688: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1689:
1682: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1683: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1684: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1685: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1686: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1687: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1688: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1689:
1690: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1683: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1684: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1685: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1686: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1687: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1688: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1689:
1690: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1691:
1684: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1685: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1686: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1687: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1688: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1689:
1690: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1691:
1692: Write_Debug('Entering SQL R.2' || p_resultfmt_usage_id);
1686: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1687: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1688: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1689:
1690: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1691:
1692: Write_Debug('Entering SQL R.2' || p_resultfmt_usage_id);
1693:
1694: l_cursor_execute := Dbms_Sql.EXECUTE(l_cursor_select);
1690: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1691:
1692: Write_Debug('Entering SQL R.2' || p_resultfmt_usage_id);
1693:
1694: l_cursor_execute := Dbms_Sql.EXECUTE(l_cursor_select);
1695:
1696: Write_Debug('Success -- RegDesig Cursor execution');
1697:
1698: LOOP
1695:
1696: Write_Debug('Success -- RegDesig Cursor execution');
1697:
1698: LOOP
1699: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1700: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1701: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1702: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1703: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1696: Write_Debug('Success -- RegDesig Cursor execution');
1697:
1698: LOOP
1699: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1700: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1701: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1702: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1703: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1704: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1697:
1698: LOOP
1699: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1700: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1701: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1702: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1703: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1704: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1705: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1698: LOOP
1699: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1700: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1701: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1702: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1703: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1704: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1705: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1706: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1699: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1700: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1701: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1702: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1703: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1704: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1705: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1706: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1707: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1700: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1701: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1702: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1703: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1704: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1705: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1706: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1707: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1708: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1701: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1702: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1703: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1704: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1705: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1706: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1707: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1708: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1709:
1702: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1703: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1704: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1705: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1706: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1707: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1708: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1709:
1710:
1703: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1704: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1705: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1706: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1707: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1708: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1709:
1710:
1711: getListOfRefDesigs(L_COMP_REF_DESIG, l_comp_ref_desig_tbl);
1704: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1705: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1706: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1707: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1708: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1709:
1710:
1711: getListOfRefDesigs(L_COMP_REF_DESIG, l_comp_ref_desig_tbl);
1712: FOR I IN 1..l_comp_ref_desig_tbl.COUNT LOOP
1741: EXIT;
1742: END IF;
1743: END LOOP;
1744:
1745: Dbms_Sql.Close_Cursor(l_cursor_select);
1746: END IF;
1747:
1748: UPDATE BOM_REF_DESGS_INTERFACE BRDI
1749: SET(effectivity_date, operation_seq_num, from_end_item_unit_number, component_sequence_id, assembly_item_revision_code)
1988: l_str_type_id NUMBER;
1989: l_prod_col_name_tbl VARCHAR_TBL_TYPE;
1990: l_intf_col_name_tbl VARCHAR_TBL_TYPE;
1991:
1992: l_attr_id_table DBMS_SQL.NUMBER_TABLE;
1993: l_intf_col_name_table DBMS_SQL.VARCHAR2_TABLE;
1994:
1995: l_usr_attr_data_tbl L_USER_ATTR_TBL_TYPE;
1996:
1989: l_prod_col_name_tbl VARCHAR_TBL_TYPE;
1990: l_intf_col_name_tbl VARCHAR_TBL_TYPE;
1991:
1992: l_attr_id_table DBMS_SQL.NUMBER_TABLE;
1993: l_intf_col_name_table DBMS_SQL.VARCHAR2_TABLE;
1994:
1995: l_usr_attr_data_tbl L_USER_ATTR_TBL_TYPE;
1996:
1997: l_bill_sequence_id_char VARCHAR(30);
2030: l_number_data NUMBER;
2031: l_date_data DATE;
2032:
2033: ---------------------------------------------------------
2034: -- DBMS_SQL Open Cursor integers.
2035: ---------------------------------------------------------
2036: l_cursor_select INTEGER;
2037: l_cursor_execute INTEGER;
2038: l_cursor_attr_id_val INTEGER;
2100: l_dyn_sql := l_dyn_sql || ' AND attribute_code LIKE :ATTRIBUTE_CODE ';
2101:
2102: Write_Debug(l_dyn_sql);
2103:
2104: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2105: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2106: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2107: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2108: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2101:
2102: Write_Debug(l_dyn_sql);
2103:
2104: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2105: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2106: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2107: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2108: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2109: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2102: Write_Debug(l_dyn_sql);
2103:
2104: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2105: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2106: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2107: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2108: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2109: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2110:
2103:
2104: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2105: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2106: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2107: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2108: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2109: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2110:
2111: l_cursor_execute := DBMS_SQL.EXECUTE(l_cursor_select);
2104: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2105: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2106: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2107: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2108: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2109: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2110:
2111: l_cursor_execute := DBMS_SQL.EXECUTE(l_cursor_select);
2112:
2105: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2106: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2107: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2108: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2109: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2110:
2111: l_cursor_execute := DBMS_SQL.EXECUTE(l_cursor_select);
2112:
2113:
2107: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2108: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2109: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2110:
2111: l_cursor_execute := DBMS_SQL.EXECUTE(l_cursor_select);
2112:
2113:
2114: /*
2115: --------------------------------------------------------------------
2126: */
2127:
2128:
2129: Write_Debug('About to start the Loop to fetch Rows');
2130: l_count := DBMS_SQL.FETCH_ROWS(l_cursor_select);
2131: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 1, l_attr_id_table);
2132: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 2, l_intf_col_name_table);
2133: Write_Debug('Retrieved rows => '||To_char(l_count));
2134: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2127:
2128:
2129: Write_Debug('About to start the Loop to fetch Rows');
2130: l_count := DBMS_SQL.FETCH_ROWS(l_cursor_select);
2131: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 1, l_attr_id_table);
2132: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 2, l_intf_col_name_table);
2133: Write_Debug('Retrieved rows => '||To_char(l_count));
2134: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2135:
2128:
2129: Write_Debug('About to start the Loop to fetch Rows');
2130: l_count := DBMS_SQL.FETCH_ROWS(l_cursor_select);
2131: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 1, l_attr_id_table);
2132: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 2, l_intf_col_name_table);
2133: Write_Debug('Retrieved rows => '||To_char(l_count));
2134: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2135:
2136: --------------------------------------------------------------------
2130: l_count := DBMS_SQL.FETCH_ROWS(l_cursor_select);
2131: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 1, l_attr_id_table);
2132: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 2, l_intf_col_name_table);
2133: Write_Debug('Retrieved rows => '||To_char(l_count));
2134: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2135:
2136: --------------------------------------------------------------------
2137: -- New DBMS_SQL Cursor for Select Attr Values.
2138: --------------------------------------------------------------------
2133: Write_Debug('Retrieved rows => '||To_char(l_count));
2134: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2135:
2136: --------------------------------------------------------------------
2137: -- New DBMS_SQL Cursor for Select Attr Values.
2138: --------------------------------------------------------------------
2139: l_cursor_attr_id_val := DBMS_SQL.OPEN_CURSOR;
2140: l_dyn_attr_id_val_sql := '';
2141: l_dyn_attr_id_val_sql := ' SELECT ';
2135:
2136: --------------------------------------------------------------------
2137: -- New DBMS_SQL Cursor for Select Attr Values.
2138: --------------------------------------------------------------------
2139: l_cursor_attr_id_val := DBMS_SQL.OPEN_CURSOR;
2140: l_dyn_attr_id_val_sql := '';
2141: l_dyn_attr_id_val_sql := ' SELECT ';
2142: l_dyn_attr_id_val_sql := l_dyn_attr_id_val_sql || ' TRANSACTION_ID , ';
2143: l_dyn_attr_id_val_sql := l_dyn_attr_id_val_sql || ' INSTANCE_PK4_VALUE , ';
2167: l_dyn_attr_id_val_sql := l_dyn_attr_id_val_sql || ' AND PROCESS_STATUS = :PROCESS_STATUS ';
2168:
2169: Write_Debug(l_dyn_attr_id_val_sql);
2170:
2171: DBMS_SQL.PARSE(l_cursor_attr_id_val, l_dyn_attr_id_val_sql, DBMS_SQL.NATIVE);
2172: --------------------------------------------------------------------
2173: --Setting Data Type for Trasaction ID
2174: --------------------------------------------------------------------
2175: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 1, l_number_example);
2171: DBMS_SQL.PARSE(l_cursor_attr_id_val, l_dyn_attr_id_val_sql, DBMS_SQL.NATIVE);
2172: --------------------------------------------------------------------
2173: --Setting Data Type for Trasaction ID
2174: --------------------------------------------------------------------
2175: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 1, l_number_example);
2176:
2177: --------------------------------------------------------------------
2178: --Setting Data Type for INSTANCE_PK4_VALUE (Bill Sequence Id)
2179: --------------------------------------------------------------------
2176:
2177: --------------------------------------------------------------------
2178: --Setting Data Type for INSTANCE_PK4_VALUE (Bill Sequence Id)
2179: --------------------------------------------------------------------
2180: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 2, l_varchar_example, 1000);
2181:
2182: --------------------------------------------------------------------
2183: --Setting Data Type for INSTANCE_PK2_VALUE (Component Sequence Id)
2184: --------------------------------------------------------------------
2181:
2182: --------------------------------------------------------------------
2183: --Setting Data Type for INSTANCE_PK2_VALUE (Component Sequence Id)
2184: --------------------------------------------------------------------
2185: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 3, l_varchar_example, 1000);
2186:
2187: --Setting Data Type for Source System Id
2188: --------------------------------------------------------------------
2189: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 4, l_number_example);
2185: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 3, l_varchar_example, 1000);
2186:
2187: --Setting Data Type for Source System Id
2188: --------------------------------------------------------------------
2189: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 4, l_number_example);
2190:
2191: --------------------------------------------------------------------
2192: --Setting Data Type for Source System Reference
2193: --------------------------------------------------------------------
2190:
2191: --------------------------------------------------------------------
2192: --Setting Data Type for Source System Reference
2193: --------------------------------------------------------------------
2194: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 5, l_varchar_example, 1000);
2195:
2196: --------------------------------------------------------------------
2197: --Setting Data Type for Component Item Number
2198: --------------------------------------------------------------------
2195:
2196: --------------------------------------------------------------------
2197: --Setting Data Type for Component Item Number
2198: --------------------------------------------------------------------
2199: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 6, l_varchar_example, 1000);
2200:
2201: --------------------------------------------------------------------
2202: --Setting Data Type for Organziation Code
2203: --------------------------------------------------------------------
2200:
2201: --------------------------------------------------------------------
2202: --Setting Data Type for Organziation Code
2203: --------------------------------------------------------------------
2204: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 7, l_varchar_example, 1000);
2205:
2206: --------------------------------------------------------------------
2207: --Setting Data Type for Parent Source System Reference
2208: --------------------------------------------------------------------
2205:
2206: --------------------------------------------------------------------
2207: --Setting Data Type for Parent Source System Reference
2208: --------------------------------------------------------------------
2209: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 8, l_varchar_example, 1000);
2210:
2211: --------------------------------------------------------------------
2212: --Setting Data Type for Assembly Item Number
2213: --------------------------------------------------------------------
2210:
2211: --------------------------------------------------------------------
2212: --Setting Data Type for Assembly Item Number
2213: --------------------------------------------------------------------
2214: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 9, l_varchar_example, 1000);
2215:
2216: --------------------------------------------------------------------
2217: -- Loop to Bind the Data Types for the SELECT Columns.
2218: --------------------------------------------------------------------
2230: ------------------------------------------------------------------------
2231: -- Based on the Data Type of the attribute, define the column
2232: ------------------------------------------------------------------------
2233: IF (l_data_type_code = 'C') THEN
2234: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_example, 1000);
2235: ELSIF (l_data_type_code = 'N') THEN
2236: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_example);
2237: ELSE --IF (l_data_type_code = 'D') THEN
2238: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_example);
2232: ------------------------------------------------------------------------
2233: IF (l_data_type_code = 'C') THEN
2234: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_example, 1000);
2235: ELSIF (l_data_type_code = 'N') THEN
2236: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_example);
2237: ELSE --IF (l_data_type_code = 'D') THEN
2238: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_example);
2239: END IF; --IF (l_data_type_code = 'C') THEN
2240:
2234: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_example, 1000);
2235: ELSIF (l_data_type_code = 'N') THEN
2236: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_example);
2237: ELSE --IF (l_data_type_code = 'D') THEN
2238: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_example);
2239: END IF; --IF (l_data_type_code = 'C') THEN
2240:
2241: END LOOP; --FOR i IN 1..l_attr_id_table.COUNT LOOP
2242:
2239: END IF; --IF (l_data_type_code = 'C') THEN
2240:
2241: END LOOP; --FOR i IN 1..l_attr_id_table.COUNT LOOP
2242:
2243: DBMS_SQL.BIND_VARIABLE(l_cursor_attr_id_val,':RESULTFMT_USAGE_ID',p_resultfmt_usage_id);
2244:
2245: write_debug('Binding the PROCESS_STATUS = '||G_INTF_STATUS_TOBE_PROCESS);
2246: DBMS_SQL.BIND_VARIABLE(l_cursor_attr_id_val,':PROCESS_STATUS',G_INTF_STATUS_TOBE_PROCESS);
2247:
2242:
2243: DBMS_SQL.BIND_VARIABLE(l_cursor_attr_id_val,':RESULTFMT_USAGE_ID',p_resultfmt_usage_id);
2244:
2245: write_debug('Binding the PROCESS_STATUS = '||G_INTF_STATUS_TOBE_PROCESS);
2246: DBMS_SQL.BIND_VARIABLE(l_cursor_attr_id_val,':PROCESS_STATUS',G_INTF_STATUS_TOBE_PROCESS);
2247:
2248: ------------------------------------------------------------------------
2249: -- Execute to get the Item User-Defined Attr values.
2250: ------------------------------------------------------------------------
2247:
2248: ------------------------------------------------------------------------
2249: -- Execute to get the Item User-Defined Attr values.
2250: ------------------------------------------------------------------------
2251: l_cursor_execute := DBMS_SQL.EXECUTE(l_cursor_attr_id_val);
2252:
2253: l_rows_per_attr_grp_indx := 0;
2254:
2255: ------------------------------------------------------------------------
2256: -- Loop for each row found in EBI
2257: ------------------------------------------------------------------------
2258: LOOP --LOOP FOR CURSOR_ATTR_ID_VAL
2259:
2260: IF DBMS_SQL.FETCH_ROWS(l_cursor_attr_id_val)>0 THEN
2261:
2262: ------------------------------------------------------------------------
2263: --Increment Row Identifier per (Attribute Group + Row) Combination.
2264: ------------------------------------------------------------------------
2268:
2269: ------------------------------------------------------------------------
2270: -- First column is Transaction ID.
2271: ------------------------------------------------------------------------
2272: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2273: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2274: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2275: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2276: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2269: ------------------------------------------------------------------------
2270: -- First column is Transaction ID.
2271: ------------------------------------------------------------------------
2272: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2273: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2274: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2275: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2276: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2277: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2270: -- First column is Transaction ID.
2271: ------------------------------------------------------------------------
2272: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2273: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2274: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2275: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2276: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2277: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2278: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2271: ------------------------------------------------------------------------
2272: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2273: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2274: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2275: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2276: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2277: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2278: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2279: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2272: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2273: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2274: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2275: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2276: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2277: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2278: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2279: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2280: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2273: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2274: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2275: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2276: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2277: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2278: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2279: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2280: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2281:
2274: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2275: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2276: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2277: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2278: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2279: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2280: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2281:
2282: ------------------------------------------------------------------------
2275: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2276: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2277: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2278: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2279: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2280: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2281:
2282: ------------------------------------------------------------------------
2283: -- Loop to Bind the Data Types for the SELECT Columns.
2276: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2277: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2278: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2279: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2280: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2281:
2282: ------------------------------------------------------------------------
2283: -- Loop to Bind the Data Types for the SELECT Columns.
2284: ------------------------------------------------------------------------
2328: -- Depending upon the Data Type, populate corresponding field in the
2329: -- User-Defined Attribute Data record.
2330: ------------------------------------------------------------------------
2331: IF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'C') THEN
2332: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_data);
2333: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_STR := l_varchar_data;
2334: Write_Debug('String Value =>'||l_varchar_data);
2335: ELSIF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'N') THEN
2336: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_data);
2332: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_data);
2333: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_STR := l_varchar_data;
2334: Write_Debug('String Value =>'||l_varchar_data);
2335: ELSIF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'N') THEN
2336: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_data);
2337: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_NUM := l_number_data;
2338: Write_Debug('Number Value =>'||l_number_data);
2339: ELSE --IF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'D') THEN
2340: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_data);
2336: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_data);
2337: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_NUM := l_number_data;
2338: Write_Debug('Number Value =>'||l_number_data);
2339: ELSE --IF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'D') THEN
2340: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_data);
2341: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_DATE := l_date_data;
2342: Write_Debug('Date Value =>'||l_date_data);
2343: END IF; --end: IF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'C') THEN
2344:
2372: CLOSE c_attr_grp_n_attr_int_names;
2373:
2374: END LOOP; --end: FOR i IN 1..l_attr_id_table.COUNT LOOP
2375:
2376: ELSE --end: IF DBMS_SQL.FETCH_ROWS(l_cursor_attr_id_val)>0 THEN
2377:
2378: Write_Debug('Nothing Found (or) Done.');
2379: EXIT;
2380:
2377:
2378: Write_Debug('Nothing Found (or) Done.');
2379: EXIT;
2380:
2381: END IF; --IF DBMS_SQL.FETCH_ROWS(l_cursor_attr_id_val)>0 THEN
2382:
2383: END LOOP; --END: LOOP FOR CURSOR_ATTR_ID_VAL
2384:
2385: l_attr_id_table.DELETE;
2385: l_attr_id_table.DELETE;
2386: l_intf_col_name_table.DELETE;
2387:
2388:
2389: DBMS_SQL.CLOSE_CURSOR(l_cursor_attr_id_val);
2390:
2391: -------------------------------------------------------------------
2392: -- Loop for all the rows to be inserted per Attribute Group.
2393: -------------------------------------------------------------------