1.替代调用程序配置,事务码 GCX2
其中所用ZRGGBS000是将程序RGGBS000复制出来用于写替代的程序
正常情况基本只用下图的一个
2.GGB1配置条件-一般由业务顾问配置
此处是配置触发替代的条件
3.代码部分
在程序的子例程 get_exit_titles中添加如下代码
3.1抬头替代
exits-name = 'U100'.
exits-param = c_exit_param_none.
exits-title = TEXT-100. "Cost center from CSKS
APPEND exits.
3.2行项目替代
exits-name = 'U903'.
exits-param = c_exit_param_none.
exits-title = TEXT-903.
APPEND exits.
3.3完全替代
exits-name = 'U991'.
exits-param = c_exit_param_class.
exits-title = TEXT-991.
APPEND exits.
以上的name后面的值,是子例程的名称,相关代码逻辑都写在该子例程中
再在当前程序创建子例程,如 form U100,在该子例程中修改数据