In "LOOP ... WHERE ..." the line type of the table must be statically defin

Question

Hi All,
        I have written the code, for greater than (GJAHR) 2007 and restricted company codes ( table name = ZGLCCODE).
     Here I have written the following the code which is giving an error
In "LOOP ... WHERE ..." the line type of the table must be statically defin
ZGLCCODE Contains only restricted company codes.
Code is as follows
TABLES : ZGLCCODE. 
DATA : LT_DATAPACKAGE TYPE TABLE OF DTFIGL_4.
DATA : LS_PACKAGE TYPE DTFIGL_4.
TYPES: BEGIN OF LS_TZGLCCODE,
       ZBUKRS type BUKRS,
        END OF LS_TZGLCCODE.
DATA : LT_ITZGLCCODE TYPE LS_TZGLCCODE OCCURS 0 WITH HEADER LINE.
DATA : LI_NUM TYPE I,
       LC_ZGJAHR TYPE BSEG-GJAHR VALUE '2007'.
SELECT ZBUKRS INTO TABLE LT_ITZGLCCODE FROM ZGLCCODE.
Note:  "C_T_DATA" dynamic structure = "DTFIGL_4" structure
*-  Remove from the DataSource Company Code -
LOOP AT C_T_DATA INTO LS_PACKAGE WHERE GJAHR GE '2007'.
READ TABLE LT_ITZGLCCODE WITH KEY ZBUKRS = LS_PACKAGE-BUKRS.
IF SY-SUBRC <> 0.
   APPEND LS_PACKAGE TO LT_DATAPACKAGE.
ENDIF.
  CLEAR LS_PACKAGE.
ENDLOOP.
IF LT_DATAPACKAGE[] IS NOT INITIAL.
DESCRIBE TABLE LT_DATAPACKAGE LINES LI_NUM.
IF LI_NUM GT 0.
   REFRESH C_T_DATA.
   APPEND LINES OF LT_DATAPACKAGE TO C_T_DATA.
   REFRESH LT_DATAPACKAGE.
   FREE LT_DATAPACKAGE.
endif.
ELSE.
   REFRESH C_T_DATA.
ENDIF.
Please give me your valuable suggestions.
Thanks
Ganesh Reddy.

Answer 1

Hi Ganesh,
whatever you do, you can try like this:
1 - any code posted should be wrapped in \
then try something like this:
field-symbols:
  <tabrec> type any,
  <field>   type any.
sort ITZGLCCODE by bukrs.
LOOP AT C_T_DATA ASSIGNING <tabrec>.
  ASSIGN component 'GJAHR' of structure <tabrec> to <field>.
  check <field> <= 2007.
  ASSIGN component 'BUKRS' of structure <tabrec> to <field>.
  READ TABLE LT_ITZGLCCODE WITH KEY ZBUKRS = <field>
    BINARY SEARCH TRANSPORTING NO FIELDS. "speed up the volume.
  IF SY-SUBRC 0.
    MOVE-CORRESPONDING <tabrec> to  LS_PACKAGE.   
    APPEND LS_PACKAGE TO LT_DATAPACKAGE.
  ENDIF.
ENDLOOP.
Regards,
Clemens