And, I think, only one variable per line. Regards, Alastair.
----- Original Message ----- From: "Walker, Buddy" <[EMAIL PROTECTED]> To: "RBASE-L Mailing List" <[EMAIL PROTECTED]> Sent: Wednesday, January 29, 2003 6:46 PM Subject: [RBASE-L] - RE: Problem within WHILE loop J.M. Even tho whileopt is off I would suggest setting all variables outside of the while loop. Buddy -----Original Message----- From: J.M. GRATIAS [mailto:[EMAIL PROTECTED]] Sent: Wednesday, January 29, 2003 1:17 PM To: [EMAIL PROTECTED] Subject: [RBASE-L] - Problem within WHILE loop Hi all, I have problems in codelocked RBW6.5 programs (1.862xRT03). One of these programs where writen with older version (1.842/1.851) and were working OK with thoses version. Now, it don't : - in run mode (RUN myprog IN myprog.apx) - in TRACE mode (TRA myprog IN myprog.apx) where I use F5 to progress It works in TRACE mode (TRA myprog IN myprog.apx) where I use F10 to progress (step by step). This is the structure of the program. WHILE #PI <> 0 THEN CHOOSE vchoix FROM #VALUES FOR ....... IF vchoix = '[Esc]' THEN BREAK ENDIF SWITCH (.vchoix) CASE '1' Something ... BREAK CASE '.....' BREAK CASE '6' SET var vcaption = 'LOGINTRA. Installation des nomenclatures officielles', + vdrive TEXT, vmulti TEXT, vINT INT CHOOSE vdrive FROM mdrive IN nc8.apx AT CENTER CENTER + TITLE 'Choisir l''unit� � utiliser (ou Echap)' + CAPTION .vcaption LINE 4 IF vdrive = '[Esc]' THEN BREAK ENDIF BREAK CASE '.....' BREAK ENDSW -- R�ouverture DBCEE avant retour au menu DISC SET multi .vmulti CONN dbcee ENDWHILE RETURN $MENU mdrive POPUP |#DRIVES| ENDC Problem happen only when vchoix = 6 When in RUN mode and TRA/F5, CHOOSE vdrive FROM mdrive ...... and all following commands are skipped over and control return directly to ENDSW WHILEOPT is set to OFF Using W98SE I tryed to recodelock with 1.862 : same problem Same problem also with the same not codelocked (RUN myprog) Have some changes has been made in WHILE loop optimisations ? Any ideas ? TIA, J.M. GRATIAS, Logimatique
