| ..... first COPY return error 2086.
==========================
J.M.,
Try COPY Rbase.dat A:Rbase.dat
---------------------------------------------------------------------------
Eric M. Bienstock, Ph.D.
Database Development, etc.
Authorized R:BASE Developer
Eric M. Bienstock & Associates, Inc.
day: 212-978-7948 eve: 973-763-8650(8)
FAX: 775-254-2109 [EMAIL PROTECTED]
http://mywebpages.comcast.net/ericmb/
---------------------------------------------------------------------------
----- Original Message -----
From: "J.M. GRATIAS" <[EMAIL PROTECTED]>
To: "Rbase List server" <[EMAIL PROTECTED]>
Sent: Friday, March 08, 2002 9:50 AM
Subject: Strange correlation between COPY and PAUSE 3 ...
|
| 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/
