Mover el registro de la matriz de Oracle a Cobol se produce

Question

¿Cómo puedo mover un registro de un oráculo a una matriz de Cobol? Cuando muevo un solo campo, todo funciona como se espera. Cuando intento mover un registro en un Oracle VARRAY no puedo hacer que funcione. El PRO * precompilador COBOL da el siguiente mensaje de error:

Error at line 137, column 12 in file ESF3.ordbso07.PCO 
      EXEC SQL EXECUTE  
...........1 
PCB-S-00576, PLS-382: expression is of wrong type 
Error at line 137, column 12 in file ESF3.ordbso07.PCO 
      EXEC SQL EXECUTE  
...........1 
PCB-S-00576, PLS-0: Statement ignored 

tipos de Oracle:

TYPE QDELSSRD_arr IS VARRAY(30) OF QDELSSRD_typ; 

TYPE SODLSSRD_typ IS RECORD (-- DBSO07 SOK 
    QDELSSRD    QDELSSRD_arr -- 30 x QDELSSRD_typ 

OC is SODLSSRD_typ; 
TYPE QDELSSRD_typ IS RECORD (
    ENAMN    arbetssokande.efternamn%type, -- VARCHAR2(30 CHAR) 
    FNAMN    arbetssokande.fornamn%type, -- VARCHAR2(20 CHAR) 
); 

de fragmentos de COBOL ESQL bloque anónimo PL/SQL:

FOR LV IN 1..:RC-ZHITS 
LOOP 
    :QDELSSRD(LV) := OC.QDELSSRD(LV); 
END LOOP; 

COBOL declaración de variables:

 15  QSODLSSRD. 
      18  QDELSSRD      OCCURS 30. 
        21  ENAMN       PIC X(030). 
        21  FNAMN       PIC X(020). 

Answer 1

Creo que es necesario utilizar VARYING ... Por ejemplo:

18  QDELSSRD      VARYING OCCURS 20 TIMES. 
21  ENAMN       PIC X(030).  
21  FNAMN       PIC X(020). 

http://www.pitt.edu/~hoffman/oradoc/server.804/a58232/ch04.htm