how about (if no ";" inside data!) ?
a:
{9;"1081230012";9999999;1000103;0;84.00;0;9999999;0.84;1;"6";0;991030;0;73.92;0.84;9;"L";991030;0;
108;123;0;" "}
b: parse a ";"
{
== ["9" "1081230012" "9999999" "1000103" "0" "84.00" "0" "9999999" "0.84" "1" "6" "0"
"991030" "0" "73.92" "0.84" "9" "L" "991030" "0" "108" "123" "0" " "] ; block!
}
Volker
> Hi Pekr,
>
> thanks for your tip but.....
>
> .......that really doesn't work. With your solution "text has no value". What
> i tried, is to hop over the semikolons for n times and read the contens
> until the next semikolon. As there are more than one field to be modified
> as well field 13 and 19 )the solution to skip over the semikolon may be the
> best.
>
> If i understand the guide correctly, Rebol has to ignore everything before
> the semikolon, but in this case it doesn't.
>
> No idea!
>
> Thorsten
>
> -----Ursprungliche Nachricht-----
> Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
> Gesendet: Montag, 21. August 2000 13:51
> An: [EMAIL PROTECTED]
> Betreff: [REBOL] parse with skip Re:
>
>
>
>
> [EMAIL PROTECTED] wrote:
>
> > Hi List,
> >
> > I have a file containing the following kind of lines:
> >
> >
> 9;"1081230012";9999999;1000103;0;84.00;0;9999999;0.84;1;"6";0;991030;0;73.92
> > ;0.84;9;"L";991030;0;108;123;0;" "
> >
> > With this line i like to get rid of the leading "1" ( should be yymmdd =
> > 00/01/03 )in the 4th field. For this i like to use the following code:
> >
> > val: 1000000
> >
> > parse line [skip ";" 2 thru ";" copy text to ";" (if greater? to-integer
> > text val [remove/part text 1])]
> >
> > For most lines in the file this works fine, but if the number before the
> > first semikolon changes to over 9 ( e.g. 21 ) this won't work anymore.
> >
> > Does anyone know why?
> >
>
> somenum: charset "0123456789"
>
> parse line [skip somenum ";" ....
>
> Cheers,
> -pekr-
>
> >
> > I tried a few other things but they took too long, because the file is
> about
> > 270.000 lines big.
> >
> > Thorsten
>
>
>
