Re: Campos de pantalla en array

[FB FB]

Mira quien lo está bloqueando (WRKOBJLCK)


El 6 de mayo de 2014, 16:04, manuel.orrala <manuel.orr...@gmail.com>escribió:

> 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 <jm...@musgrave.es>
> Fecha: 06/05/2014 6:55 AM (GMT-05:00)
> A: "forum.help400" <forum.help400@listas.combios.es>
> Asunto: RE: Campos de pantalla en array
>
>
> SI
>
>  ------------------------------
> *De:* forum.help400-boun...@listas.combios.es [mailto:
> forum.help400-boun...@listas.combios.es] *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" <jm...@musgrave.es>
> Para:        "forum.help400" <forum.help400@listas.combios.es>
> 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:* forum.help400-boun...@listas.combios.es [
> mailto:forum.help400-boun...@listas.combios.es<forum.help400-boun...@listas.combios.es>]
> *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 (c) Publicaciones Help400, S.L.
>
>
> ____________________________________________________
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 (c) Publicaciones Help400, S.L.
>



-- 
Atentamente.

RP Director Técnico
Tel. 93 255 31 51
Fax. 93 255 31 09

____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.