EXECIO

Descripción

La longitud máxima de registro permitida es de 256 bytes.

Si se especifica una raíz para una operación READ (y se debe especificar una raíz si se lee más de un registro), el número real de registros leídos se coloca en stem.0.

Utilice la transacción CEBR proporcionada por CICSpara examinar colas de almacenamiento temporal. CEBR proporciona funciones PUT y GET que puede utilizar para copiar entre colas de datos transitorios CICS y colas de almacenamiento temporal CICS .

Operandos

líneas

especifica el número de líneas a leer o escribir. Un asterisco (*) es un caso especial que se especifica sólo para operaciones READ e indica que el archivo se lee desde la línea de destino (o la línea 1 si no se especifica ninguna línea de destino) hasta el final del archivo.

READ

lee uno o más registros de una cola de almacenamiento temporal (TSQ) de CICS .

WRITE

escrituras (o reescrituras) uno o más registros en una cola de almacenamiento temporal CICS .

TSQNAME

especifica un nombre de cola de almacenamiento temporal de 1 a 8 caracteres.

raíz.

especifica el nombre de una raíz. Una raíz debe finalizar en un punto; consulte Stems.

nombrevar

especifica un nombre de variable REXX que es el origen o destino de esta operación EXECIO.

recno

especifica un número de registro en la cola de almacenamiento temporal con el que empieza READ o WRITE.

reclen

especifica la longitud del registro grabado en el almacenamiento temporal CICS . Si se omite reclen , la longitud toma el valor predeterminado de 80 bytes.

Códigos de retorno

n

El código de retorno que CICS devuelve si se detecta un error

0

Retorno normal

-202

Operando no válido

221

Se han especificado demasiados operandos

222

Recno operando fuera de rango

224

Operando de líneas no válido

Ejemplo

x.1 = 'line 1'
x.2 = 'Line Two'
'EXECIO 2 WRITE QUEUE1 X.'

Este ejemplo graba datos en una cola de almacenamiento temporal CICS .

'EXECIO 2 READ QUEUE1 Y.'
say y.0  /* ==>  2           */
say y.1  /* ==>  'line 1'    */
say y.2  /* ==>  'Line Two'  */

Este ejemplo lee datos de una cola de almacenamiento temporal.

Puede examinar la cola creada en el ejemplo utilizando CEBR. Especifique CEBR QUEUE1.