Estou com dificuldades em criar um método em uma classe de ferramentas para enviar email

foi desenvolvido o seguinte código:

        ; configurando servidor de e-mail
        
          Set server=##class(%Net.SMTP).%New()
          Set server.smtpserver="smtplw.com.br" //locaweb servidor
          //HotPOP SMTP server uses the default port (25)
          Set server.port=587
          
          //Create object to carry authentication
          Set auth=##class(%Net.Authenticator).%New()
          Set auth.UserName="email@dominio.com.br"
          Set auth.Password="1234"
          
          Set server.authenticator=auth
          Set server.AuthFrom=auth.UserName
        
        ; envio de e-mail
        
          Set msg = ##class(%Net.MailMessage).%New()
          Set From=server.authenticator.UserName
          Set:From="" From="email@dominio.com.br"
          Set msg.From = From
          
          Do msg.To.Insert(email)
          Set msg.Subject="Cadastro de Acesso "_$H
          Set msg.IsBinary=0
          Set msg.IsHTML=0
          Do msg.TextData.Write("Cadastro efetuado com sucesso.")
          
          Set status=server.Send(msg)
          &js<alert("status de envio de e-mail: "+#(status)#);>
          If $$$ISERR(status) {
            Do $System.Status.DisplayError(status)
            Set %error = server.Error
            Quit
          }
 

Acredito que está faltando incluir a porta do ssl/tls que, conforme a locaweb, é 465.

Mas onde?

Agradeço antecipadamente qualquer ajuda.