Tema: [Sintaxis] Leer último registro
Ver Mensaje Individual
  #5
Antiguo 10 de mayo de 2020, 23:43
IDENTIFICATION DIVISION
JCantero
 Senior
Activista del Foro: Activista del Foro - Razón: Por participación activa  Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Razón: Por muchos agradecimientos de parte de los Foreros 
ENVIRONMENT DIVISION
Avatar de JCantero
DATA DIVISION
junio 2016
Albacete
56 años
26.05.2022 23:12
PROCEDURE DIVISION
Posts: 246
Enviado: 83
Recibido: 170
Soluciones: 11
Reputación: 23
JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road
Predeterminado

En rmcobol noo existe el "read .... last", existe "start .... last"

Respondiendo a @jmeza,

En cobol standard si quieres leer el ultimo registro de un fichero indexado, suponiendo que la clave primaria sea clave

Código COBOL:
  1. move high-values to clave
  2. start fichero key is less clave end-start
  3. read fichero previous end-read

Y el cobol tiene last

Código COBOL:
  1. start fichero key is last end-start
  2. read fichero previous end-read
JCantero no ha iniciado sesión   Responder Con Cita