�Has probado con la funci�n %CHECK? Por ejemplo;
IF %CHECK('1234567890':ZNUMV:1)=0;
EVAL XENNCA=ZNUMV;
ELSE;
EVAL XENNCA=0;
EVAL XENEPL=ZNUMV;
ENDIF;
Saludos.
Juan Carlos.
> -----Mensaje original-----
> De: Miguel Angel Peinador [SMTP:[EMAIL PROTECTED]
> Enviado el: lunes, 28 de junio de 2004 14:06
> Para: [EMAIL PROTECTED]
> 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] <mailto:[EMAIL PROTECTED]>
> To: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
> Sent: Tuesday, May 25, 2004 1:39 PM
> Subject: Re: distinguir una letra en un alfanumerico
>
>
> Con TESTN
>
_____________________________________________________
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]
