1262: l_cat_name VARCHAR2(240);
1263:
1264: CURSOR c_dup_prod_asgn IS
1265: SELECT code_combination_id, count(*) cnt
1266: FROM fii_gl_ccid_prod_int
1267: GROUP BY code_combination_id
1268: HAVING count(*) > 1;
1269:
1270: CURSOR c_dup_prod_cat (p_ccid NUMBER) IS
1268: HAVING count(*) > 1;
1269:
1270: CURSOR c_dup_prod_cat (p_ccid NUMBER) IS
1271: SELECT cat.description cat_name
1272: FROM fii_gl_ccid_prod_int int,
1273: mtl_categories cat
1274: WHERE int.code_combination_id = p_ccid
1275: AND int.prod_category_id = cat.category_id;
1276:
1279: If g_debug_flag = 'Y' then
1280: FII_MESSAGE.Func_Ent('FII_GL_CCID_C.USE_RANGES');
1281: End if;
1282:
1283: g_phase := 'Populating FII_GL_CCID_PROD_INT';
1284: If g_debug_flag = 'Y' then
1285: FII_UTIL.Write_Log(g_phase);
1286: End if;
1287:
1288: ---------------------------------------------------
1289: -- Product mapping information is actually stored
1290: -- in FII_PRODUCT_ASSIGNMENTS table.
1291: -- We will first store the CCID, product mapping
1292: -- info in FII_GL_CCID_PROD_INT
1293: ---------------------------------------------------
1294: l_stmt := 'INSERT INTO FII_GL_CCID_PROD_INT (
1295: code_combination_id,
1296: prod_category_id,
1290: -- in FII_PRODUCT_ASSIGNMENTS table.
1291: -- We will first store the CCID, product mapping
1292: -- info in FII_GL_CCID_PROD_INT
1293: ---------------------------------------------------
1294: l_stmt := 'INSERT INTO FII_GL_CCID_PROD_INT (
1295: code_combination_id,
1296: prod_category_id,
1297: last_update_date,
1298: last_updated_by,
1382: EXECUTE IMMEDIATE l_stmt using p_coa_id, G_PROD_CAT_SET_ID;
1383:
1384: If g_debug_flag = 'Y' then
1385: FII_UTIL.Write_Log('Inserted Product Assignments for ' || SQL%ROWCOUNT
1386: || ' records in FII_GL_CCID_PROD_INT');
1387: FII_UTIL.stop_timer;
1388: FII_UTIL.print_timer('Duration');
1389: End if;
1390:
1458:
1459: UPDATE fii_gl_ccid_dimensions glcc
1460: SET glcc.PROD_CATEGORY_ID =
1461: (SELECT NVL(int.prod_category_id, glcc.prod_category_id)
1462: FROM fii_gl_ccid_prod_int int
1463: WHERE int.code_combination_id = glcc.code_combination_id
1464: AND glcc.chart_of_accounts_id = p_coa_id)
1465: WHERE glcc.chart_of_accounts_id = p_coa_id;
1466:
2286:
2287: ---------------------------------------------------
2288: -- Clean up temporary tables used by the program
2289: ---------------------------------------------------
2290: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_PROD_INT', g_fii_schema, g_retcode);
2291:
2292: ---------------------------------------------------
2293: -- Inserting the basic items into FII_CHANGE_LOG if
2294: -- they have not been inserted
2376:
2377: ---------------------------------------------------
2378: -- Clean up temporary tables before exit
2379: ---------------------------------------------------
2380: g_phase := 'TRUNCATE FII_GL_CCID_PROD_INT';
2381:
2382: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_PROD_INT', g_fii_schema, g_retcode);
2383:
2384: ------------------------------------------------------
2378: -- Clean up temporary tables before exit
2379: ---------------------------------------------------
2380: g_phase := 'TRUNCATE FII_GL_CCID_PROD_INT';
2381:
2382: FII_UTIL.TRUNCATE_TABLE ('FII_GL_CCID_PROD_INT', g_fii_schema, g_retcode);
2383:
2384: ------------------------------------------------------
2385: -- We have finished the data processing for CCID table
2386: -- it is a logical point to commit.