J.M.: Make sure that you run your code through RSTYLE, I found that if you have characters past column 79, CODELOCK will not work. RSTYLE will warn you of this condition. I found out that Rbase is becoming more strict with the syntax; code that used to work fine no longer works until you correct the code to strictly conform with the command syntax. Also, if I am not mistaken, TRACE will not go one line at the time through a codelocked file, it will simply execute it.
Javier Valencia, PE President Valencia Technology Group, L.L.C. 14315 S. Twilight Ln., Suite #14 Olathe, KS 66062-4571 (913)829-0888 (913)649-2904 FAX -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of J.M. GRATIAS Sent: Wednesday, January 29, 2003 12:17 PM To: RBASE-L Mailing List 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
