Variable Length Files and ABAP

Question

I have a comma delimited file that is of a variable length.
The first 5 fields are fixed, but then I have a counter field and then 2 fields that repeat for each counter. 
So if the counter field was 3, I’d have 6 additional fields, but if the counter was 5, I’d have 10 additional fields.
The goal is to end up with 3 records (since the counter was 3) with the 5 fixed fields then the 2 fields respectively.
Such as if it looks like this:
Abc,abc,abc,abc,abc,003,1a,1b,2a,2b,3a,3c
DCE,abc,abc,abc,abc,005,1a,1b,2a,2b,3a,3c,4a,4b,5a,5b
I need it to look like this or at least be able to read it similar to this.
Abc,abc,abc,abc,abc,003,1a,1b
Abc,abc,abc,abc,abc,003,2a,2b,
Abc,abc,abc,abc,abc,003,3a,3c
DCE,abc,abc,abc,abc,005,1a,1b
DCE,abc,abc,abc,abc,005,2a,2b
DCE,abc,abc,abc,abc,005,3a,3c
DCE,abc,abc,abc,abc,005,4a,4b
DCE,abc,abc,abc,abc,005,5a,5b

Answer 1

Hi,
  I guess rich has written more efficient program anyways this is what I could do.
data : begin of i_line occurs 0,
        line(100),
        end of i_line.
data : begin of i_format occurs 0,
        txt1(5),
        txt2(5),
        txt3(5),
        txt4(5),
        txt5(5),
        txt6(5),
        txt7(5),
        txt8(5),
        end of i_format.
   data : comma type c,
      off  TYPE i,
      moff TYPE i,
      mlen TYPE i,
      count type i,
      len(3),
      n type i.
start-of-selection.
i_line-line = 'Abc,abc,abc,abc,abc,003,1a,1b,2a,2b,3a,3c'.
append i_line.
clear i_line.
i_line-line = 'DCE,abc,abc,abc,abc,005,1a,1b,2a,2b,3a,3c,4a,4b,5a,5b'.
append i_line.
clear i_line.
comma = ','.
loop at i_line.
off = 0.
count = 0.
moff = 0.
while count lt 5.
count = count + 1.
find comma in section OFFSET off OF
                i_line-line
                MATCH OFFSET moff
                MATCH LENGTH mlen.
if sy-subrc = 0.
off = moff + mlen.
write : / 'moff',moff,
          'mlen', mlen..
endif.
endwhile.
moff = moff + 1.
write : i_line-line+moff(3) to len no-zero.
write :/ 'The len is ', len.
i_format-txt1 = i_line+0(3).
i_format-txt2 = i_line+4(3).
i_format-txt3 = i_line+8(3).
i_format-txt4 = i_line+12(3).
i_format-txt5 = i_line+16(3).
i_format-txt6 = i_line+20(3).
n = 24.
do len times.
i_format-txt7 = i_line+n(2).
n = n + 3.
i_format-txt8 = i_line+n(2).
n = n + 3.
append i_format.
enddo.
endloop.
loop at i_format.
write :/ i_format.
endloop.
end-of-selection.
Regards
Vick