Resultados 1 al 10 de 10

Tema: Leer último registro

  1. #1
      Junior
    j

    Registrado
    abril de 2017
    Mensajes
    94
    Ciudad
    Curico Chile

    Agradecimientos
     
    Recibidos
    3
    Enviados
    24

    Citaciones y menciones
     
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    6

    Predeterminado Leer último registro

    Hola, como puedo hacer para dar lectura al último registro de un archivo sin tener que hacer una lectura secuencial y que posterior muestre el numero en Cmtext1, que es el primer campo del form y la key del registro, que esto lo haga al ejecutar el form.

    slds

    0 Not allowed!

  2. #2
      Administrador Avatar de Kuk

    Registrado
    enero de 2015
    Edad
    37
    Mensajes
    2,010
    Ciudad
    Madrid

    Agradecimientos
     
    Recibidos
    860
    Enviados
    718

    Citaciones y menciones
     
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    5 Post(s)
    Poder de Reputación
    10

    Predeterminado

    @jmeza,

    COBOL Código:
    1. READ nombre_fichero LAST

    0 Not allowed!

    ¿Te han ayudado? NO TE OLVIDES de darle al botón
    ¿Quieres dirigirte a alguien en tu post? Notifícale con una mención, tienes 2 opciones:
    1. Haciendo clic en el icono al lado de su nick
    2. Haciendo clic en el editor al botón y escribiendo su nick.

  3. #3
      Junior
    j

    Registrado
    abril de 2017
    Mensajes
    94
    Ciudad
    Curico Chile

    Agradecimientos
     
    Recibidos
    3
    Enviados
    24

    Citaciones y menciones
     
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    6

    Predeterminado

    Cita Iniciado por Kuk Ver Mensaje
    @jmeza,

    COBOL Código:
    1. READ nombre_fichero LAST
    Kuk, que sigue después
    READ MAEMOVI LAST.

    Me da este error al compilar

    MBDGA02 CmText1-Return(40) : JMN2500I-S The compiler has encountered a word 'LAST' where a statement is expected.

    0 Not allowed!

  4. #4
      Senior Avatar de Roger

    Registrado
    febrero de 2015
    Mensajes
    255
    Ciudad
    Lima

    Agradecimientos
     
    Recibidos
    82
    Enviados
    27

    Citaciones y menciones
     
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    14

    Predeterminado

    Tengo entendido que ese comando solo funciona el compilador rmcobol salvo equivocarme.
    LESS (<) menor que.
    NOT LESS (NOT <) no menor que.
    EQUAL (=) igual a.
    GREATER (>) mayor que.
    NOT GREATER (NOT >) no mayor que.
    GREATER OR EQUAL (>=) mayor o igual que.
    LESS OR EQUAL (<=) menor o igual que.
    FIRST principio de fichero (RM/COBOL).
    LAST final del fichero (RM/COBOL).


    para encontrar en ultimo registro lo que hago es
    COBOL Código:
    1. READ MAEMOVI PREVIOUS RECORD WITH NO LOCK END READ.

    El primer registro que muestre sera el ultimo.

    0 Not allowed!

  5. #5
      Senior
    J

    Registrado
    junio de 2016
    Edad
    56
    Mensajes
    280
    Ciudad
    Albacete

    Agradecimientos
     
    Recibidos
    181
    Enviados
    92

    Citaciones y menciones
     
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    24
    Activista del Foro / Point Value: 0 Agradecimientos / Point Value: 0

    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

    COBOL Código:
    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

    COBOL Código:
    1. start fichero key is last end-start
    2. read fichero previous end-read

    0 Not allowed!

  6. #6
      Administrador Avatar de Kuk

    Registrado
    enero de 2015
    Edad
    37
    Mensajes
    2,010
    Ciudad
    Madrid

    Agradecimientos
     
    Recibidos
    860
    Enviados
    718

    Citaciones y menciones
     
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    5 Post(s)
    Poder de Reputación
    10

    Predeterminado

    @jmeza, me he equivocado. @JCantero, lleva razón, no es READ sino START!

    se empieza a notar que no codifico últimamente.

    0 Not allowed!

    ¿Te han ayudado? NO TE OLVIDES de darle al botón
    ¿Quieres dirigirte a alguien en tu post? Notifícale con una mención, tienes 2 opciones:
    1. Haciendo clic en el icono al lado de su nick
    2. Haciendo clic en el editor al botón y escribiendo su nick.

  7. #7
      Senior
    J

    Registrado
    junio de 2016
    Edad
    56
    Mensajes
    280
    Ciudad
    Albacete

    Agradecimientos
     
    Recibidos
    181
    Enviados
    92

    Citaciones y menciones
     
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    24
    Activista del Foro / Point Value: 0 Agradecimientos / Point Value: 0

    Predeterminado

    @Kuk,

    Cuando empezamos a trabajar con asistentes y copia pega suele pasar.
    Jajajaja

    0 Not allowed!

  8. #8
      Super Moderador Avatar de Josber

    Registrado
    febrero de 2015
    Mensajes
    641
    Ciudad
    Alicante

    Agradecimientos
     
    Recibidos
    338
    Enviados
    298

    Citaciones y menciones
     
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    3 Post(s)
    Poder de Reputación
    35
    Activista del Foro / Point Value: 0 Agradecimientos / Point Value: 0

    Predeterminado

    Cita Iniciado por JCantero Ver Mensaje
    Cuando empezamos a trabajar con asistentes y copia pega suele pasar

    ¡¡ Que vaaaaa !! no es eso JC, es que algunos se van haciendo mayores ya y ....

    0 Not allowed!

  9. #9
      Administrador Avatar de Kuk

    Registrado
    enero de 2015
    Edad
    37
    Mensajes
    2,010
    Ciudad
    Madrid

    Agradecimientos
     
    Recibidos
    860
    Enviados
    718

    Citaciones y menciones
     
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    5 Post(s)
    Poder de Reputación
    10

    Predeterminado

    @JCantero, llevo ya unos 5 años sin codificar casi.

    0 Not allowed!

    ¿Te han ayudado? NO TE OLVIDES de darle al botón
    ¿Quieres dirigirte a alguien en tu post? Notifícale con una mención, tienes 2 opciones:
    1. Haciendo clic en el icono al lado de su nick
    2. Haciendo clic en el editor al botón y escribiendo su nick.

  10. #10
      Forero
    G

    Registrado
    febrero de 2015
    Edad
    67
    Mensajes
    180
    Ciudad
    Quilmes, Buenos Aires

    Agradecimientos
     
    Recibidos
    118
    Enviados
    89

    Citaciones y menciones
     
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    19
    Concurso: Segundo puesto / Point Value: 0 Activista del Foro / Point Value: 0

    Predeterminado

    Cita Iniciado por JCantero Ver Mensaje
    @Kuk,

    Cuando empezamos a trabajar con asistentes y copia pega suele pasar.
    Jajajaja
    Cuanto de verdad hay en eso, yo hasta la WORKING ya ni recuerdo el orden de las sentencias.

    0 Not allowed!

Información de Tema

Usuarios Viendo este Tema

Actualmente hay 1 usuarios viendo este tema. (0 miembros y 1 visitantes)

Temas Similares

  1. [Sintaxis] Lectura del ultimo registro
    Por jmeza en el foro PowerCOBOL (ActiveX, v4 - v11)
    Respuestas: 4
    Último Mensaje: 05.02.2018, 03:13
  2. [Información] Variar Tamaño de registro
    Por Gatomalo en el foro RM/COBOL
    Respuestas: 4
    Último Mensaje: 21.11.2017, 00:34
  3. [Sintaxis] Uso de COMP-6 en registro
    Por jmeza en el foro Fujitsu COBOL
    Respuestas: 3
    Último Mensaje: 17.06.2017, 02:52
  4. [Sintaxis] Ultimo registro de una tabla
    Por Dasije en el foro WinDev
    Respuestas: 0
    Último Mensaje: 11.08.2016, 02:32
  5. [Información] Registro encontrado
    Por Dasije en el foro WinDev
    Respuestas: 0
    Último Mensaje: 07.08.2016, 20:55

User Tag List

Permisos de Publicación

  • No puedes crear nuevos temas
  • No puedes responder temas
  • No puedes subir archivos adjuntos
  • No puedes editar tus mensajes
  •