1468: ,p_business_group_name => p_business_group_name);
1469: end if;
1470: end;
1471: --
1472: -- DK Resolve from Table BEN_PGM_F
1473: --
1474: procedure get_dk_frm_pgm (p_business_group_name in VARCHAR2
1475: ,p_source_id in NUMBER
1476: ,p_resolve_mapping_id out nocopy NUMBER) is
1474: procedure get_dk_frm_pgm (p_business_group_name in VARCHAR2
1475: ,p_source_id in NUMBER
1476: ,p_resolve_mapping_id out nocopy NUMBER) is
1477: --
1478: -- cursor to Fetch the DK for BEN_PGM_F.PGM_ID
1479: --
1480: cursor csr_get_dk_pgm is
1481: select name
1482: from ben_pgm_f
1478: -- cursor to Fetch the DK for BEN_PGM_F.PGM_ID
1479: --
1480: cursor csr_get_dk_pgm is
1481: select name
1482: from ben_pgm_f
1483: where pgm_id = p_source_id;
1484:
1485: -- Declare local variables
1486: l_proc varchar2(72) := g_package || 'get_dk_frm_pgm';
1485: -- Declare local variables
1486: l_proc varchar2(72) := g_package || 'get_dk_frm_pgm';
1487: l_row_fetched boolean := FALSE;
1488: l_table_rec csr_get_dk_pgm%rowtype;
1489: l_table_name varchar2(30) := 'BEN_PGM_F';
1490: l_column_name varchar2(30) := 'PGM_ID';
1491: l_resolve_mapping_id ben_dm_resolve_mappings.resolve_mapping_id%type;
1492:
1493: begin