[Home] [Help]
1402: ben_dm_utility.message('INFO','Leaving : ' || l_proc,5) ;
1403: end;
1404:
1405: --
1406: -- DK Resolve For Table BEN_PGM_F
1407: --
1408: procedure get_dk_frm_pgm is
1409: --
1410: -- cursor to Fetch the DK for BEN_PGM_F.PGM_ID
1406: -- DK Resolve For Table BEN_PGM_F
1407: --
1408: procedure get_dk_frm_pgm is
1409: --
1410: -- cursor to Fetch the DK for BEN_PGM_F.PGM_ID
1411: --
1412: cursor csr_get_dk_pgm (c_business_group_id number, c_source_key varchar2) is
1413: select pgm_id
1414: from ben_pgm_f
1410: -- cursor to Fetch the DK for BEN_PGM_F.PGM_ID
1411: --
1412: cursor csr_get_dk_pgm (c_business_group_id number, c_source_key varchar2) is
1413: select pgm_id
1414: from ben_pgm_f
1415: where name = c_source_key
1416: and business_group_id = c_business_group_id;
1417:
1418: cursor csr_get_all_pgm is
1417:
1418: cursor csr_get_all_pgm is
1419: select *
1420: from ben_dm_resolve_mappings
1421: where table_name = 'BEN_PGM_F'
1422: and target_id is null;
1423:
1424: -- Declare local variables
1425: l_proc varchar2(72) := g_package || 'get_dk_frm_pgm';
1430:
1431: begin
1432:
1433: --
1434: -- Select all rows from BEN_DM_RESOLVE_MAPPINGS for table BEN_PGM_F
1435: --
1436: ben_dm_utility.message('INFO','Entering : ' || l_proc,5) ;
1437: for x in csr_get_all_pgm loop
1438: l_bg_id := ben_dm_data_util.get_bg_id(x.business_group_name);
3180:
3181: -- DK Resolve for Table BEN_OPT_F
3182: get_dk_frm_opt;
3183:
3184: -- DK Resolve for Table BEN_PGM_F
3185: get_dk_frm_pgm;
3186:
3187: -- DK Resolve for Table BEN_PL_F
3188: get_dk_frm_pln;