User Function SSAUTOM Local aSolic := { {"TQB_CODBEM", "0000000000000001" ,Nil},; // Codigo do Bem a ser relacionado na Solicitacao de Servico {"TQB_RAMAL" , "0001" ,Nil},; // Ramal do funcionario que abriu a solicitacao de Servico {"TQB_DESCSS", "Servico a ser executado. " + CHR(13)+CHR(10) + ; DTOC(Date()) ,Nil} } // Descricao da Solicitacao Private lMSHelpAuto := .t. // Nao apresenta erro em tela Private lMSErroAuto := .f. // Caso a variavel torne-se .T. apos MsExecAuto, apresenta erro em tela MSExecAuto( {|x,z,y,w| MNTA280(x,z,y,w)}, , , aSolic ) If lMsErroAuto Mostraerro() Endif Return