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
654: -- Constant Values
655: G_DEL_GROUP_NAME VARCHAR2(10) := 'B_BLK_INTF';
656: G_DEL_GROUP_DESC VARCHAR2(240) := 'Delete Group for EGO BOM Bulkload Structures';
657:
658: l_bom_header_columns_tbl DBMS_SQL.VARCHAR2_TABLE;
659:
660: -- Variables for RDs
661: L_SRCSYS_ITEM VARCHAR2(240);
662: L_COMP_REF_DESIG VARCHAR2(3000); --Changed size from 240 to 3000 support larger size of reference designators
1145: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.1-->' || l_dyn_sql_cursor);
1146: END IF;
1147:
1148:
1149: l_cursor_select := Dbms_Sql.Open_Cursor;
1150: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1151: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1152: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1153: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1146: END IF;
1147:
1148:
1149: l_cursor_select := Dbms_Sql.Open_Cursor;
1150: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1151: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1152: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1153: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1154: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1147:
1148:
1149: l_cursor_select := Dbms_Sql.Open_Cursor;
1150: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1151: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1152: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1153: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1154: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1155: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1148:
1149: l_cursor_select := Dbms_Sql.Open_Cursor;
1150: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1151: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1152: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1153: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1154: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1155: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1156: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1149: l_cursor_select := Dbms_Sql.Open_Cursor;
1150: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1151: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1152: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1153: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1154: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1155: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1156: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1157: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1150: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1151: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1152: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1153: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1154: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1155: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1156: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1157: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1158: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1151: Dbms_Sql.Define_Column(l_cursor_select, 1, L_SRCSYS_PARENT,3000);
1152: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1153: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1154: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1155: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1156: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1157: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1158: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1159: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1152: Dbms_Sql.Define_Column(l_cursor_select, 2, L_PARENT_NAME, 3000);
1153: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1154: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1155: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1156: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1157: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1158: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1159: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1160: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1153: Dbms_Sql.Define_Column(l_cursor_select, 3, L_ORGANIZATION_CODE, 10);
1154: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1155: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1156: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1157: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1158: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1159: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1160: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1161:
1154: Dbms_Sql.Define_Column(l_cursor_select, 4, L_STRUCTURE_NAME, 240);
1155: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1156: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1157: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1158: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1159: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1160: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1161:
1162: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1155: Dbms_Sql.Define_Column(l_cursor_select, 5, L_STR_TYPE_NAME, 240);
1156: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1157: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1158: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1159: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1160: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1161:
1162: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1163: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1156: Dbms_Sql.Define_Column(l_cursor_select, 6, L_EFFEC_CONTROL, 240);
1157: Dbms_Sql.Define_Column(l_cursor_select, 7, L_IS_PREF_MEANING, 80);
1158: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1159: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1160: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1161:
1162: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1163: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1164: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1158: Dbms_Sql.Define_Column(l_cursor_select, 8, L_ASSTYPE_MEANING, 80);
1159: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1160: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1161:
1162: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1163: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1164: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1165: Dbms_Sql.Bind_Variable(l_cursor_select,':4', p_resultfmt_usage_id);
1166:
1159: Dbms_Sql.Define_Column(l_cursor_select, 9, L_PARENT_REVISION, 80);
1160: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1161:
1162: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1163: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1164: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1165: Dbms_Sql.Bind_Variable(l_cursor_select,':4', p_resultfmt_usage_id);
1166:
1167: IF l_debug = 'Y' THEN
1160: Dbms_Sql.Define_Column(l_cursor_select, 10, L_TRANSACTION_ID);
1161:
1162: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1163: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1164: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1165: Dbms_Sql.Bind_Variable(l_cursor_select,':4', p_resultfmt_usage_id);
1166:
1167: IF l_debug = 'Y' THEN
1168: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.2-->' || p_resultfmt_usage_id);
1161:
1162: Dbms_Sql.Bind_Variable(l_cursor_select,':1', p_batch_id);
1163: Dbms_Sql.Bind_Variable(l_cursor_select,':2', p_batch_id);
1164: Dbms_Sql.Bind_Variable(l_cursor_select,':3', p_batch_id);
1165: Dbms_Sql.Bind_Variable(l_cursor_select,':4', p_resultfmt_usage_id);
1166:
1167: IF l_debug = 'Y' THEN
1168: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.2-->' || p_resultfmt_usage_id);
1169: END IF;
1167: IF l_debug = 'Y' THEN
1168: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 2.2-->' || p_resultfmt_usage_id);
1169: END IF;
1170:
1171: l_cursor_execute := Dbms_Sql.EXECUTE(l_cursor_select);
1172:
1173: IF l_debug = 'Y' THEN
1174: FND_FILE.PUT_LINE( FND_FILE.LOG,'SUCCESS');
1175: END IF;
1174: FND_FILE.PUT_LINE( FND_FILE.LOG,'SUCCESS');
1175: END IF;
1176: i := 1;
1177: LOOP
1178: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1179: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1180: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1181: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1182: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1175: END IF;
1176: i := 1;
1177: LOOP
1178: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1179: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1180: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1181: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1182: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1183: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1176: i := 1;
1177: LOOP
1178: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1179: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1180: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1181: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1182: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1183: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1184: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1177: LOOP
1178: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1179: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1180: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1181: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1182: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1183: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1184: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1185: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1178: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1179: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1180: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1181: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1182: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1183: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1184: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1185: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1186: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1179: Dbms_Sql.Column_Value(l_cursor_select,1,L_SRCSYS_PARENT);
1180: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1181: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1182: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1183: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1184: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1185: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1186: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1187: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1180: Dbms_Sql.Column_Value(l_cursor_select,2,L_PARENT_NAME);
1181: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1182: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1183: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1184: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1185: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1186: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1187: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1188: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1181: Dbms_Sql.Column_Value(l_cursor_select,3,L_ORGANIZATION_CODE);
1182: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1183: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1184: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1185: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1186: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1187: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1188: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1189:
1182: Dbms_Sql.Column_Value(l_cursor_select,4,L_STRUCTURE_NAME);
1183: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1184: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1185: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1186: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1187: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1188: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1189:
1190: IF L_EFFEC_CONTROL IS NOT NULL
1183: Dbms_Sql.Column_Value(l_cursor_select,5,L_STR_TYPE_NAME);
1184: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1185: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1186: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1187: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1188: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1189:
1190: IF L_EFFEC_CONTROL IS NOT NULL
1191: THEN
1184: Dbms_Sql.Column_Value(l_cursor_select,6,L_EFFEC_CONTROL);
1185: Dbms_Sql.Column_Value(l_cursor_select,7,L_IS_PREF_MEANING);
1186: Dbms_Sql.Column_Value(l_cursor_select,8,L_ASSTYPE_MEANING);
1187: Dbms_Sql.Column_Value(l_cursor_select,9,L_PARENT_REVISION);
1188: Dbms_Sql.Column_Value(l_cursor_select,10,L_TRANSACTION_ID);
1189:
1190: IF L_EFFEC_CONTROL IS NOT NULL
1191: THEN
1192: SELECT
1428: FND_FILE.PUT_LINE( FND_FILE.LOG,'Entering SQL 3-->' || l_dyn_sql);
1429: END IF;
1430:
1431:
1432: Dbms_Sql.Close_Cursor(l_cursor_select);
1433: -- End of Creating Structure Header record if that is not available.
1434:
1435: l_dyn_sql_insert := '';
1436: l_dyn_sql_insert := l_dyn_sql_insert || 'INSERT INTO BOM_INVENTORY_COMPS_INTERFACE ( BATCH_ID, ';
1731: l_dyn_sql_cursor := l_dyn_sql_cursor || ' OR UPPER(Transaction_Type) = ''' || G_TXN_UPDATE || ''' OR UPPER(Transaction_Type) = ''' || G_TXN_SYNC || ''' )';
1732:
1733: Write_Debug('Entering SQL R.1' || l_dyn_sql_cursor);
1734:
1735: l_cursor_select := Dbms_Sql.Open_Cursor;
1736: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1737: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1738: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1739: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1732:
1733: Write_Debug('Entering SQL R.1' || l_dyn_sql_cursor);
1734:
1735: l_cursor_select := Dbms_Sql.Open_Cursor;
1736: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1737: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1738: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1739: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1740: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1733: Write_Debug('Entering SQL R.1' || l_dyn_sql_cursor);
1734:
1735: l_cursor_select := Dbms_Sql.Open_Cursor;
1736: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1737: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1738: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1739: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1740: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1741: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1734:
1735: l_cursor_select := Dbms_Sql.Open_Cursor;
1736: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1737: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1738: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1739: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1740: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1741: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1742: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1735: l_cursor_select := Dbms_Sql.Open_Cursor;
1736: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1737: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1738: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1739: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1740: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1741: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1742: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1743: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1736: Dbms_Sql.Parse(l_cursor_select, l_dyn_sql_cursor, Dbms_Sql.NATIVE);
1737: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1738: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1739: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1740: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1741: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1742: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1743: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1744: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1737: Dbms_Sql.Define_Column(l_cursor_select, 1, L_ITEM_NAME, 3000);
1738: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1739: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1740: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1741: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1742: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1743: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1744: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1745: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1738: Dbms_Sql.Define_Column(l_cursor_select, 2, L_SRCSYS_ITEM, 3000);
1739: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1740: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1741: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1742: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1743: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1744: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1745: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1746:
1739: Dbms_Sql.Define_Column(l_cursor_select, 3, L_PARENT_NAME, 3000);
1740: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1741: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1742: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1743: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1744: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1745: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1746:
1747: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1740: Dbms_Sql.Define_Column(l_cursor_select, 4, L_SRCSYS_PARENT,3000);
1741: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1742: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1743: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1744: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1745: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1746:
1747: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1748:
1741: Dbms_Sql.Define_Column(l_cursor_select, 5, L_ORGANIZATION_CODE, 10);
1742: Dbms_Sql.Define_Column(l_cursor_select, 6, L_STRUCTURE_NAME, 240);
1743: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1744: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1745: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1746:
1747: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1748:
1749: Write_Debug('Entering SQL R.2' || p_resultfmt_usage_id);
1743: Dbms_Sql.Define_Column(l_cursor_select, 7, L_COMP_REF_DESIG, 3000);
1744: Dbms_Sql.Define_Column(l_cursor_select, 8, L_TRANSACTION_ID);
1745: Dbms_Sql.Define_Column(l_cursor_select, 9, L_TRNSACTION_TYPE, 30);
1746:
1747: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1748:
1749: Write_Debug('Entering SQL R.2' || p_resultfmt_usage_id);
1750:
1751: l_cursor_execute := Dbms_Sql.EXECUTE(l_cursor_select);
1747: Dbms_Sql.Bind_Variable(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
1748:
1749: Write_Debug('Entering SQL R.2' || p_resultfmt_usage_id);
1750:
1751: l_cursor_execute := Dbms_Sql.EXECUTE(l_cursor_select);
1752:
1753: Write_Debug('Success -- RegDesig Cursor execution');
1754:
1755: LOOP
1752:
1753: Write_Debug('Success -- RegDesig Cursor execution');
1754:
1755: LOOP
1756: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1757: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1758: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1759: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1760: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1753: Write_Debug('Success -- RegDesig Cursor execution');
1754:
1755: LOOP
1756: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1757: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1758: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1759: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1760: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1761: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1754:
1755: LOOP
1756: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1757: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1758: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1759: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1760: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1761: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1762: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1755: LOOP
1756: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1757: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1758: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1759: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1760: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1761: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1762: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1763: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1756: IF (Dbms_Sql.Fetch_Rows(l_cursor_select) > 0) THEN
1757: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1758: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1759: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1760: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1761: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1762: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1763: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1764: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1757: Dbms_Sql.Column_Value(l_cursor_select,1,L_ITEM_NAME);
1758: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1759: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1760: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1761: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1762: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1763: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1764: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1765: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1758: Dbms_Sql.Column_Value(l_cursor_select,2,L_SRCSYS_ITEM);
1759: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1760: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1761: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1762: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1763: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1764: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1765: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1766:
1759: Dbms_Sql.Column_Value(l_cursor_select,3,L_PARENT_NAME);
1760: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1761: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1762: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1763: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1764: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1765: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1766:
1767:
1760: Dbms_Sql.Column_Value(l_cursor_select,4,L_SRCSYS_PARENT);
1761: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1762: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1763: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1764: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1765: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1766:
1767:
1768: getListOfRefDesigs(L_COMP_REF_DESIG, l_comp_ref_desig_tbl);
1761: Dbms_Sql.Column_Value(l_cursor_select,5,L_ORGANIZATION_CODE);
1762: Dbms_Sql.Column_Value(l_cursor_select,6,L_STRUCTURE_NAME);
1763: Dbms_Sql.Column_Value(l_cursor_select,7,L_COMP_REF_DESIG);
1764: Dbms_Sql.Column_Value(l_cursor_select,8,L_TRANSACTION_ID);
1765: Dbms_Sql.Column_Value(l_cursor_select,9,L_TRNSACTION_TYPE);
1766:
1767:
1768: getListOfRefDesigs(L_COMP_REF_DESIG, l_comp_ref_desig_tbl);
1769: FOR I IN 1..l_comp_ref_desig_tbl.COUNT LOOP
1798: EXIT;
1799: END IF;
1800: END LOOP;
1801:
1802: Dbms_Sql.Close_Cursor(l_cursor_select);
1803: END IF;
1804:
1805: UPDATE BOM_REF_DESGS_INTERFACE BRDI
1806: SET(effectivity_date, operation_seq_num, from_end_item_unit_number, component_sequence_id, assembly_item_revision_code)
2078: l_str_type_id NUMBER;
2079: l_prod_col_name_tbl VARCHAR_TBL_TYPE;
2080: l_intf_col_name_tbl VARCHAR_TBL_TYPE;
2081:
2082: l_attr_id_table DBMS_SQL.NUMBER_TABLE;
2083: l_intf_col_name_table DBMS_SQL.VARCHAR2_TABLE;
2084:
2085: l_usr_attr_data_tbl L_USER_ATTR_TBL_TYPE;
2086:
2079: l_prod_col_name_tbl VARCHAR_TBL_TYPE;
2080: l_intf_col_name_tbl VARCHAR_TBL_TYPE;
2081:
2082: l_attr_id_table DBMS_SQL.NUMBER_TABLE;
2083: l_intf_col_name_table DBMS_SQL.VARCHAR2_TABLE;
2084:
2085: l_usr_attr_data_tbl L_USER_ATTR_TBL_TYPE;
2086:
2087: l_bill_sequence_id_char VARCHAR(30);
2120: l_number_data NUMBER;
2121: l_date_data DATE;
2122:
2123: ---------------------------------------------------------
2124: -- DBMS_SQL Open Cursor integers.
2125: ---------------------------------------------------------
2126: l_cursor_select INTEGER;
2127: l_cursor_execute INTEGER;
2128: l_cursor_attr_id_val INTEGER;
2195: -- P4T Bug 8371175 end
2196:
2197: Write_Debug(l_dyn_sql);
2198:
2199: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2200: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2201: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2202: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2203: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2196:
2197: Write_Debug(l_dyn_sql);
2198:
2199: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2200: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2201: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2202: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2203: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2204: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2197: Write_Debug(l_dyn_sql);
2198:
2199: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2200: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2201: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2202: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2203: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2204: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2205: -- P4T Bug 8371175 start
2198:
2199: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2200: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2201: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2202: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2203: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2204: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2205: -- P4T Bug 8371175 start
2206: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE_O', c_attr_grp_rec.attr_group_id||'$$%_O');
2199: l_cursor_select := DBMS_SQL.OPEN_CURSOR;
2200: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2201: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2202: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2203: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2204: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2205: -- P4T Bug 8371175 start
2206: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE_O', c_attr_grp_rec.attr_group_id||'$$%_O');
2207: -- P4T Bug 8371175 end
2200: DBMS_SQL.PARSE(l_cursor_select, l_dyn_sql, DBMS_SQL.NATIVE);
2201: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 1,l_attr_id_table,2500, l_temp);
2202: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2203: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2204: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2205: -- P4T Bug 8371175 start
2206: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE_O', c_attr_grp_rec.attr_group_id||'$$%_O');
2207: -- P4T Bug 8371175 end
2208:
2202: DBMS_SQL.DEFINE_ARRAY(l_cursor_select, 2,l_intf_col_name_table,2500, l_temp);
2203: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':RESULTFMT_USAGE_ID', p_resultfmt_usage_id);
2204: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE', c_attr_grp_rec.attr_group_id||'$$%');
2205: -- P4T Bug 8371175 start
2206: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE_O', c_attr_grp_rec.attr_group_id||'$$%_O');
2207: -- P4T Bug 8371175 end
2208:
2209: l_cursor_execute := DBMS_SQL.EXECUTE(l_cursor_select);
2210:
2205: -- P4T Bug 8371175 start
2206: DBMS_SQL.BIND_VARIABLE(l_cursor_select,':ATTRIBUTE_CODE_O', c_attr_grp_rec.attr_group_id||'$$%_O');
2207: -- P4T Bug 8371175 end
2208:
2209: l_cursor_execute := DBMS_SQL.EXECUTE(l_cursor_select);
2210:
2211:
2212: /*
2213: --------------------------------------------------------------------
2224: */
2225:
2226:
2227: Write_Debug('About to start the Loop to fetch Rows');
2228: l_count := DBMS_SQL.FETCH_ROWS(l_cursor_select);
2229: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 1, l_attr_id_table);
2230: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 2, l_intf_col_name_table);
2231: Write_Debug('Retrieved rows => '||To_char(l_count));
2232: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2225:
2226:
2227: Write_Debug('About to start the Loop to fetch Rows');
2228: l_count := DBMS_SQL.FETCH_ROWS(l_cursor_select);
2229: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 1, l_attr_id_table);
2230: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 2, l_intf_col_name_table);
2231: Write_Debug('Retrieved rows => '||To_char(l_count));
2232: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2233:
2226:
2227: Write_Debug('About to start the Loop to fetch Rows');
2228: l_count := DBMS_SQL.FETCH_ROWS(l_cursor_select);
2229: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 1, l_attr_id_table);
2230: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 2, l_intf_col_name_table);
2231: Write_Debug('Retrieved rows => '||To_char(l_count));
2232: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2233:
2234: --------------------------------------------------------------------
2228: l_count := DBMS_SQL.FETCH_ROWS(l_cursor_select);
2229: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 1, l_attr_id_table);
2230: DBMS_SQL.COLUMN_VALUE(l_cursor_select, 2, l_intf_col_name_table);
2231: Write_Debug('Retrieved rows => '||To_char(l_count));
2232: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2233:
2234: --------------------------------------------------------------------
2235: -- New DBMS_SQL Cursor for Select Attr Values.
2236: --------------------------------------------------------------------
2231: Write_Debug('Retrieved rows => '||To_char(l_count));
2232: DBMS_SQL.CLOSE_CURSOR(l_cursor_select);
2233:
2234: --------------------------------------------------------------------
2235: -- New DBMS_SQL Cursor for Select Attr Values.
2236: --------------------------------------------------------------------
2237: l_cursor_attr_id_val := DBMS_SQL.OPEN_CURSOR;
2238: l_dyn_attr_id_val_sql := '';
2239: l_dyn_attr_id_val_sql := ' SELECT ';
2233:
2234: --------------------------------------------------------------------
2235: -- New DBMS_SQL Cursor for Select Attr Values.
2236: --------------------------------------------------------------------
2237: l_cursor_attr_id_val := DBMS_SQL.OPEN_CURSOR;
2238: l_dyn_attr_id_val_sql := '';
2239: l_dyn_attr_id_val_sql := ' SELECT ';
2240: l_dyn_attr_id_val_sql := l_dyn_attr_id_val_sql || ' TRANSACTION_ID , ';
2241: l_dyn_attr_id_val_sql := l_dyn_attr_id_val_sql || ' INSTANCE_PK4_VALUE , ';
2265: l_dyn_attr_id_val_sql := l_dyn_attr_id_val_sql || ' AND PROCESS_STATUS = :PROCESS_STATUS ';
2266:
2267: Write_Debug(l_dyn_attr_id_val_sql);
2268:
2269: DBMS_SQL.PARSE(l_cursor_attr_id_val, l_dyn_attr_id_val_sql, DBMS_SQL.NATIVE);
2270: --------------------------------------------------------------------
2271: --Setting Data Type for Trasaction ID
2272: --------------------------------------------------------------------
2273: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 1, l_number_example);
2269: DBMS_SQL.PARSE(l_cursor_attr_id_val, l_dyn_attr_id_val_sql, DBMS_SQL.NATIVE);
2270: --------------------------------------------------------------------
2271: --Setting Data Type for Trasaction ID
2272: --------------------------------------------------------------------
2273: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 1, l_number_example);
2274:
2275: --------------------------------------------------------------------
2276: --Setting Data Type for INSTANCE_PK4_VALUE (Bill Sequence Id)
2277: --------------------------------------------------------------------
2274:
2275: --------------------------------------------------------------------
2276: --Setting Data Type for INSTANCE_PK4_VALUE (Bill Sequence Id)
2277: --------------------------------------------------------------------
2278: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 2, l_varchar_example, 1000);
2279:
2280: --------------------------------------------------------------------
2281: --Setting Data Type for INSTANCE_PK2_VALUE (Component Sequence Id)
2282: --------------------------------------------------------------------
2279:
2280: --------------------------------------------------------------------
2281: --Setting Data Type for INSTANCE_PK2_VALUE (Component Sequence Id)
2282: --------------------------------------------------------------------
2283: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 3, l_varchar_example, 1000);
2284:
2285: --Setting Data Type for Source System Id
2286: --------------------------------------------------------------------
2287: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 4, l_number_example);
2283: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 3, l_varchar_example, 1000);
2284:
2285: --Setting Data Type for Source System Id
2286: --------------------------------------------------------------------
2287: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 4, l_number_example);
2288:
2289: --------------------------------------------------------------------
2290: --Setting Data Type for Source System Reference
2291: --------------------------------------------------------------------
2288:
2289: --------------------------------------------------------------------
2290: --Setting Data Type for Source System Reference
2291: --------------------------------------------------------------------
2292: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 5, l_varchar_example, 1000);
2293:
2294: --------------------------------------------------------------------
2295: --Setting Data Type for Component Item Number
2296: --------------------------------------------------------------------
2293:
2294: --------------------------------------------------------------------
2295: --Setting Data Type for Component Item Number
2296: --------------------------------------------------------------------
2297: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 6, l_varchar_example, 1000);
2298:
2299: --------------------------------------------------------------------
2300: --Setting Data Type for Organziation Code
2301: --------------------------------------------------------------------
2298:
2299: --------------------------------------------------------------------
2300: --Setting Data Type for Organziation Code
2301: --------------------------------------------------------------------
2302: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 7, l_varchar_example, 1000);
2303:
2304: --------------------------------------------------------------------
2305: --Setting Data Type for Parent Source System Reference
2306: --------------------------------------------------------------------
2303:
2304: --------------------------------------------------------------------
2305: --Setting Data Type for Parent Source System Reference
2306: --------------------------------------------------------------------
2307: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 8, l_varchar_example, 1000);
2308:
2309: --------------------------------------------------------------------
2310: --Setting Data Type for Assembly Item Number
2311: --------------------------------------------------------------------
2308:
2309: --------------------------------------------------------------------
2310: --Setting Data Type for Assembly Item Number
2311: --------------------------------------------------------------------
2312: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, 9, l_varchar_example, 1000);
2313:
2314: --------------------------------------------------------------------
2315: -- Loop to Bind the Data Types for the SELECT Columns.
2316: --------------------------------------------------------------------
2328: ------------------------------------------------------------------------
2329: -- Based on the Data Type of the attribute, define the column
2330: ------------------------------------------------------------------------
2331: IF (l_data_type_code = 'C') THEN
2332: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_example, 1000);
2333: ELSIF (l_data_type_code = 'N') THEN
2334: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_example);
2335: ELSE --IF (l_data_type_code = 'D') THEN
2336: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_example);
2330: ------------------------------------------------------------------------
2331: IF (l_data_type_code = 'C') THEN
2332: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_example, 1000);
2333: ELSIF (l_data_type_code = 'N') THEN
2334: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_example);
2335: ELSE --IF (l_data_type_code = 'D') THEN
2336: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_example);
2337: END IF; --IF (l_data_type_code = 'C') THEN
2338:
2332: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_example, 1000);
2333: ELSIF (l_data_type_code = 'N') THEN
2334: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_example);
2335: ELSE --IF (l_data_type_code = 'D') THEN
2336: DBMS_SQL.DEFINE_COLUMN(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_example);
2337: END IF; --IF (l_data_type_code = 'C') THEN
2338:
2339: END LOOP; --FOR i IN 1..l_attr_id_table.COUNT LOOP
2340:
2337: END IF; --IF (l_data_type_code = 'C') THEN
2338:
2339: END LOOP; --FOR i IN 1..l_attr_id_table.COUNT LOOP
2340:
2341: DBMS_SQL.BIND_VARIABLE(l_cursor_attr_id_val,':RESULTFMT_USAGE_ID',p_resultfmt_usage_id);
2342:
2343: write_debug('Binding the PROCESS_STATUS = '||G_INTF_STATUS_TOBE_PROCESS);
2344: DBMS_SQL.BIND_VARIABLE(l_cursor_attr_id_val,':PROCESS_STATUS',G_INTF_STATUS_TOBE_PROCESS);
2345:
2340:
2341: DBMS_SQL.BIND_VARIABLE(l_cursor_attr_id_val,':RESULTFMT_USAGE_ID',p_resultfmt_usage_id);
2342:
2343: write_debug('Binding the PROCESS_STATUS = '||G_INTF_STATUS_TOBE_PROCESS);
2344: DBMS_SQL.BIND_VARIABLE(l_cursor_attr_id_val,':PROCESS_STATUS',G_INTF_STATUS_TOBE_PROCESS);
2345:
2346: ------------------------------------------------------------------------
2347: -- Execute to get the Item User-Defined Attr values.
2348: ------------------------------------------------------------------------
2345:
2346: ------------------------------------------------------------------------
2347: -- Execute to get the Item User-Defined Attr values.
2348: ------------------------------------------------------------------------
2349: l_cursor_execute := DBMS_SQL.EXECUTE(l_cursor_attr_id_val);
2350:
2351: l_rows_per_attr_grp_indx := 0;
2352:
2353: ------------------------------------------------------------------------
2354: -- Loop for each row found in EBI
2355: ------------------------------------------------------------------------
2356: LOOP --LOOP FOR CURSOR_ATTR_ID_VAL
2357:
2358: IF DBMS_SQL.FETCH_ROWS(l_cursor_attr_id_val)>0 THEN
2359:
2360: ------------------------------------------------------------------------
2361: --Increment Row Identifier per (Attribute Group + Row) Combination.
2362: ------------------------------------------------------------------------
2366:
2367: ------------------------------------------------------------------------
2368: -- First column is Transaction ID.
2369: ------------------------------------------------------------------------
2370: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2371: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2372: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2373: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2374: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2367: ------------------------------------------------------------------------
2368: -- First column is Transaction ID.
2369: ------------------------------------------------------------------------
2370: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2371: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2372: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2373: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2374: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2375: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2368: -- First column is Transaction ID.
2369: ------------------------------------------------------------------------
2370: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2371: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2372: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2373: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2374: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2375: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2376: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2369: ------------------------------------------------------------------------
2370: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2371: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2372: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2373: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2374: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2375: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2376: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2377: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2370: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 1, l_transaction_id);
2371: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2372: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2373: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2374: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2375: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2376: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2377: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2378: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2371: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 2, l_bill_sequence_id_char);
2372: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2373: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2374: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2375: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2376: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2377: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2378: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2379:
2372: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 3, l_component_sequence_id_char);
2373: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2374: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2375: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2376: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2377: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2378: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2379:
2380: ------------------------------------------------------------------------
2373: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 4, l_source_system_id);
2374: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2375: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2376: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2377: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2378: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2379:
2380: ------------------------------------------------------------------------
2381: -- Loop to Bind the Data Types for the SELECT Columns.
2374: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 5, l_source_system_ref);
2375: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 6, l_comp_item_num);
2376: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 7, l_org_code);
2377: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 8, l_par_reference);
2378: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, 9, l_assembly_item_num);
2379:
2380: ------------------------------------------------------------------------
2381: -- Loop to Bind the Data Types for the SELECT Columns.
2382: ------------------------------------------------------------------------
2426: -- Depending upon the Data Type, populate corresponding field in the
2427: -- User-Defined Attribute Data record.
2428: ------------------------------------------------------------------------
2429: IF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'C') THEN
2430: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_data);
2431: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_STR := l_varchar_data;
2432: Write_Debug('String Value =>'||l_varchar_data);
2433: ELSIF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'N') THEN
2434: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_data);
2430: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_varchar_data);
2431: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_STR := l_varchar_data;
2432: Write_Debug('String Value =>'||l_varchar_data);
2433: ELSIF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'N') THEN
2434: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_data);
2435: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_NUM := l_number_data;
2436: Write_Debug('Number Value =>'||l_number_data);
2437: ELSE --IF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'D') THEN
2438: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_data);
2434: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_number_data);
2435: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_NUM := l_number_data;
2436: Write_Debug('Number Value =>'||l_number_data);
2437: ELSE --IF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'D') THEN
2438: DBMS_SQL.COLUMN_VALUE(l_cursor_attr_id_val, l_actual_userattr_indx, l_date_data);
2439: l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_VALUE_DATE := l_date_data;
2440: Write_Debug('Date Value =>'||l_date_data);
2441: END IF; --end: IF (l_usr_attr_data_tbl(l_rows_per_attr_grp_indx).ATTR_DATATYPE_CODE = 'C') THEN
2442:
2470: CLOSE c_attr_grp_n_attr_int_names;
2471:
2472: END LOOP; --end: FOR i IN 1..l_attr_id_table.COUNT LOOP
2473:
2474: ELSE --end: IF DBMS_SQL.FETCH_ROWS(l_cursor_attr_id_val)>0 THEN
2475:
2476: Write_Debug('Nothing Found (or) Done.');
2477: EXIT;
2478:
2475:
2476: Write_Debug('Nothing Found (or) Done.');
2477: EXIT;
2478:
2479: END IF; --IF DBMS_SQL.FETCH_ROWS(l_cursor_attr_id_val)>0 THEN
2480:
2481: END LOOP; --END: LOOP FOR CURSOR_ATTR_ID_VAL
2482:
2483: l_attr_id_table.DELETE;
2483: l_attr_id_table.DELETE;
2484: l_intf_col_name_table.DELETE;
2485:
2486:
2487: DBMS_SQL.CLOSE_CURSOR(l_cursor_attr_id_val);
2488:
2489: -------------------------------------------------------------------
2490: -- Loop for all the rows to be inserted per Attribute Group.
2491: -------------------------------------------------------------------