Saludos a todos
No se si esto ya se haya comentado pero ahi va de nuevo
Quiero pasar un campo numerico a un caracter pero que me conserve el punto decimal,
estoy utilizando la funcion %EDITW pero no logro que funcione, por ejemplo:
varnum= 1234.56 longitud (16,2) la quiero pasar a un campo caracter de esta manera
varchar='00000000001234.56'
Segun el manual de ibm dice que si quieres conservar los ceros a la izquierda necesito
poner en la palabra de edicion un digito mas que la longitud de la variable a editar,
asi lo hago pero me da error de compilacion:
varchar=%Editw(varnum : '0 .00');
el error es el siguiente:
*RNF8004 20 1 There are not enough replaceable characters in the edit word;
editing is ignored.
*RNF8004 20 335 014200 The edit word has 15 replaceable characters but 16 are
needed.
Viendo este error, entiendo que los ceros despues del punto decimal en la palabra de
edicion no los toma en cuenta y me toma como caracteres reemplazables solo los que
estan antes del punto decimal, entonces le agrego el digito faltante y pruebo el
programa pero lo que me hace es pasar el valor numerico al caracter de esta manera
varchar='00000000123456.00'.
A lo mejor es algo sencillo pero no doy con la solucion, si alguien me hecha la mano
se lo agradezco
Gerardo Santillana
IT Department
Delphi Mechatronic Systems
US Ph: (956) 554 5832
MX Ph: (868) 812 81 63/64/65 Ext 5832
Pager: (956) 768 1048
e-mail [EMAIL PROTECTED]
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Guillermo Andrades
Sent: Wednesday, May 19, 2004 11:46 AM Gerardo
To: [EMAIL PROTECTED]
Subject: RE: limitar CHGJOB
Ya que meti la pata antes vamos a resumir el tema.
Con una recopilacion de lo dicho por los anteriores compa�eros, como arzak o
carlos de pastor, vamos a ver:
- a los programas de la aplicaci�n que no se tienen los fuentes hacerles
CHGOBJOWN OBJ(lib/pgm) OBJTYPE(*PGM) NEWOWN(QSECOFR)
CHGPGM PGM(lib/pgm) USRPRF(*OWNER)
- al comando CHGJOB con edtobjaut quitarle autoridad a public o a ciertos
usuarios y darle autoridad al usuario que se pone como propietario a los
programas que por dentro usan chgjob.
A ver si por este sendero podemos tener otra forma de atacar el problema?
Saludos
(estoy de mudanza y usando un modem para pillar el correo)
_____________________________________________________
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]
****************************************************************************************
Note: The information contained in this message may be privileged and confidential and
thus protected from disclosure. If the reader of this message is not the intended
recipient, or an employee or agent responsible for delivering this message to the
intended recipient, you are hereby notified that any dissemination, distribution or
copying of this communication is strictly prohibited. If you have received this
communication in error, please notify us immediately by replying to the message and
deleting it from your computer. Thank you.
****************************************************************************************
_____________________________________________________
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]
