Esto fue lo que hice al principio, usar OPEN, CLOSE, pero no se me hizo muy practico, voy a probar con los numeros relativos y hacer eso que dices para obtener el ultimo registro
Gracias Gerardo Santillana IT Department Delphi Mechatronic Systems US Ph: (956) 554.5832 MX Ph: (88) 12.81.63/64/65 Ext. 5832 e-mail [EMAIL PROTECTED] -----Original Message----- From: Victor Velardez BT [mailto:[EMAIL PROTECTED]] Sent: Thursday, February 20, 2003 10:43 AM To: [EMAIL PROTECTED] Subject: RE: Incio y fin de archivo Entonces usa OPEN/CLOSE dentro del programa y call QCMDEXC cuando sea necesario reposicionarte en el archivo otra forma seria recuperar la cantidad de registros del archivo antes con RTVMBRD NBRCURRCD(XXXXX) pasale como parametro la cantidad al programa y te mueves tranquilo con 1 CHAIN al principio o XXXXX CHAIN al final > -----Mensaje original----- > De: gerardo.santillana [SMTP:[EMAIL PROTECTED]] > Enviado el: Jueves, 20 de Febrero de 2003 01:38 p.m. > Para: [EMAIL PROTECTED] > Asunto: RE: Incio y fin de archivo > > Pero con esto solo seria al inicio del programa y yo necesito estarlo haciendo >varias veces durante el programa > > Gerardo Santillana > IT Department > Delphi Mechatronic Systems > US Ph: (956) 554.5832 > MX Ph: (88) 12.81.63/64/65 Ext. 5832 > e-mail [EMAIL PROTECTED] > > > > -----Original Message----- > From: Victor Velardez BT [mailto:[EMAIL PROTECTED]] > Sent: Thursday, February 20, 2003 10:28 AM > To: [EMAIL PROTECTED] > Subject: RE: Incio y fin de archivo > > > > Tambien lo podes hacer con un oVRDBF antes de ejecutar el programa > > OVRDBF ARCHIVO biblioteca/ARCHIVO position(*START) o position(*END) > > > > > -----Mensaje original----- > > De: gerardo.santillana [SMTP:[EMAIL PROTECTED]] > > Enviado el: Jueves, 20 de Febrero de 2003 01:21 p.m. > > Para: [EMAIL PROTECTED] > > Asunto: RE: Incio y fin de archivo > > > > Esto es precisamente lo que quiero, y de lo ultimo si me interesa, cuando lo >tengas a la mano te agradeceria si me dices como hacerlo > > > > Gracias a todos por su ayuda > > > > Gerardo Santillana > > IT Department > > Delphi Mechatronic Systems > > US Ph: (956) 554.5832 > > MX Ph: (88) 12.81.63/64/65 Ext. 5832 > > e-mail [EMAIL PROTECTED] > > > > > > > > -----Original Message----- > > From: Jesus Arzak [mailto:[EMAIL PROTECTED]] > > Sent: Thursday, February 20, 2003 9:10 AM > > To: [EMAIL PROTECTED] > > Subject: Re: Incio y fin de archivo > > > > > > > > > > Cuando te refieres a primero y ultimo entiendo, por el comentario que haces de > > *LOVAL y *HIVAL, que los tendras ordenado desde el QRY. > > Si no es asi lo primero que debes hacer es ordenarlo en el QRY. Una vez ordenado > > lo que tienes que hacer es acceder por registro relativo. > > > > Para el primero haces un chain con numero de registro relativo 1 y para el > > ultimo lo haces con el numero total de registros. Este ultimo lo debes de > > recoger de la estructura de informacion de registro pero en estos momentos no lo > > tengo a mano. Si lo necesitas lo busco y te digo como hacerlo. > > > > > > Un saludo, > > > > > > Jesus M� Arzak Capilla > > Talleres de Escoriaza,S.A. > > Dpto Proceso de Datos > > > > www.tesa.es > > > > > > > > > > > > > > > > "gerardo.santillana" <[EMAIL PROTECTED]> con fecha 20/02/2003 > > 16:33:01 > > > > Por favor, responda a [EMAIL PROTECTED] > > > > Destinatarios: [EMAIL PROTECTED] > > CC: (cci: Jesus Arzak/TESANET) > > Asunto: Incio y fin de archivo > > > > > > > > > > Hola a todos > > > > Tengo un archivo generado por un query (no tiene llaves), el cual lo utilizo en > > un programa RPG, como le hago para posicionarme en el primer registro o el > > ultimo, ya que las instrucciones *LOVAL y *HIVAL no me funcionan, o tengo que > > usar el OPEN, CLOSE para poder hacerlo? > > > > Saludos > > > > Gerardo Santillana > > IT Department > > Delphi Mechatronic Systems > > US Ph: (956) 554.5832 > > MX Ph: (88) 12.81.63/64/65 Ext. 5832 > > e-mail [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, env�a el mensaje resultante de pulsar> > > mailto:[EMAIL PROTECTED]?bodyLEAVE > > > > > > > > > > > > > > > > > > _____________________________________________________ > > 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, env�a el mensaje resultante de pulsar > > mailto:[EMAIL PROTECTED]?body=AVE > > > > _____________________________________________________ > > 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, env�a el mensaje resultante de pulsar > > mailto:[EMAIL PROTECTED]?body=AVE > > La informacion contenida en este correo es para uso exclusivo de los destinatarios >del mismo. > Esta prohibido a las personas o entidades que no sean los destinatarios de este >correo > realizar cualquier tipo de modificacion, copia o distribucion del mismo. > Si Usted recibe este correo por error tenga bien notificar al emisor y eliminarlo. > > _____________________________________________________ > 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, env�a el mensaje resultante de pulsar > mailto:[EMAIL PROTECTED]?body=AVE > > _____________________________________________________ > 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, env�a el mensaje resultante de pulsar > mailto:[EMAIL PROTECTED]?body=AVE La informacion contenida en este correo es para uso exclusivo de los destinatarios del mismo. Esta prohibido a las personas o entidades que no sean los destinatarios de este correo realizar cualquier tipo de modificacion, copia o distribucion del mismo. Si Usted recibe este correo por error tenga bien notificar al emisor y eliminarlo. _____________________________________________________ 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, env�a el mensaje resultante de pulsar mailto:[EMAIL PROTECTED]?body=AVE _____________________________________________________ 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, env�a el mensaje resultante de pulsar mailto:[EMAIL PROTECTED]?body=LEAVE
