Function accepts and OpenInsight table handle and resolve the handle back to a table name.

CS_RESOLVE_TABLE_HANDLE_TO_NAME.oibp

Function CS_RESOLVE_TABLE_HANDLE_TO_NAME(OpenTableHandle)
/*
Given the example:
	Open 'SYSLISTS' To OpenTableHandle Else Debug
	TableName = CS_RESOLVE_TABLE_HANDLE_TO_NAME(OpenTableHandle)
The Function will return the name of the table From the handle. 
*/

If Unassigned(OpenTableHandle) Then Return ''

FileVarName = OpenTableHandle<1,2>
			
AtTables5Count = DCOUNT(@Tables(5), @FM)

For i = 1 To AtTables5Count
	CheckHandle = @Tables(5)<i>
	If CheckHandle EQ FileVarName Then
		*Found our handle in @TABLES(5)
		TableName = @Tables(2)<i>
		Return TableName
	End
Next

*Couldn't find handle in @TABLES(5)
Return ''