OracleアレイからCobolへのレコードの移動

Question

レコードをOracleからCobol配列に移動するにはどうすればよいですか？ 1つのフィールドを移動すると、すべてが正常に機能します。 Oracle VARRAYでレコードを移動しようとすると、私は を取得できません。

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 

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) 
); 

COBOL ESQL無名PL/SQLブロックのスニペット：

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

COBOL変数宣言：

PRO * COBOLプリコンパイラは、次のエラーメッセージを表示します

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

Answer 1

私は、たとえば...あなたがVARYINGを使用する必要があると思う：

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