Article View: comp.lang.modula2
Article #3006Re: Arrays of Records and Sequential File Reading
From: jthorpe
Date: Sun, 05 Nov 1995 00:31
Date: Sun, 05 Nov 1995 00:31
19 lines
1678 bytes
1678 bytes
In <47a4vn$s5g@grid.Direct.CA>, rleroux@direct.ca (robert leroux) writes: >Thanks, I managed to get it happening just after the last post using a REPEAT >.. .. UNTIL loop. I am only working at getting the ARRAY of the date field >working then I should be quite well off. I have an idea on how to address the >Date filed and print out the dates per book depending on how many copies of the >particular book is available, but I believe using the CASE statement, I would have >to read in my 'copi' field as a CHAR so that I can compare it to the current >copi that is read into the record. I am going to try to address this problem with >an IF...THEN statement tomorrow first, otherwise I think reading in the copi field as >a CHAR instead of a Str should solve my problem. > The purists will kill me for this, but the LOOP END; EXITing when a hit is made is a very useful tool. The academics will say it's crude and you can do the same thing with either REPEAT UNTIL or DO WHILE but there are lots of times when one hasn't the time or the inclination to struggle through one or the other. Jim T.
Technical Details
Message-ID:
<47h0k9$esj@cliff.island.net>Path:
arc1-ca.pugleaf.net!news.island.net!usenetReferences:
<46ngu2$r72@grid.Direct.CA> <DH2EpC.MIo@cix.compulink.co.uk> <472lcc$kdk@grid.Direct.CA> <474odt$npe@p235.informatik.uni-Bremen.de> <47a4vn$s5g@grid.Direct.CA>Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!news.island.net!usenet From: jthorpe@island.net Newsgroups: comp.lang.modula2 Subject: Re: Arrays of Records and Sequential File Reading Date: 5 Nov 1995 00:31:05 GMT Organization: Island Internet Inc. - (604) 753-2383 Message-ID: <47h0k9$esj@cliff.island.net> References: <46ngu2$r72@grid.Direct.CA> <DH2EpC.MIo@cix.compulink.co.uk> <472lcc$kdk@grid.Direct.CA> <474odt$npe@p235.informatik.uni-Bremen.de> <47a4vn$s5g@grid.Direct.CA> Reply-To: jthorpe@island.net NNTP-Posting-Host: slip6.island.net X-Newsreader: IBM NewsReader/2 v1.2