Problem in field leght checking..

Question

HI all,
DATA: BEGIN OF I_MARD OCCURS 0,
        MATNR LIKE MARD-MATNR,    "18
        WERKS LIKE MARD-WERKS,   "4
        LGORT LIKE MARD-LGORT,     "4
        LABST LIKE MARD-LABST,       "18
      END OF I_MARD.
SELECT MATNR
       WERKS
       LGORT
       LABST
  INTO TABLE I_MARD
  FROM MARD.
LOOP AT I_MARD.
WRITE: /  I_MARD(22).
IF NOT I_MARD+22 IS INITIAL.
  WRITE:/  I_MARD+22.
  ELSE.
  WRITE:/20  '-'.
ENDIF.
ENDLOOP. 
Here i am having total field legth is 42. In that i an writing first 22 char. after that i checking about the remaing data.
But it is not allowing me to activate..please check it & let know your inputs..

Answer 1

HI J@y,
As per your suggestion I have modified the code and activated. But it is not displaying full data.
Here in I_mard table I am having the below data.
Row     MATNR     WERKS     LGORT     LABST
1     20000901     1039     09B1     10.23
2     20000902     1039     911     10.25
3     20000902     1039     912     10.56
4     20000902     1039     913     10.56
5     20000902     1039     919     10.56
6     20000902     1039     921     10.56
7     20000902     1039     922     10.56
But in the output iam getting the only 2 fields of data so what about remaining LGORT and LABST.
20000901          1039 
20000901          1039 
20000902          1039 
20000902          1039 
20000902          1039 
20000902          1039 
20000902          1039 
Here in my condition is;
1st MATNR and WERKS will be written and by using this statement:  WRITE: / I_MARD(22).
and then by using the other condition iam checking the data of remaing 2 fileds.
IF NOT I_MARD+0(22) IS INITIAL.
  WRITE:/ I_MARD+0(22).
  ELSE.
  WRITE:/20 '-'.
ENDIF.
if we dont have the date for next 3 fields '-' will be displayed.
Please check it. this is important for me..
Edited by: Mahaboob on Nov 13, 2008 10:10 PM