嗨，

无法动态创建选择屏幕。
您可以做的是隐藏/取消隐藏选择屏幕上的某些字段或显示子选择屏幕

希望是有帮助的。

致谢，

Mateusz

编辑：寻找SELECTION-SCREEN BEGIN OF SCREEN dynnr AS 文档中的SUBSCREEN关键字

您的意思是带有"参数"和"选择选项"的选择屏幕吗？

如果是，则不需要SE51，请使用 ABAP语句SELECTION-SCREEN等。

如果否，那么我不明白这个问题。 如果需要屏幕，请定义一个屏幕。 或者您是说这是一种值得功能模块使用的通用屏幕。 您能解释一下想要哪种屏幕吗？

Gerard A ，

< p>从您的问题中可以理解，您需要根据所选的单选按钮动态修改选择屏幕。 如果是在"选择屏幕输出"事件中必须播放的情况。

我在下面编写了一个小的测试程序，则可以复制选择屏幕参数并复制下面的程序代码行。 尝试使用相同的方法创建本地程序，您可以通过在单选按钮之间切换来自己检查结果。

 ***选择屏幕

 带有标题标题文本001的块blkt的选择屏幕开始。
 参数：rbg1 RADIOBUTTON GROUP qgrp USER-COMMAND标志默认'X'，
             rbg2 RADIOBUTTON GROUP qgrp。
 块blkt的选择屏幕结束。

 带标题标题文本002的块blk1的选择屏幕开始。

 选择选项：s_blk1 for gv_blk1无间隔修改ID sc1。  "区域编号

 参数：rb1 RADIOBUTTON GROUP q1gr USER-COMMAND flagm MODIF ID sc1，
             rb2 RADIOBUTTON GROUP q1gr修改ID sc1。

 块blk1的选择屏幕结束。

 具有框架标题文本003的blk2块的选择屏幕开始。

 选择选项：s_blk2 for gv_blk2无间隔修改ID sc2。  "商店编号

 参数：rb3 RADIOBUTTON GROUP q1ga USER-COMMAND flaga默认'X'MODIF ID sc2，
             rb4 RADIOBUTTON GROUP q1ga MODIF ID sc2，
             chk TYPE c AS CHECKBOX MODIF ID sc2。

 块blk2的选择屏幕结束。


 ***代码行。 在AT SELECTION SCREEN OUTPUT处编写代码，如下所示：


 选择屏幕输出时。
   进行screen_validation。


 FORM screen_validation。
   环视屏幕。
     如果是screen-group1 EQ'SC1'和rbg2 EQ'X'。
       screen-active =" 0"。
       修改屏幕。
       继续。
     ELSEIF screen-group1 EQ'SC2'和rbg1 EQ'X'。
       screen-active =" 0"。
       修改屏幕。
       继续。
     万一。
   结局。
 ENDFORM。

致谢！

亲爱的杰拉德，

您可以尝试使用此代码

选择屏幕以块组开头 框架标题文本-s04。
 参数：p_sel1类型c单选按钮组sel用户命令upd。
 参数：p_sel2类型c单选按钮组sel。
 参数：p_sel3 c型单选按钮组sel。
 块组的选择屏幕结束。

 数据：gd_ucomm类型sy-ucomm。
 在选择屏幕上。
   gd_ucomm = sy-ucomm。  "捕获用户命令

 选择屏幕输出时。
   案例gd_ucomm。
     当" UPD"。  "单击单选按钮
       如果p_sel2等于'X'。  "如果选择了第二个单选按钮，则隐藏字段
         环视屏幕。
           如果屏幕名称为" P_UNAME"。
             screen-active =0。"从屏幕上删除字段
             修改屏幕。
           万一。
         结局。
       其他。  "其他表演场
         环视屏幕。
           如果屏幕名称为" P_UNAME"。
             screen-active =1。"显示字段
              修改屏幕。
           万一。
         结局。
       万一。
   结束。