Hola, puedes hacerlo así DRfichero E DS ExtName(ficheroext) Qualified D dim(999)
Saludos De: [email protected] [mailto:[email protected]] En nombre de alberto Enviado el: martes, 28 de abril de 2015 15:27 Para: forum.help400 Asunto: Array a partir de campos Buenas Foro. Para crear un array a partir de unos campos, se hacía lo siguiente: 1) definir la variable en la hoja D D VariableA S 2 0 DIM(2) D VariableB S 5 0 DIM(2) y luego, se le cambiaba el nombre al campo en la hoja I: IRfichero I VariableA1 Variablea(1) I VariableA2 Variablea(2) I VariableB1 VariableB(1) I VariableB2 VariableB(2) El caso es que esto es cuando se define un fichero internamente, pero...aqui viene la pregunta: ..Y si el registro está descrito en un Extname? DRfichero E DS occurs(999) Extname(ficheroext) Gracias!!! Cristina Cirera Rble. Grupo ITFrontOffice [email protected] Tel. 902 202 214 (ext. 287) Skype: [venca]<http://www.venca.es> [grupo3suisses] venca.es [facebook]<http://facebook.com/#!/venca.es> [twitter] <http://twitter.com/#!/Venca_es> [youTube] <http://youtube.com/user/VencaTv> [pinterest] <http://pinterest.com/VencaEs/> [instagram] <http://statigr.am/venca_es> [google plus] <https://plus.google.com/105927700885611334379> [SAVE PAPER] No imprimas si no es necesario. Protejamos el Medio Ambiente. SAVE PAPER - THINK BEFORE YOU PRINT AVISO: El contenido de este mensaje y sus anexos es confidencial. Le comunico la prohibición de su utilización, divulgación y/o copia, sin la correspondiente autorización. Si ha recibido este mensaje por error, agradecería lo comunique inmediatamente al remitente y proceda asimismo a su destrucción según indica la LOPD.
____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
