Query to find value set and parameters attatched to perticular concurrent program?

SELECT  distinct

        FCPL.user_concurrent_program_name  "our Concurrent Program Name",

        FCP.concurrent_program_name "cp Short Name",

        FDFCUV.flex_value_set_id "Value Set Id",

        FFVS.flex_value_set_name "Value Set Name",

        FDFCUV.end_user_column_name "Parameter Name",

        FDFCUV.form_left_prompt "Prompt",

        FDFCUV.enabled_flag " Enabled Flag",

        FDFCUV.required_flag "Required Flag",

        FDFCUV.display_flag "Display Flag"       

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   1=1

        AND    FCP.concurrent_program_id = FCPL.concurrent_program_id

        AND    FFVS.flex_value_set_id = FDFCUV.flex_value_set_id

        AND    FLV.lookup_code(+) = FDFCUV.default_type

        AND    FDFCUV.descriptive_flexfield_name = '$SRS$.'|| FCP.concurrent_program_name

        AND    FCPL.user_concurrent_program_name = :enter_our_cp_name