开发源代码
zfir001
Code listing for: ZFIR001
Description: 辅助余额表
*&---------------------------------------------------------------------*
*& Report ZFIR001
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZFIR001 MESSAGE-ID ZFI099 NO STANDARD PAGE HEADING LINE-SIZE 150.
include ZFIR001T01.
include ZFIR001F01.
*&---------------------------------------------------------------------*
* INITIALIZATION
*&---------------------------------------------------------------------*
INITIALIZATION.
PERFORM SET.
CLEAR GV_TCODE.
DATA:LV_TCODE TYPE SY-TCODE.
IMPORT LV_TCODE FROM MEMORY ID 'ZFIR003'.
FREE MEMORY ID 'ZFIR