Si el recurso es recuperable, la opción forUpdate bloquea el registro de forma que otros programas no puedean cambiarlo hasta que se produzca un compromiso. Encontrará los detalles sobre el proceso de compromiso en Unidad lógica de trabajo.
En el siguiente fragmento, el código imprime información para cada pedido (segmento hijo) de una ubicación (segmento padre) de un cliente:
while (record1 not endOfFile) try get next inparent record1; onException myErrorHandler(12); end ordersForLocation = ordersForLocation + 1; printOrderDetail(record1); end // fin de while
Conceptos relacionados
Soporte de bases de datos DL/I
Tipos de registros y propiedades
Tareas relacionadas
Diagrama de sintaxis para sentencias y mandatos EGL
Consulta relacionada
Directiva #dli
add
Consideraciones relacionadas con CICS
delete
Manejo de excepciones
get
get next
Valores de error de E/S
Sentencias EGL
replace
set