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 --~--~---------~--~----~------------~-------~--~----~ 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 -~----------~----~----~----~------~----~------~--~---
