今天在做一程序时,需要调用别人做好的多个函数,而这些函数都是做到同一函数组中的,别人做好时是在其它的程序中使用的,但我也需要使用,只是我使用时,只调用他的一个函数,但这函数中使用了一些函数组的全局变量,这个变量,在我需调用的函数中不是传入参数,所以需要在我调用时把我的变量附值给函数组的全局变量。
后来找到如下方法,主代码如下:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
FIELD-SYMBOLS:<FS_GLJY> TYPE ANY, <FS_VALUE> TYPE ANY. DATA: BEGIN OF L_GLJY_HEAD . INCLUDE STRUCTURE P_GLJY_HEAD . DATA: WRBTR TYPE ZFI1003T-WRBTR,"票据金额 END OF L_GLJY_HEAD. MOVE-CORRESPONDING P_GLJY_HEAD TO L_GLJY_HEAD. L_GLJY_HEAD-WRBTR = P_GLJY_HEAD-WRBTR1."票据金额 "--0100屏幕使用的结构() ASSIGN ('(SAPLZFG_FI0194)GS_0100') TO <FS_GLJY>. IF SY-SUBRC = 0. MOVE-CORRESPONDING L_GLJY_HEAD TO <FS_GLJY>. ENDIF. |
在代码中,把L_GLJY_HEAD的值,赋值给函数组SAPLZFG_FI0194的全局变量GS_0100,这样在后面调用这个函数组中的函数时,如函数中用到GS_0100,那就会使用我在这里赋的值了。