0100.00 c eval WCMD ='ADDDIRE USRID(' +
0101.00 c %trim(USER) + ' XXXXXXXX) ' +
0102.00 c 'USRD(' + '''' + + %trim(DESC) + '''' +
') ' +
0103.00 c 'USER(' + %trim(USER) + ') ' +
0104.00 c 'NETUSRID(' + %trim(USERID) + ')'
Saludos.
Juan Carlos.
________________________________
De: JUAN García [mailto:[EMAIL PROTECTED]
Enviado el: viernes, 24 de octubre de 2008 13:01
Para: forum. help400
Asunto: Incluir comilla en campo alfanumérico
Buenos días
En un programa RPG, tengo un campo alfanumérico al que le quiero
asignar un valor para que añada una entrada de directorio mediante un mandato
CL que posteriormente proceso con QCMDEXC, este mandato incluye un parámetro
(USRD) que incluye comilla inicial después del paréntesis y comilla final antes
del paréntesis, pero no consigo hacerlo, esta es la instrucción que tengo
actualmente:
0100.00 c eval WCMD ='ADDDIRE USRID(' +
0101.00 c %trim(USER) + ' XXXXXXXX) ' +
0102.00 c 'USRD('' + %trim(DESC) + '') ' +
0103.00 c 'USER(' + %trim(USER) + ') ' +
0104.00 c 'NETUSRID(' + %trim(USERID) + ')'
el campo es USRD, quiero que sea: USRD(' XXXXXXXXXXXXXXX '), he probado
con comillas dobles, pero el SEU da error, he probado añadiendo +'''+ pero me
graba USRD(' + %trim(DESC) +)
¿alguna idea?
Un saludo
No virus found in this incoming message.
Checked by AVG - http://www.avg.com
Version: 8.0.175 / Virus Database: 270.8.2/1742 - Release Date:
23/10/2008 15:29
De acuerdo con la Ley orgánica 15/1999, de 13 de diciembre, de
Protección de Datos de Carácter Personal, le informamos que los datos
que nos facilite podrían ser incluidos en los ficheros de *GRUPO EVEREST
con fines comerciales, contractuales y publicitarios y, a tal efecto,
serán cedidos a otras empresas del Grupo Everest dedicadas a actividades
de impresión, encuadernación, edición, publicación, distribución y venta
de libros y otra clase de publicaciones. Sus datos se presumen
veraces mientras no nos comunique lo contrario. Podrá ejercitar sus
derechos de acceso, rectificación, candelación y oposición en la
siguiente dirección, carretera León - A Coruña, km.5, s/n, código postal
24010 (León).
*GRUPO EVEREST está integrado por EDITORIAL EVEREST,S.A, EVEREST DE
EDICIONES Y DISTRIBUCIÓN,S.L., LA BOUTIQUE DEL LIBRO Y DEL OCIO,S.L.,
GRUPO EVERHOUSE,S.L., EDITORIAL EVEREST ANDALUCÍA,S.L., EDICIONES
GAVIOTE,S.L., EDICIONES CADÍ,S.L., EDITORIAL EVERGRÁFICAS,S.L., GRUPO
EVEREST DE COMUNICACIÓN,S.L., EDITORIAL EVEREST GALICIA,S.L., AIZKORRI
ARGITALETXEA, S.L.
__________________________________________________
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 visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
