Posted by Grant Foraker on June 18, 2013 at 12:02:28:
Been back and forth between C32 and C16 to develop this program. Currently in C16 and confused :)
====================================================================
CGC30:
INQUIRE (GDIR,DOSRecord), EXCP = CGC70
MSGBOX 'READ'
FOR LP = 1 TO 20
LET DATAPARTS$(LP) = DATAPARTS$(LP) + STRING(' ',250)
NEXT LP
LET AX$ = '@4000@'
LET BX$ = GDIRHANDLE$
LET CX$ = '@0000@'
DOSRW (AX$,BX$,5000,DOSRecord) EXCP = CGC80 ! WRITE TO GDIR.CPY
MSGBOX 'WRITE'
GOTO CGC30
==========================================================
Reading a record that is less that 5000 bytes. Trying to pad it out to an exact 5000. The DOSRW does write 5000 bytes into the DOS file. But then Cosh gets a GPF at 001F:1CFE.
I thought "# buffer" had been bumped up to 8000. Is it Comet 32 only?
Should the PAD compile in this systax "LET DATAPARTS$(LP) = PAD(DATAPARTS$(LP))"?
Each file can be a maximum of 1MB in length Uploaded files will be purged from the server on a regular basis.