EXEC SQL Select a into :HV1 where col_a IN (:group-var)
01 GROUP-VAR. 05 ELEM-VAR1 PIC X. 05 ELEM-VAR2 PIC X. 01 ELGROUP-VAR PIC X(2) redefines GROUP-VAR.
その後、基本定義を使用するように EXEC SQL 文をコーディングします。上記の例では、次を使用します。
EXEC SQL Select a into :HV1 where col_a = :elgroup-var
EXEC SQL Select a into :HV1 where col_a = :group-var