Uma operação READ em qualquer banco de dados significa buscar algumas informações úteis do banco de dados. Assim que nossa conexão com o banco de dados for estabelecida, você estará pronto para fazer uma consulta a este banco de dados.
O exemplo a seguir mostra como buscar todos os registros da tabela de funcionários.
Exemplo
/* Main program */
Call RxFuncAdd 'SQLLoadFuncs', 'rexxsql', 'SQLLoadFuncs'
Call SQLLoadFuncs
if SQLConnect(c1,'testuser','test123','testdb') == 0 then say 'Connect Succedded'
if SQLCommand(u1,"use testdb") == 0 then say 'Changed database to testdb'
sqlstr = "select first_name,last_name,age,sex,income from employee" say
SQLCommand(c2,sqlstr)
say c2.first_name.1
say c2.last_name.1
say c2.age.1
say c2.sex.1
say c2.income.1
A saída do programa acima seria conforme mostrado abaixo.
Connect Succedded
Changed database to testdb
0
Mac
MOhan
20
M
2000