Re: Volver al primer registro en ficheor secuencial. Gracias

[Pedro Molina]

Hola !!

Yo utilizo *START, esto funciona con ficheros que no son indexados, y esto te permite posicionarte al inicio del archivo nuevamente asi:

C       *START      SETLL    ARCHIVO

o si quieres de esta forma:

/free

    SETLL *START ARCHIVO ;

/end-free

 

saludos !!  

 

---

From:  Fernando <[EMAIL PROTECTED]>
Reply-To:  forum.help400@combios.es
To:  forum.help400@combios.es
Subject:  Re: Volver al primer registro en ficheor secuencial. Gracias
Date:  Thu, 30 Mar 2006 11:45:07 -0300

Pero si haces:

 

1      CHAIN    ARCHIVO

 

Eso lo accede por numero relativo de Registro y no hace falta que sea un archivo con Clave.

 

Fernando.

 

El día 30/03/06, Andoni (Infonegocio) <[EMAIL PROTECTED]> escribió:

Gracias, he tenido que usar open y close, no me vale el setll porque el fichero
no tiene claves, se me olvidó deciroslo.

Un saludo


=================================================================
The Thu, 30 Mar 2006 12:00:19 +0200
"Juan Carlos Paredes" <[EMAIL PROTECTED]

> escribió:

> CLOSE FICHERO.
> OPEN FICHERO.
>
> Ya estás de nuevo al inicio.
>
> Saludos.
> Juan Carlos.
>
> > -----Mensaje original-----
> > De:

[EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED]] En nombre de Andoni (Infonegocio)
> > Enviado el: jueves, 30 de marzo de 2006 11:32

> > Para:       forum.help400@combios.es
> > Asunto:     Volver al primer registro en ficheor secuencial
> >
> > Hola gente:
> >

> > Perdonad, pero estoy atascado de curro, y no tengo tiempo de revolver en
> > manuales.
> >
> > ¿Como puedo en un programa RPGIII vover a posicionarme en el primer registro
> > dentro de un fichero secuencial?.

> >
> > Lo leo con read una vez, pero debo volver a leerlo de nuevo, y como es
> > secuencial no puedo usar el setll.
> >
> > Gracias
> >
> >
> > __________________________________________________

> > Forum.HELP400 es un servicio más de NEWS/400.
> > © Publicaciones Help400, S.L. - Todos los derechos reservados
> > http://www.help400.es
> > _____________________________________________________

> >
> > Para darte de baja visita la siguente URL:
> > http://coyote.combios.es/mailman/listinfo/forum.help400
> >

> > --
> > No virus found in this incoming message.
> > Checked by AVG Anti-Virus.
> > Version: 7.1.385 / Virus Database: 268.3.3/296 - Release Date: 29/03/2006
> >
> >

> --
> No virus found in this outgoing message.
> Checked by AVG Anti-Virus.
> Version: 7.1.385 / Virus Database: 268.3.3/296 - Release Date: 29/03/2006
>

--
Andoni  <

[EMAIL PROTECTED]>


__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados

http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

---

Las mejores tiendas, los precios mas bajos, entregas en todo el mundo, YupimMSN Compras: Haz clic aquí __________________________________________________ Forum.HELP400 es un servicio más de NEWS/400. © Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: http://coyote.combios.es/mailman/listinfo/forum.help400