Query to find value set name from concurrent program

  SELECT
    fcpl.user_concurrent_program_name,
    fcp.concurrent_program_name,
    fdfcuv.column_seq_num,
    fdfcuv.end_user_column_name,
    fdfcuv.form_left_prompt,
    fdfcuv.enabled_flag,
    fdfcuv.required_flag,
    fdfcuv.display_flag,
    fdfcuv.flex_value_set_id,
    ffvs.flex_value_set_name,
    flv.meaning,
    fdfcuv.default_value
FROM
    fnd_concurrent_programs      fcp,
    fnd_concurrent_programs_tl   fcpl,
    fnd_descr_flex_col_usage_vl  fdfcuv,
    fnd_flex_value_sets          ffvs,
    fnd_lookup_values            flv
WHERE
        fcp.concurrent_program_id = fcpl.concurrent_program_id
    AND fcpl.user_concurrent_program_name = 'concurrent_program_name'

    AND fdfcuv.descriptive_flexfield_name = '$SRS$.' || fcp.concurrent_program_name
    AND ffvs.flex_value_set_id = fdfcuv.flex_value_set_id
    AND flv.lookup_type (+) = 'FLEX_DEFAULT_TYPE'
    AND flv.lookup_code (+) = fdfcuv.default_type
    AND fcpl.language = userenv('LANG')
    AND flv.language (+) = userenv('LANG')
ORDER BY
    fdfcuv.column_seq_num;