Para acceder a uno de subcampos, se puede realizar de la siguiente manera:
d Bkp140 DS
d DmBkp140 Dim(1000)
d VC 10 overlay(DmBkp140:*next)
d CD1 1 overlay(DmBkp140:*next)
d PR 1S 0 overlay(DmBkp140:*next)
d PF 13S 2 overlay(DmBkp140:*next)
Espero sirva para la necesidad.
----- Original Message -----
From: [EMAIL PROTECTED]
To: forum.help400
Sent: Friday, December 28, 2007 9:57 AM
Subject: RE: Búsqueda en DS que es un Array (LOOKUP)
Hola,
yo me encontré con un caso similar y después de buscar un poco llegué a la
conclusión de que no se puede hacer :-(
La solución que adopté fue la que tu has propuesto, tener una serie paralela
con el argumento de búsqueda.
Saludos
Cris
"Jose Luis Garcia" <[EMAIL PROTECTED]>
Enviado por: [EMAIL PROTECTED]
19/12/2007 16:05 Por favor, responda a
"forum.help400" <[email protected]>
Para "'forum.help400'" <[email protected]>
cc
Asunto RE: Búsqueda en DS que es un Array (LOOKUP)
Hola,
Y que tal si pruebas con:
c CD140 LOOKUP VC(x)
Saludos
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] nombre de Nicolas
Machado
Enviado el: miércoles, 19 de diciembre de 2007 13:52
Para: forum.help400
Asunto: Busqueda en DS que es un Array (LOOKUP)
Buenos Dias.
Queria consultarlos con esto:
Tengo una DS definida asi:
d Bkp140 DS Qualified Dim(1000)
d VC 10
d CD1 1
d PR 1S 0
d PF 13S 2
Como veran es una DS en forma de arreglo, y accedo a los elemntos con:
Bkp140(x).CD1 por ejemplo.
El tema es q quiero hacer un Lookup, solo por el sub-campo VC.
El LOOKUP no me permite poner:
El seu ya me da error:
c CD140 LOOKUP Bkp140(x).VC
si cambio y pongo
c CD140 LOOKUP Bkp140
Me da error al compilar
Pruebo con %LOOKUP en free format?
O creo un array paralelo para el campo de busqueda ?
Saludos
Nicolas
--
.::.
Nicolas Machado
Metodo Argentina S.A.
_____________________
__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
--
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.503 / Virus Database: 269.17.4/1189 - Release Date: 18/12/2007
21:40
__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
------------------------------------------------------------------------------
__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400