DATOS REPETITIVOS

REPEATING DATA lee los casos de entrada cuyos registros contienen grupos repetitivos de datos. Para cada grupo de repetición, REPEATING DATA crea un caso de salida en el conjunto de datos activo.

REPEATING DATA [FILE=file]

 [/ENCODING='encoding specification']

 /STARTS=beg col[-end col] /OCCURS={value  }
                                   {varname}

 [/LENGTH={value  }] [/CONTINUED[=beg col[-end col]]]
          {varname}

 [/ID={col loc}=varname] [/{TABLE  }] 
      {format }            {NOTABLE}

 /DATA=variable specifications

Historial de versiones

Release 16.0

• Se ha añadido el submandato ENCODING para el soporte Unicode.

Ejemplo

INPUT PROGRAM.
DATA LIST / SEQNUM 2-4 NUMPERS 6-7 NUMVEH 9-10.
REPEATING DATA STARTS=12 /OCCURS=NUMVEH
 /DATA=MAKE 1-8 (A) MODEL 9 (A) NUMCYL 10.
END INPUT PROGRAM.