Una operación READ en cualquier base de datos significa obtener información útil de la base de datos. Una vez que se establezca nuestra conexión con la base de datos, estará listo para realizar una consulta en esta base de datos.
El siguiente ejemplo muestra cómo obtener todos los registros de la tabla de empleados.
Ejemplo
/* 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
La salida del programa anterior sería como se muestra a continuación.
Connect Succedded
Changed database to testdb
0
Mac
MOhan
20
M
2000