Histórico da Página

#INCLUDE "PROTHEUS.CH"

User Function FATTRVSA1()

Local lRet         := .F.
Local cFilialSA1   := PARAMIXB[1]
Local cCodSA1      := PARAMIXB[2]
Local cLojaSA1     := PARAMIXB[2]
Local cRotName     := FunName()

lRet := MsgYesNo(       "FATTRVSA1 - Deseja realizar o travamento (Lock) do registro na tabela SA1:" + CRLF + ;
                        "|Filial: " + cFilialSA1 + CRLF +;
                        "|Cod: " + cCodSA1  + CRLF +;
                        "|Loja: " + cLojaSA1  + CRLF + ;
                        "|Rotina do Menu: " + cRotName )

Return lRet