Then, your code is working. The problem is that the loop is so tight that your records are being written very fast AND your dots printing as what appears at one time. That is to say that there is not enough of the cpu that is being consumed by other processing operations that would slow the printing of dots.
You could place a sleep for one second after every write but depending on how many records are in your file may not be a wise move. -Val > -----Original Message----- > From: [email protected] [mailto:[email protected]] On Behalf Of > ww > Sent: Thursday, August 06, 2009 2:12 PM > To: jBASE > Subject: Re: jBASE 4.1 on Redhat Linux - Display a character each time a > record is written? > > > I changed my code as follows: > I added colCount to increment each time a line is written to the text > file. > Unfortunately I get the same result one long line of periods rather > then 1 period at a time the expected. > > Thanks for the assist. > > 052 colCount = 0 > 053 LOOP > 054 WHILE READNEXT Key FROM TheList DO > 055 IF keyCnt < 12 THEN > 056 CHANGE "," TO "" IN Key > 057 Line = Line:Key:",": > 058 keyCnt = keyCnt + 1 > 059 END ELSE > 060 Line = Line:Key:CRR > 061 WRITESEQ Line ON TPath THEN > 062 CRT @(colCount, 0):".": > 063 colCount++ > 064 END ELSE > 065 GOSUB ReportError > 066 STOP > 067 END > 068 Line = "" > 069 keyCnt = 1 > 070 END > 071 recCount++ > 072 REPEAT > 073 WEOFSEQ TPath > 074 CLOSE TPath > > > On Aug 6, 1:35 pm, Val Yanez <[email protected]> wrote: > > When you say that it doesn't work, do you mean that no periods are > > printing? Not the correct number of periods are printing? What doesn't > > work? Also, what are you setting keyCnt and reCount too? > > > > From what I can tell, you are printing every 12th record so you should > > get a dot printed every 12th record that is written. > > > > > > > > > > > > > > > > > -----Original Message----- > > > From: [email protected] [mailto:[email protected]] On Behalf > > Of > > > ww > > > Sent: Thursday, August 06, 2009 12:09 PM > > > To: jBASE > > > Subject: jBASE 4.1 on Redhat Linux - Display a character each time a > > > record is written? > > > > > I want to print a character across the screen each time a record is > > > written to a file. Basically a stream of periods like > > > this ............................................. Here's the code I'm > > > using that doesn't work. > > > > > Thanks in advance, > > > > > WW > > > > > 055 LOOP > > > 056 WHILE READNEXT Key FROM TheList DO > > > 057 IF keyCnt < 12 THEN > > > 058 CHANGE "," TO "" IN Key > > > 059 Line = Line:Key:",": > > > 060 keyCnt = keyCnt + 1 > > > 061 END ELSE > > > 062 Line = Line:Key:CRR > > > 063 CRT @(recCount/12,0):".": > > > 064 PAUSE .1 > > > 065 WRITESEQ Line ON TPath ELSE > > > 066 GOSUB ReportError > > > 067 STOP > > > 068 END > > > 069 Line = "" > > > 070 keyCnt = 1 > > > 071 END > > > 072 recCount++ > > > 073 REPEAT > > > 074 WEOFSEQ TPath > > > 075 CLOSE TPath > > > > Notice: This transmission is for the sole use of the intended > recipient(s) and may contain information that is confidential and/or > privileged. If you are not the intended recipient, please delete this > transmission and any attachments and notify the sender by return email > immediately. Any unauthorized review, use, disclosure or distribution is > prohibited.- Hide quoted text - > > > > - Show quoted text - > > > Notice: This transmission is for the sole use of the intended recipient(s) and may contain information that is confidential and/or privileged. If you are not the intended recipient, please delete this transmission and any attachments and notify the sender by return email immediately. Any unauthorized review, use, disclosure or distribution is prohibited. --~--~---------~--~----~------------~-------~--~----~ Please read the posting guidelines at: http://groups.google.com/group/jBASE/web/Posting%20Guidelines IMPORTANT: Type T24: at the start of the subject line for questions specific to Globus/T24 To post, send email to [email protected] To unsubscribe, send email to [email protected] For more options, visit this group at http://groups.google.com/group/jBASE?hl=en -~----------~----~----~----~------~----~------~--~---
