How to pick the wage type (repeat structure) in pa0008 infotype.

Question

Hi all.
     Iam writing code we pick the data from Pa0008-lgart Pa0008-brt01.
    these two field are repeat structure.
   here iam given code what we writen.
select pernr
          lgart
          betrg
            from pa0014
            into table it_p0014
          for all entries in it_p0001
            where pernr = it_p0001-pernr.
           and   it_p0014-lgart  = '1507'
           or   it_p0014-lgart = '1508'
           or   it_p0014-lgart = '1509'.
if sy-subrc ne 0.
  message e063.
endif.
endif.
***---> Using wage types.
*loop at it_p0008
DO 20 TIMES VARYING lgart FROM it_p0008-lgart NEXT it_p0008-lgart
            VARYING betrt FROM it_p0008-betrg NEXT it_p0008-betrg.
WRITE:/ lgart, betrg.
case it_p0008-lgart.
    when '1001'.        " HOURLY RATE.
      write:/ it_p0008.
    when '1500'.        " HOURLY RATE.
      write:/ it_p0008.
    when '1008'.        " RED CIRCULE HOURLY RATE.
      write:/ it_p0008.
endcase.
ENDDO.
here i am getting o/p it featch the all the data.
but i need only  1001,1500and 1008 records only.
here iam using DO varing condition.
please help me.
and one more thing
as well i featch the data from 14 infotype same lgart and betrg
in 00014 infotype i need only 1507,1508,1509 recorde along with betrg.how to write code .  
Regards,
Krishna.

Answer 1

DO 20 TIMES VARYING lgart FROM it_p0008-lgart NEXT it_p0008-lgart
VARYING betrt FROM it_p0008-betrg NEXT it_p0008-betrg.
WRITE:/ lgart, betrg.
<b>case LGART.
when '1001'. " HOURLY RATE.
write:/ betrg.
when '1500'. " HOURLY RATE.
write:/  betrg.
when '1008'. " RED CIRCULE HOURLY RATE.
write:/  betrg.
endcase.</b>ENDDO.
check this.
Regards
Prabhu