Title: Adimpo Iberia S.L.

     Buenos días
 
Estoy empezando a escribir RPG libre en un pgm cgi  y me encuentro con el desagradable sorpresa de el código:
 
     Chain clave   fichero;
     If     %found() ;
       ........   
       endif;
Nunca lo encuentra, este o no en el fichero,  en cambio si pongo:
 
      If       %found(fichero);
       ........
      endif;
Si la clave esta, si lo encuentra.
 
 
¿Porque?
 
También para actualizar fichero con un pgm CGI al ejecutar:
     Chain clave   fichero;
     If     %found(fichero) ;
       ........   
 
      Update reg_fichero;
       endif;
 
Al hacer el update me salta un error, indicándome que debo hacer una lectura antes de una actualización.      
 
 
 
 

Emiliano Rubio
Departamento Informática
902 194 320
e [EMAIL PROTECTED]

Responder a