... MEMVAR oSysList PROC Main() LOCA oOdbc, oDbf, aData:= {} oOdbc := TOdbc():New( OdbcDsnEntries()[ 5 ], 'sa', 'B1Admin' ) IF oOdbc:lSuccess oDbf := TDbOdbc():new( "SELECT T0.[ItemCode][PRODUCTS_MODEL], T0.[ItemName][PRODUCTS_NAME], T0.[SuppCatNum][REF], T3.[FirmName][MARCA], " + ; " ...