Repetitive structure In ABAP HR

Question

hi all ,
    Am getting syntax error for the code below. Am using
4.7 .its says "p0041-dar01" and "date" are type-incompatible.
however when i compile the same code in 4.6 its workin fine. here is the code..
*& Report  ZTEST_REP                                                   *
REPORT  ZTEST_REP                               .
INFOTYPES 0041.
NODES : PERNR.
data : begin of date,
         dar like pa0041-dar01 ,
         dat like pa0041-dat01.
data  : end of date.
START-OF-SELECTION.
GET PERNR.
DO 12 TIMES VARYING DATE
          FROM P0041-DAR01
          NEXT p0041-DAR02.
write :  / date-dar ,
           date-dat.
write : / date.
ENDDO.
END-OF-SELECTION.
can i know what is the exact problem ...
Thanks
senthil

Answer 1

Hi Senthil ,
Try ...this way...
DATA: BEGIN OF WORD,
        ONE   VALUE 'E',
        TWO   VALUE 'x',
        THREE VALUE 'a',
        FOUR  VALUE 'm',
        FIVE  VALUE 'p',
        SIX   VALUE 'l',
        SEVEN VALUE 'e',
        EIGHT VALUE '!',
      END   OF WORD,
      LETTER1, LETTER2.
DO VARYING LETTER1 FROM WORD-ONE NEXT WORD-THREE
   VARYING LETTER2 FROM WORD-TWO NEXT WORD-FOUR.
  WRITE: LETTER1, LETTER2.
  IF LETTER2 = '!'.
    EXIT.
  ENDIF.
ENDDO.
The resulting output is the character string
"E x a m p l e !".
Regards,
Vijay