ALL,
The code 31 is for UniData, and here is a quick example.
001 EXECUTE "CREATE.FILE MR32 3 3 32BIT"
002: OPEN "MR32" TO MR32 ELSE STOP "NG1"
003 PRINT "MR32 - ":FILEINFO(MR32,31)
004: EXECUTE "CREATE.FILE MR64 3 3 64BIT"
005: OPEN "MR64" TO MR64 ELSE STOP "NG1"
006: PRINT "MR64 - ":FILEINFO(MR64,31)
Bottom.
*--: FIBR
Filed "MIKE" in file "BP".
Compiling Unibasic: BP\MIKE in mode 'u'.
compilation finished
Create file D_MR32, modulo/3,blocksize/1024
Hash type = 0
Create file MR32, modulo/3,blocksize/1024
Hash type = 3
Added "@ID", the default record for UniData to DICT MR32.
MR32 - 0
Create file D_MR64, modulo/3,blocksize/1024
Hash type = 0
Create file MR64, modulo/3,blocksize/1024
Hash type = 3
Added "@ID", the default record for UniData to DICT MR64.
MR64 - 1
Note that I ran my test on UniData 8.2.2
------------------------------
Michael Rajkowski
Rocket Software
------------------------------
Original Message:
Sent: 01-04-2021 14:39
From: Neil Morris
Subject: 32-bit vs 64-bit files - Identify and update
Mike,
Is the code 31 for FILEINFO something available in UniData?
I don't think such a code currently exists in UniVerse.
Thanks,
Neil
------------------------------
Neil Morris
Rocket Software
Original Message:
Sent: 01-04-2021 14:04
From: Michael Rajkowski
Subject: 32-bit vs 64-bit files - Identify and update
Jeff,
Code 31 for the FILEINFO Basic function would tell you if the file is 32 or 64 bit.
------------------------------
Michael Rajkowski
Rocket Software
Original Message:
Sent: 01-04-2021 13:54
From: Jeff Teter
Subject: 32-bit vs 64-bit files - Identify and update
We have converted a number of our files from 32-bit to 64-bit over that last couple of years. Typically, that has been done when we have a write issue and react to the specific problem. Does anyone have a dictionary or programmatic means of identifying the two type of file so that we can target conversion proactively?
Once the files are identified, they can certainly be resized to 64-bit via a script.
------------------------------
Jeff Teter
Woodforest National Bank
------------------------------