need to optimize loop

i have to optimize colored line any one heaving idea? Please rply ..

SELECT * FROM zsng2g_pkt_eh

  INTO TABLE gt_pkt_eh

  WHERE ZSNG2G_ENC_TYPE  = gv_par_val_enc

  AND   ZSNG2G_EPC_CLASS = gv_par_val_epc

  AND   ZSNG2G_PACKET_LEVEL = '03'

  AND   ZSNG2G_REQUESTID = gv_id.

**-- selecting all the sn for give packet type list

  SELECT eh_guid ZSNG2G_SN_SERIAL_NUMBER ZSNG2G_SN_COUNTER FROM zsng2g_sn_eh

  INTO TABLE lt_sn_eh

  WHERE ZSNG2G_SN_ENCODING_TYPE = gv_par_val_epc

  AND   ZSNG2G_SN_EPCCLASS = gv_par_val_enc.

*    AND   ZSNG2G_SN_COUNTER ge gt_pkt_ehx-ZSNG2G_RANGE_START

*    AND   ZSNG2G_SN_COUNTER le gt_pkt_ehx-ZSNG2G_RANGE_END.

*--Filling tbl_range

  LOOP AT gt_pkt_eh into ls_pkt_eh.                   "where ZSNG2G_PACKET_TYPE = 'RANGE'.

    if ls_pkt_eh-ZSNG2G_PACKET_TYPE = 'RANGE'.

      ls_RANGE-RANGE_FROM = ls_pkt_eh-ZSNG2G_RANGE_START.

      ls_RANGE-RANGE_TO = ls_pkt_eh-ZSNG2G_RANGE_END.

      APPEND ls_range to lt_range.

    ELSEif ls_pkt_eh-ZSNG2G_PACKET_TYPE = 'LIST' .

*--Fill tbl_list

      LOOP AT lt_sn_eh into ls_sn_eh where ZSNG2G_SN_COUNTER ge ls_pkt_eh-ZSNG2G_RANGE_START and

                                           ZSNG2G_SN_COUNTER le ls_pkt_eh-ZSNG2G_RANGE_END.

        ls_list-TABLE_LIST = ls_sn_eh-ZSNG2G_SN_SERIAL_NUMBER.

        APPEND ls_list to lt_list.

        clear ls_list.

      ENDLOOP.