Segue abaixo código de minha autoria para validação do número SUFRAMA.
FUNCTION validaSUFRAMA RETURN LOGICAL
( INPUT p-suframa AS CHAR ):
DEF VAR c-suframa AS CHAR NO-UNDO EXTENT 2.
DEF VAR i-count AS INT NO-UNDO.
DEF...
-
Anuncie Aqui ! Entre em contato fdantas@4each.com.br -
-