OR use double quotes - if you have spaces or longer than 8.3 names.
Regards, Alastair.
----- Original Message -----
From: "Jim Blackburn" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, March 08, 2002 5:17 PM
Subject: Re: Strange correlation between COPY and PAUSE 3 ...
> J.M.:
> Remove the quotes:
> COPY Rbase.dat A:
>
> Jim Blackburn
> Kodiak
>
> "J.M. GRATIAS" wrote:
> >
> > Hi all,
> >
> > I have a strange problem in RBW 1.851xRT03 ...
> > Seems that COPY don't works anymore after a PAUSE 3 command in a non
> > optimized WHILE loop :
> >
> > SET ERROR VAR verr
> > SET WHILEOPT OFF
> > SET VAR vTEXT TEXT = NULL
> > SET VAR vINT INTEGER = NULL
> > SET VAR vcaption TEXT = 'Caption'
> > SET var vfich TEXT = 'Rbase.dat'
> > SET var vdrive = 'A:'
> >
> > WHILE #PI <> 0 THEN
> > -- Message d'attente
> > SET VAR vTEXT = ('Travail en cours .... PATIENTEZ S.V.P ....')
> > PAUSE 3 USING .vTEXT=45 CAPTION .vcaption AT CENTER CENTER
> > COPY 'Rbase.dat' 'A:'
> > SET var vINT = .verr
> > IF vINT <> 0 THEN
> > CLS
> > SET VAR vTEXT = ('COPY 1 (error' & (CTXT(.vINT)) + ').')
> > PAUSE 2 USING .vTEXT
> > ENDIF
> > BREAK
> > ENDWHILE
> >
> > SET VAR vTEXT = ('Work in Progress ....')
> > PAUSE 3 USING .vTEXT=45 CAPTION .vcaption AT CENTER CENTER
> > COPY 'Rbase.dat' 'A:'
> > SET var vINT = .verr
> > IF vINT <> 0 THEN
> > CLS
> > SET VAR vTEXT = ('COPY 2 (error' & (CTXT(.vINT)) + ').')
> > PAUSE 2 USING .vTEXT
> > ENDIF
> > CLS
> > RETURN
> >
> > Both COPY works in TRACE mode, but first COPY return error 2086.
> > Second COPY works fine because not in the WHILE loop.
> >
> > Same problem with
> >
> > COPY .vfich .vdrive
> > or
> > COPY &vfich &vdrive
> >
> > Can anybody confirm ?
> >
> > Any suggestion ?
> >
> > TIA
> >
> > J.M. GRATIAS, Logimatique
> > ================================================
> > TO SEE MESSAGE POSTING GUIDELINES:
> > Send a plain text email to [EMAIL PROTECTED]
> > In the message body, put just two words: INTRO rbase-l
> > ================================================
> > TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED]
> > In the message body, put just two words: UNSUBSCRIBE rbase-l
> > ================================================
> > TO SEARCH ARCHIVES:
> > http://www.mail-archive.com/rbase-l%40sonetmail.com/
> ================================================
> TO SEE MESSAGE POSTING GUIDELINES:
> Send a plain text email to [EMAIL PROTECTED]
> In the message body, put just two words: INTRO rbase-l
> ================================================
> TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED]
> In the message body, put just two words: UNSUBSCRIBE rbase-l
> ================================================
> TO SEARCH ARCHIVES:
> http://www.mail-archive.com/rbase-l%40sonetmail.com/
================================================
TO SEE MESSAGE POSTING GUIDELINES:
Send a plain text email to [EMAIL PROTECTED]
In the message body, put just two words: INTRO rbase-l
================================================
TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED]
In the message body, put just two words: UNSUBSCRIBE rbase-l
================================================
TO SEARCH ARCHIVES:
http://www.mail-archive.com/rbase-l%40sonetmail.com/
