loop at screen. case screen-name. when 'V_BUKRS'. screen-input = 1. modify screen. when 'V_GJAHR'. screen-input = 1. modify screen. when 'V_ZMON'. screen-input = 1. modify screen. endcase. endloop. read table tctrl_order-cols into col with key screen-name = 'ZFI017V-KOSTL...
IFp_rd2='X'AND screen-group1='MXY'. "显示 screen-active='1'. * screen-input= '1'."显示前设为可输入 screen-required='2'."外观上打钩,但不自动校验 MODIFY SCREEN. ELSEIF screen-group1='MXY'." "隐藏 screen-active='0'. screen-required='2'. MODIFY SCREEN. ENDIF. ENDLOOP. AT SELE...
exit_commandinput.data:savestatetypei.caseok_code.when'CANC'.setscreen0.leavescreen.when'BACK'.ifdatastate='X'.callfunction'POPUP_TO_CONFIRM_STEP'exportingtitel='退出维护'textline1='数据被修改。
INITIALIZATION.SSCRFIELDS-FUNCTXT_01='Button1'.SSCRFIELDS-UCOMM='FC01'.(2).修改Screen NAME“字段名称 GROUP1”字段组1 GROUP2“字段组2 GROUP3”字段组3 GROUP4“字段组4 ACTIVE”可见并准备输入的字段 REQUIRED“强制输入的字段 INPUT”字段准备输入 OUTPUT”字段仅用来显示 INTENSIFIED”高亮显示字段 INVISIB...
SAP Screen Painter 方法/步骤 1 可以通过SE80进入需要创建的程序，然后ABAP控制台点击创建--屏幕，如下图。2 也可以通过TCode：SE51实现Screen的创建和维护，输入对应的程序名称和需要新建的屏幕编号。3 注意程序1000为SAP预留屏幕号，这里自定义的屏幕号必须定义1000外的其他数字，最多不超过4位，本例定义的SAP...
screen-input = 1. when others. screen-input = 0. endcase. modify screen. endloop. ENDMODULE. MODULE receive_actual_data INPUT. ** object created ? CHECK NOT o_badi_fdcb_subbas04 IS INITIAL. * get data from main screen CALL METHOD o_badi_fdcb_subbas04->get_data_from_screen_object ...
PROCESS AFTER INPUT. 屏幕元素为空 (5/8)GUI状态S3000 对话框类型,功能码包括CLOSE (6/8)GUI状态S9000 默认类型,功能码包括BACK (7/8)程序代码 REPORT zsl_test_screen NO STANDARD PAGE HEADING. TABLES: makt, sscrfields. PARAMETERS: p_rb1 TYPE c RADIOBUTTON GROUP p01 DEFAULT 'X'. ...
screen-input = '0'. modify screen. endif. else. if screen-group1 = 'A01'. screen-input = '1'. modify screen. endif. endif. endloop. 本文参与 腾讯云自媒体同步曝光计划,分享自作者个人站点/博客。 原始发表:2023-10-11,如有侵权请联系 cloudcommunity@tencent.com 删除 前往查看 abap data sap ...
TABLES:ci_anlu.DATA:g_display TYPE char1. 点击保存->激活. 6.写屏幕的PBO处理代码 具体PBO代码如下 LOOP AT SCREEN.IF g_display = 'X'.screen-input = 0.MODIFY SCREEN.ENDIF.ENDLOOP 7.出口函数:EXIT_SAPLAIST_002 按如下步骤写上功能代码。
CASE screen-group2. WHEN 'LOO'. IF screen-name = 'VBAP-PSTYV'. screen-input = 1. ENDIF. ENDCASE. ENDIF. ENDIF. INCLUDE zue_sd_0029. *--- *** **If no invoice is created then make PSTYV ready for input for item **category IRIN. *** INCLUDE ...