What is a best way to get a list of OPEN tables?

I need to get a checksum of the current record in every currently "open" table.
Either in an array or a table, so I can then use the SYS(2017) function to get each checksum.

Then I will add them up to come up with a single Combined Checksum to make sure the data set is not being repeated.

Thanks.