Hola estimados amigos, Quisiera saber si alguien conoce como liberar un fuente que al tratar de entrar en modo edicion no me lo permite porque se encuentra bloqueado.
Espero su pronta respuesta. Muchas gracias Enviado desde Samsung Mobile -------- Mensaje original -------- De: Javier Mora <[email protected]> Fecha: 06/05/2014 6:55 AM (GMT-05:00) A: "forum.help400" <[email protected]> Asunto: RE: Campos de pantalla en array SI De: [email protected] [mailto:[email protected]] En nombre de alberto Enviado el: martes, 06 de mayo de 2014 13:33 Para: forum.help400 Asunto: RE: Campos de pantalla en array En Like(wMes1) quieres decir Like(wMes01) verdad? Gracias!! De: "Javier Mora" <[email protected]> Para: "forum.help400" <[email protected]> Fecha: 06/05/2014 12:27 Asunto: RE: Campos de pantalla en array D ventasMensuales... D DS D* Los campos de pantalla D wMes01 D wMes02 D wMes03 D wMes04 D wMes05 D wMes06 D wMes07 D wMes08 D wMes09 D wMes10 D wMes11 D wMes12 D* La matriz D ventaDelMes Like( wMes1 ) D Overlay( ventasMensuales ) D Dim( 12 ) /FREE For i = 1 To 12; Dsply %Editc( ventaDelMes( i ): 'K' ); EndFor; totalVentas = %Xfoot( ventaDelMes ); Con este código estás solapando los campos de pantalla (también es válido con un fichero de datos) con una matriz. Saludos, Javier De: [email protected] [mailto:[email protected]] En nombre de alberto Enviado el: martes, 06 de mayo de 2014 8:53 Para: forum.help400 Asunto: Campos de pantalla en array Hola Foro. Alguien ha tenido la necesidad de crear un array con los campos de una pantalla DSPF? del estilo de lo que hacdemos con el D E DS EXTNAME(FICHERODDS) D CAMPODDS 143 302 0 D DIM(20) pero en un fichero de pantalla. Se trata de ir leyendo un array y dependiendo de su índice, ponerlo en una columna determinada. del tipo: For @index=1 to @contador; campo_DSPF(@index)=campo_ARRAY(@index); endfor; Esto antes lo hacíamos a mano, pero no sé si con el free esto está resuelto. Gracias____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
