[Sintaxis] Uso del ADO y JOIN en Power Cobol

[hbetancur]

Hola, soy novato en este tema de Bases de datos y estoy tratando de usar ADO y unir varias tablas con JOIN. Sigo el ejemplo de ADO que viene en Power Cobol y no logro ver como procesar el metodo "Ececute" en el objeto Command a find e obtener el objeto recordSet y leer la informacion. Alguien podria darme una guia de como hacerlo. Publico el codigo hasta donde llego.

     MOVE POW-FALSE         TO "Enabled" OF Load_Data     
     MOVE "ADODB.Connection"    TO WK
     INVOKE COM "CREATE-OBJECT" USING WK RETURNING CNNOBJ   *>Open the ADODB.Connection object.
*    Set the ADO Connection object to SQL Server Provider.
     INVOKE CNNOBJ "SET-CursorLocation" USING WK-CURLOC
     MOVE "Data Source=HotelnetDB;Initial Catalog=Rooms01" TO WK
     INVOKE CNNOBJ "OPEN" USING WK  
     MOVE "ADODB.Command"   TO WK               
     INVOKE COM "CREATE-OBJECT" USING WK RETURNING CMDOBJ       *>Create ADODB.Command object. 
     INVOKE CMDOBJ "SETREF-ActiveConnection" USING CNNOBJ       *>Set connection to ADODB.Command object.
     MOVE "SELECT NrohabHa,DescTp
-         " FROM Rooms01 JOIN Roomtypes ON Rooms01.TiphabHa = Roomtypes.TipopTp" To Wk.
     INVOKE CMDOBJ "SET-CommandText" USING WK
*    Create the parameter for the procedure using with Array object.
     INVOKE ARRAY "NEW" USING PARAM-TYPE ARRAY-DIM AXIS RETURNING PRMARY
*    Set the "GOODS" parameter.
     MOVE 1             TO ELM-DATA
     MOVE 1             TO ELM-NO
     INVOKE PRMARY "SET-DATA" USING ELM-DATA ELM-NO
*    Get the ADO Recordset object.
     MOVE 0             TO WK-DUMMY
     
     INVOKE CMDOBJ "Execute" USING WK-DUMMY PRMARY RETURNING RSTOBJ

Como puedo obtener la referencia la objeto Recordset ?.

Gracias por cualquier tipo de ayuda.