' Sage 100 Customers - ABC Demo
IMPORT odbc.sbi
dbh = odbc::RealConnect("SOTAMAS90","","")
odbc::query(dbh,"SELECT * FROM AR_Customer")
WHILE odbc::FetchHash(dbh, column)
PRINT column{"CustomerNo"}," - ",column{"CustomerName"}," - ",column{"TelephoneNo"},"\n"
WEND
odbc::Close(dbh)