Rexx - Operación de lectura

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