Re: distinguir una letra en un alfanumerico

[Miguel Angel Peinador]

El problema viene por que si al final del campo vienen determinadas letras (como el ejemplo que puse '   7B') lo toma como num�rico. lo he solucionado poniendo un cero al final en un campo una posicion mayor.      C                     MOVE '000000'  ALF6    6             C                     MOVELZNUMV     ALF6                  C                     TESTN          ALF6       3737       C         37          MOVE ZNUMV     XENNCA                C         37          MOVE *BLANKS   XENEPL                C        N37          MOVE *ZEROS    XENNCA                C        N37          MOVE ZNUMV     XENEPL                C                     MOVELXENSDI    XENSIG                C                     END                                     Gracias a todos.   ----- Original Message ----- From: [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Monday, June 28, 2004 5:55 PM Subject: Re: distinguir una letra en un alfanumerico Hola. Prueba con: C                     TESTN          ZNUMV      373839 El primer indicador,el 37 s�lo se enciende si todos los datos son num�ricos. Salu2   "Miguel Angel Peinador" <[EMAIL PROTECTED]> Enviado por: [EMAIL PROTECTED] 28/06/04 14:05 Por favor, responda a [EMAIL PROTECTED] Para <[EMAIL PROTECTED]> cc Asunto Re: distinguir una letra en un alfanumerico Hace ya tiempo que pregunt� como distinguir si hay letras en un alfanum�rico, he probado con testn como me recomendaron pero hay determinadas letras que cuelan por ejemplo:   C                     TESTN          ZNUMV      3737       C         37          MOVE ZNUMV     XENNCA               <--- num�rico C        N37          MOVE *ZEROS    XENNCA               C        N37          MOVE ZNUMV     XENEPL               <--- alfanum�rico con '   7B' testn lo da como correcto num�ricoy lo pasa a 72 en un move de alfanum�rico a num�rico.   Yo quiero detectar si hay letras en el alfanum�rico y si las hay no moverlo a un num�rico.   �alguna ayuda?   Un saludo, Miguel     ----- Original Message ----- From: [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Tuesday, May 25, 2004 1:39 PM Subject: Re: distinguir una letra en un alfanumerico Con TESTN