Siga-nos no Facebook Siga-nos no Instagram Siga-nos no LinkedIn Venha estudar Protheus
 
Bem Vindo Visitante Lista de Usuários

 Todos os Fórums
  Field Service

Enviar para a impressoraImprimir   

Subject Validação no campo memo
Mensagem do Enviar e-mail Abrir o Perfil do usu�rio ALEXLABTEC ALEXLABTEC em 18/02/2012 as 11:10 hs
Local: SP   Membro desde: 07/07/2006  Postagem: 153
Alexandro de Oliveira
Tecnologia da Informao
alexandro_analista@msn.com

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio ALEXLABTEC ALEXLABTEC em 18/02/2012 as 11:12 hs
Local: SP   Membro desde: 07/07/2006  Postagem: 153
Ele no executa a funo compilada?

Foi colocado no campo memo (x3_valid)

Mais no esta fazendo o que devia.

Estou tendo alguns problemas na validao de um campo memo, algum poderia me ajudar?

Segue o fonte.

Local _cMennota            := MSMM(M->AAM_CODMEM)
      Local _nx        := 0
      Local _lOk        := .T.
      
      For _nx := 1 To Len(alltrim(_cMennota))
           
           If alltrim(Substr(_cMennota,_nx,1)) $ '!@#$%&*()_-+=``"\?/|:;հ{}[]¢£'
                  
               MsgInfo("O campo contm caracter especial, favor corrigir","Ateno")
               _lOk := .F.
           
           Else      
           
               _lOk := .T.
            
           EndIf
           
      Next      

Return(_lOk)

Grato
Alexandro de Oliveira
Tecnologia da Informao
alexandro_analista@msn.com

Para participar do Fórum você precisa efetuar login primeiro
Caso você não esteja registrado registre-se para participar do fórum

 Mudar para Fórum