Histórico da Página

#Include "Protheus.ch"
#Include "TopConn.ch"

user function MT540VLD()

Local cOpc  := PARAMIXB[1] //1 - Inclusão  2 - Alteração
Local aCols := PARAMIXB[2] //Representa as informações digitadas no grid no range de 1 ao 23
Local lRet	:= .T.                           

//Os elementos 24 e 25 não devem ser alterados                            

alert("Passei pelo Ponto de Entrada MT540VLD")

if aCols[1][2] == "BA"   
    lRet := .F.
endif   

Return lRet