Ya se que es una tonteria, �pero tiene el archivo de entrada compartido con
share=*yes? Si no lo tienes puesto no seleccionara registros.

Salu2.

-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] En nombre de gerardo.santillana
Enviado el: viernes, 04 de junio de 2004 18:17
Para: [EMAIL PROTECTED]
Asunto: OPNQRYF



Hola a todos

  alquien que me de una mano con esto,  estoy haciendo un OPNQRYF de un
archivo y quiero seleccionar solo los registros de acuerdo a un rango que se
captura por pantalla, el comando queda asi:

CHGVAR     VAR(&QRYSLT) VALUE('SQTY01 *EQ %range(' *CAT + &PRBYCIC *BCAT
&PRBYCFC *CAT ')')               

OPNQRYF    FILE((FIS6D)) OPTION(*INP) QRYSLT(&QRYSLT)


segun los datos que se capturan en pantalla los valores puedes ser positivos
o negativos y al final la variable QRYSLT puede quedar asi valores positivos
QRYSLT= 'SQTY01 *EQ %range(0000000030 00000000050) 

valores negativos
QRYSLT= 'SQTY01 *EQ %range((0000000030) (00000000050)) 


El problema es que cuando leo el archivo a traves de un programa detecta que
el archivo esta vacio, el query no selecciona nada y si hay informacion en
el archivo principal

Cualquier sugerencia es bienvenida

Gracias


Gerardo Santillana
IT Department
Delphi Mechatronic Systems
US Ph: (956) 554 5832
MX Ph: (868) 812 81 63/64/65  Ext 5832
Pager: (956) 768 1048
e-mail [EMAIL PROTECTED]



-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of alex martinez
Sent: Thursday, June 03, 2004 2:51 PM Gerardo
To: [EMAIL PROTECTED]
Subject: Re: Copiar estructura de registro a una varible


Claro que s�:

se declara mas o menos as�:

Dnombreds      E DS                  EXTNAME(fichero)

SAlu2



----- Original Message -----
From: rafaeljbm <[EMAIL PROTECTED]>
Date: Thu, 3 Jun 2004 15:14:14 -0400
Subject: Copiar estructura de registro a una varible
To: [EMAIL PROTECTED], [EMAIL PROTECTED]


Buenas Tardes foreros
    Necesito copiar un registro completo a una varible, se que debo definir
la varible como una estructura de datos con la difinici�n e los campos en la
hoja D y luego realizar el move, pero el registro tiene 70 campos y es
bastante tedioso.
    Mi pregunta... no hay alguna funcion incorporada en ILE que me permita
definir una varible y que herede la estructura del registro sin necesidad de
declararla campo a campo en la DS???


Gracias de antemano


RBM

_____________________________________________________
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]

****************************************************************************
************

Note: The information contained in this message may be privileged and
confidential and thus protected from disclosure. If the reader of this
message is not the intended recipient, or an employee or agent responsible
for delivering this message to the intended recipient, you are hereby
notified that any dissemination, distribution or copying of this
communication is strictly prohibited. If you have received this
communication in error, please notify us immediately by replying to the
message and deleting it from your computer. Thank you.


****************************************************************************
************

_____________________________________________________
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]


_____________________________________________________
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]

Responder a