Cross Segmentos - TOTVS Backoffice (Linha Protheus) - SIGAFAT - Ponto de Entrada MTA455P

User Function MTA455P()

    Local lRet := .F.   //Conteudo de retorno

    If MsgYesNo("Confirma a liberacao de estoque?", "PE MTA455P")
        lRet := .T.
        Alert("Passou pelo Ponto de Entrada MTA455P, liberacao confirmada") //Clicou no Sim
    Else
        lRet := .F.
        Alert("Passou pelo Ponto de Entrada MTA455P, liberacao nao confirmada") //Clicou no Não
    EndIf

Return(lRet)