|
This means that after each FATS command, which returns a record number over the "RECNO"- variable, this instruction have to be called to receive the complete record number (FATS uses a DWord).
Because this second call of FATS would overwrite the variables "ERRORCODE" and "FATSKEY", you have to replace them with DUMMY variables in the second call.
ERRORCODE: | Undefined |
RECNO: | High order part of last record number |
FATSKEY: | Undefined |
RECNOLOW = RECNO%
IF RECNOLOW < 0 THEN RECNOLOW = RECNOLOW + 65536
CMND$ = "X"
CALL FBSVBDOS(CMND$, DUMMY%, RECNO%, DUMMY%)
IF RECNOHIGH < 0 THEN RECNOHIGH= RECNOHIGH + 65536
RECNO = RECNOLOW + RECNOHIGH * 65536
© 2008 GCS Software, Udo Gertz