Posted by Doug Pegg (203.40.76.70) on November 14, 2004 at 20:10:03:
In Reply to: Re: CFAM & Data Express problems posted by Brian Levantine on November 11, 2004 at 09:55:01:
Hi Brian,
Further to my problems with DOS files.
In the first case, I am reading and writing to Comet directories 'SWH' and 'SWZ' which are in the .INI file but not in the Comet password file ACCESS list. I access these 2 directories in my program. I have since run this program again under CFAM but generating considerably fewer DOS files (18 as opposed to 1,814 when I get the error). Is the problem related to the number of DOS handles under CFAM?
In the second case (EOF problem), I read the DOS files from a local CD (drive D:) and write to temporary files in Comet.
This is the code for the read routine:
!
! READ HEADER HANDLE & WRITE TEMP FILES
!
CHANGEA10:
AX$ = '@3F00@'
DOSRW(AX$,HEADHNDL$,756,1501),EXCP=CHANGEA11
PRINT (0,2784) ! DISPLAY PROGRESS
WRITE (42,1501) KEY=ORNBR$
WRITE (44,0000) KEY=CUST$+ORNBR$
GO CHANGEA10
CHANGEA11:
BYTES = HEXDEC(AX$)
IF BYTES = 0 GO CHANGEA15
GO DOSEXCP
!
! READ LINE ITEM HANDLE & WRITE TEMPORARY FILE
!
CHANGEA15:
AX$ = '@3F00@'
DOSRW(AX$,LINEHNDL$,325,1511),EXCP=CHANGEA16
The program loops on the display of the last ORNBR$ in the header routine and seems to fail the BYTES = 0 test.
Hope this provides some clues.
Regards,
Doug.