Hola Fernando, segun el manual puedes utilizar esta palabra "clave" en
archivos de pantalla o en la definicion de campos de un archivo DDS (OS/400
DDS Reference V4R2).

Te adjunto un ejemplo de como se haria en un archivo fisico.

===================================================================

4.93.1 MAPVAL (Map Values) Keyword--Example
 
Figure 4-130 shows how to specify the MAPVAL keyword.
 
 
 
|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+.
...8
  00010A
  00020A          R RECORD
  00030A            DATFLD1         L         DATFMT(*MDY) DATSEP('/')
  00040A                                              MAPVAL(('01/01/40'
*BLANK))
 
 
 
Figure  4-130. Specifying the MAPVAL Keyword
 
On output, if the field data equals '01/01/40', the field data is changed to
all blanks. On input, if the field data is blank, the field data is 
changed to '01/01/40'.

===================================================================


Un saludo


JMP




> -----Mensaje original-----
> De:   Fernando S�nchez [SMTP:[EMAIL PROTECTED]]
> Enviado el:   martes, 26 de noviembre de 2002 17:03
> Para: [EMAIL PROTECTED]
> Asunto:       RE: [Foro400] Impresion Campo de Fecha {1}
> 
> Utilizamos la version 5.1 y en la hoja D del RPG no permite la palabra
> clave
> MAPVAL
> �Alguna sugerencia?
> 
> -----Mensaje original-----
> De: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]En nombre de ajut 400
> Enviado el: martes 26 de noviembre de 2002 16:15
> Para: Foro400 List Member
> Asunto: [Foro400] Impresion Campo de Fecha {1}
> 
> 
> Hola:
> 
> Puedes incluir la palabra clave MAPVAL(('01.01.0001' *BLANK)) para el
> campo
> de tipo fecha. Siempre lo acompa�o con un DATFMT(*EUR).
> 
> Un saludo
> 
> --------------------------
> De todo sobre el AS/400 en
> http://www.ajut400.com
> 
> 
> 
> 
> 
> >From: Fernando S�nchez <[EMAIL PROTECTED]>
> >Reply-To: [EMAIL PROTECTED]
> >To: <[EMAIL PROTECTED]>
> >Subject: Impresion Campo de Fecha
> >Date: Tue, 26 Nov 2002 16:03:26 +0100
> >
> >Estamos comenzando a utilizar los campos de fecha, y nos encontramos con
> el
> >siguiente problema:
> >Programando en RPGILE, � se  puede limpiar un campo de fecha ?, o por el
> >contrario,  hay que controlar en impresi�n no imprimir el valor de
> >inicializaci�n 01.01.001.
> >
> >
> >      oooooooooooooooooooooooooo ______\|/_________________
> >     oo_/_/_/oo_/_/_/oo_/_/oooo  Metalkris, S.A.
> >    oo_/oooooo_/ooo_/o_/oo_/oo   Centro de Proceso de Datos
> >   oo_/oooooo_/_/_/oo_/oo_/oo    http://www.metalkris.es
> >  oo_/_/_/oo_/oooooo_/_/oooo     __________________________
> >oooooooooooooooooooooooooo      Fernando S�nchez Pi�a
> >
> >
> >
> >
> >_____________________________________________________
> >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]?body=LEAVE
> 
> 
> _________________________________________________________________
> Charla con tus amigos en l�nea mediante MSN Messenger:
> http://messenger.microsoft.com/es
> 
> 
> _____________________________________________________
> 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]?body=LEAVE
> 
> 
> _____________________________________________________
> 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]?body=LEAVE
> 

_____________________________________________________
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]?body=LEAVE

Responder a