Histórico da Página

/*/{Protheus.doc} User Function MT261ACS
    Validação para abrir a rotina
    @type  Function
    @author TOTVS
    /*/
User Function MT261ACS()
    Local lRet  := .T.
    Local dBloq := SuperGetMV('MV_DBLQMOV')
    Local cMsg  := ''

    If dDataBase <= dBloq
        lRet := .F.
        cMsg := "O sistema está em fechamento de estoque, não é permitido utilizar "
        cMsg += "a rotina de transferências."
        Help(,, "MT261ACS",, cMsg, 1, 0)
    EndIf

Return lRet