Árvore de páginas

Mascara para Campo

Produto:

ADVPL

Versões:

Todas

Ocorrência:

Como criar uma mascara em um campo onde possa utilizar em duas rotinas distintas?

Ambiente:

P12

Passo a passo:

Na configuração do campo no Formato @!@R AAA-9999 e Form. Variável chame a sua user function


---------------------------------------------------------------------------------------

#Include "protheus.ch"

function u_MASKA()//testE ok

local cRet AS CHARACTER
local cRot AS CHARACTER

cRet := ""
cRot := allTrim(funName())

if cRot == "MATA103"
cRet := "@!@R AAA-999"
else
cRet := "@!"
endIf

cRet := cRet + "%C"

return UPPER(cRet)

Observações:

http://tdn.totvs.com/display/public/mp/FWModelActive