在函数中不修改函数传入参数的情况下取到调用程序中的值的方法

在函数中不修改函数传入参数的情况下取到调用程序中的值的方法：

REPORT z_barry_test_fm_fs .

TABLES: spfli.

DATA dbcnt TYPE sy-dbcnt.

DATA: itab TYPE spfli_tab.

SELECT * FROM spfli INTO TABLE itab UP TO 2 ROWS.

dbcnt = sy-dbcnt.

CALL FUNCTION ‘Z_BARRY_TEST’.

*******************************************

FUNCTION z_barry_test.

*”———————————————————————-

*”*”Local interface:

*”———————————————————————-

*单个变量

DATA: field(50).

FIELD-SYMBOLS: <dbcnt>.

field = ‘(Z_BARRY_TEST_FM_FS)dbcnt’.

ASSIGN (field) TO <dbcnt>.

WRITE <dbcnt>.

*内表

DATA: itab TYPE spfli.

FIELD-SYMBOLS: <itab> TYPE spfli_tab.

field = ‘(Z_BARRY_TEST_FM_FS)ITAB[]‘.

ASSIGN (field) TO <itab>.

LOOP AT <itab> INTO itab.

WRITE: / itab-carrid, itab-connid.

ENDLOOP.