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]
