Buenas.

Por cada comilla que quieras poner dentro del literal (o sea entre comillas)
tienes que poner dos. 

Es decir: EVAL x = ’’’hola’’ ‘’perola’’’

Asigna a la variable x el valor entre corchetes = [‘hola’ ‘perola’]

En tu caso:

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) + ')'  

 

Gustavo Adolfo Márquez Álvarez.

Departamento de Informática.

[EMAIL PROTECTED]

 

inforZitro, S. L.

Carretera de Níjar, nº 404.

04007 Almería (España).

Teléfono:    950 226 658.

Extensión:              148.

Fax:          950 223 620.

-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] En nombre de Guillermo
Andrades (CPI Software)
Enviado el: viernes, 24 de octubre de 2008 13:23
Para: forum.help400
Asunto: Re: Incluir comilla en campo alfanumérico

 

una opcion es definir el campo DESC como de longitud variable y ya no te
hace falta el trim.

Saludos,
Guillermo Andrades
http://cpiSoftware.es





2008/10/24 JUAN García <[EMAIL PROTECTED]>

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                    

 

__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#169; 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

Responder a