Currently using jFiles (21 TPS files in total)
!… for each file
SaveAsJson PROCEDURE(*FILE vTPS, *StringTheory vJson)
jf.Save(vTPS, vJson)
!… load json into typedQ)
CASE NAME(vTPS)
OF Trucks
IF oldMD5 <> newMD5
jf.Load (QTrucks, vJson)
END
OF RFID
IF oldMD5 <> newMD5
jf.Load(QRfid, vJson)
END
END
Each file has its own procedure for ETL and write the record to the SQLite table
!… loop thru queue and write to SQLite
Loop queue
write SQLite table
End
I tracked down the GPF - forgot to add OddJob global template (used in a class)
I wrote a simplified app where tWrite app reads TPS and writes to SQLite - while the tRead app simultaneously refreshes the browse against same table as READONLY
Getting closer - now I’ve upgraded to an Access Denied in the write app while tread is running
