Tema: Leer indexado hacía atrás por clave alterna
Ver Mensaje Individual
  #2
Antiguo 10 de noviembre de 2016, 13:35
Fito
Guardián del Foro
Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos de parte de los Foreros Guardián del Foro: Guardián del espíritu y clima del Foro - Issue reason: Por el Avatar Activista del Foro: Activista del Foro - Issue reason: Por aportar ideas 
Última Actividad 21.09.2026 14:47
Posts Posts: 458
Likes enviados Enviados: 269
Likes recibidos Recibidos: 243
Predeterminado
1
Likes

Hrmcobol

 Inactivo Inactivo
Hola:

Sería algo así:

Código COBOL:
  1.     move 999999      to wki-canreg.
  2.     start workidx key is not > wki-clave-1 invalid go sale.
  3.  
  4. leo.
  5.     read workidx previous at end go sale.
  6.  
  7.     .....
  8.  
  9.     go leo.
  10.  
  11. Sale.

Saludos.

Fito
Fito is offline   Responder Con Cita