Tenias razon Toni,  ya funciono, se me escapaba ese peque�o detalle

Gracias

Gerardo Santillana
IT Department
Delphi Mechatronic Systems
Phone USA  (956) 554 5832
Phone MX  01868 8128163   x.5832


-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of [EMAIL PROTECTED]
Sent: Friday, June 10, 2005 8:09 AM
To: [email protected]
Subject: Re: Concatenacion


Creo que deberias colocar %trim tambien en STREAMIL, para suprimir los
blancos.

   stremail= 'email1';

   if a6mail <> *blanks;
    stremail=%trim(stremail) + '('+%trim(A6mail)+') ';
    bsent=*on;
  endif;
//
if a7mail<> *blanks;
    stremail=%trim(stremail) + '('+%trim(A7mail)+') ';
    bsent=*on;
endif;



Toni Tort
Sistemes d'Informaci�.
Vives Vidal, Vivesa, S.A


                                                                          
             "gerardo.santilla                                            
             na"                                                          
             <gerardo.santilla                                          To
             [EMAIL PROTECTED]>            "Forum. Help400 \(E-mail\)"        
             Sent by:                  <[email protected]>         
             forum.help400-adm                                          cc
             [EMAIL PROTECTED]                                                
                                                                   Subject
                                       Concatenacion                      
             09/06/2005 22:52                                             
                                                                          
                                                                          
             Please respond to                                            
             [EMAIL PROTECTED]                                            
                  bios.es                                                 
                                                                          
                                                                          





Saludos a todos

  Como puedo concatenar una variable en un ciclo o en una serie de IF,  en
  RPG Free ?  por ejemplo

   stremail= 'email1';

   if a6mail <> *blanks;
    stremail=stremail + '('+%trim(A6mail)+') ';
    bsent=*on;
  endif;
//
if a7mail<> *blanks;
    stremail=stremail + '('+%trim(A7mail)+') ';
    bsent=*on;
endif;

quiero que la variable STREMAIL tenga como resultado  STREMAIL= 'email1
email2 email3 etc',  mas cuando ejecuto el programa  la variable STREMAIL
sigue conservando el valor original STREMAIL='email1'

 no se puede concatenar una misma variable agregandole mas datos?




****************************************************************************************


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 visita la siguente URL:
 http://coyote.combios.es/mailman/listinfo/forum.help400


__________________________________________________
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://coyote.combios.es/mailman/listinfo/forum.help400

****************************************************************************************

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 visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

Responder a