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.

ENDFUNCTION.