procedimiento LeerAlgunosRegistros (

Fichero: cadena;

NRegistrosALeer: entero;

salida Registros: tabla de enteros;

salida NRegistrosLeidos: entero;

esGeneral: booleano = falso);

 

Carga en memoria un determinado número de registros de un fichero, decidiendo aleatoriamente cuáles y devolviendo los identificadores de los mismos en una tabla de enteros.


 

Carga en memoria NRegistrosALeer registros del Fichero y devuelve sus identificadores en la tabla de enteros Registros. En NRegistrosLeidos devuelve el número de registros cargados realmente, para tener en cuenta el caso de que el fichero tuviera menos registros que los que se deseaban leer. Los identificadores devueltos permiten trabajar con los registros usando las funciones incorporadas ValorRegistro, AsignarValorRegistro, GrabarRegistro, etc.

Módulo

G77_BD

Parámetros

Temas relacionados

·         Tutorial >> Operar con la base de datos >> Nombres de ficheros y códigos de campos

·         Tutorial >> Operar con la base de datos >> Correspondencia de los tipos de datos

·         Tutorial >> Operar con la base de datos >> Funciones de gestión de registros

·         Tutorial >> Operar con la base de datos >> Funciones de gestión de registros >> Gestionar todos los registros que cumplen una determinada condición

·         Tutorial >> Cómo ejecuta OriGn los scripts >> Casos conflictivos y su solución >> Creación de registros y otros cambios en ficheros

Ver también

Ejemplo

    (...)
 
    // Leer un contacto cualquiera
    AsignarOrdenRegistros(5000);
    LeerAlgunosRegistros('CONTACTO', 1, Contacto, numContacto);
    Aviso('Leídos '+inttostr(numContacto)+' contactos.');
 
    (...)