Olá Edilson, você pode fazer o upload de arquivo através de um página CSP, utilizando um input do tipo file e fazendo o submit do arquivo e depois salva a stream no servidor utilizando a classe %File. Abaixo um exemplo, pode ter erro pois não executei.

Class cjs.UlpoadArquivo Extends %CSP.Page
{

ClassMethod OnPage() As %Status
{
  &HTML<
    <form method="post" enctype="multipart/form-data">
      <input type="file" name="file" />
      <input type="submit" />
    </form>
  >
  Return $System.Status.OK()
}

ClassMethod OnPreHTTP() As %Boolean [ ServerOnly = 1 ]
{
  #Dim %request As %CSP.Request = %request
  If (%request.Method = "POST" && %request.GetMimeData("file"))
  {
    #Dim arquivo As %File = ##Class(%File).%New("<caminho/nomeArquivo>")
    #Dim statusCode As %Status = arquivo.Open("NWS")
    If ($System.Status.IsError(statusCode))
    {
      #Dim mensagemErro As %String = $System.Status.GetErrorText(statusCode)
      &HTML<
        <span>Erro ao criar arqvuio #(mesnagemErro)# </span>
      >
      Return $System.Status.OK()
    }
    Set statuCode = arquivo.CopyForm(%request.GetMimeData("file"))
    If ($System.Status.IsError(statusCode))
    {
      Set mensagemErro = $System.Status.GetErrorText(statusCode)
      &HTML<
        <span>Erro ao salvar arqvuio #(mesnagemErro)# </span>
      >
      Return $System.Status.OK()
    }
    Do arquivo.Close()
    &HTML<
       <span>Arquivo carregado para o servidor com sucesso.</span>
    >
  }
  Return $System.Status.OK()
}

Olá Edilson,

Existem rotinas legadas que fazem isso em especial %RIMF (importar) e %ROMF (exportar). veja a documetnaçao das rotinas legadas que ainda funcionam no IRIS https://docs.intersystems.com/priordocexcerpts/prgroutinechui-41.pdf

Olá Flávio,

Referente ao processo de criação de namespace e banco de dados você pode criar um manifesto de instalação e executar ele para automatizar a criação de tarefas de configuração de ambiente.

Dê uma olhada na documentação do Caché:

Creating and Using an Installation Manifest | Caché Installation Guide | Caché & Ensemble 2018.1.4 – 2018.1.8 (intersystems.com)
 

Obigado à todos. Foi um grande prazer em participar do concurso. Vamos continuar publicando e fazer a comunidade em Português crescer cada vez mais. 

Fala Paulão, dá uma olhada neste artigo https://community.intersystems.com/post/remote-code-execution-intersystems-cache-0. Acho que é o que você precisa.

Olá @Danusa Calixto 

Estou preparando alguma coisa. Espero que dê liga....  

@Eduardo Nacimento 

Esse erro ocorre por conta de restrição de segurança como a @Djeniffer Greffin comentou. 

Para poder liberar as chamadas às classes que iniciam com "%" siga os passos da documentação.

https://docs.intersystems.com/ens201817/csp/docbook/DocBook.UI.Page.cls?KEY=GSOAP_WebService#GSOAP_service_catalog_page_access

Abraço.

Olá @thales fernando alonso 

Infelizmente não temos muita literatura sobre as tecnologias da InterSystems.

Baixe nestes links: Conhecendo o Caché e Introdução a Orientação a Objetos escritos pelo Amir (hoje Diretor de Soluções e Arquitetura da InterSystems).

Espero que ajude.

Olá @Luiz Henrique Carvalho Martarelli 

Você pode sobrescrever o método OnPreDispatch da sua classe que herda de %CSP.REST

O Método OnPréDispatch é executado antes de que o método que conste na regra de roteamento seja executada.

Abaixo um exemplo onde faço o controle de CORS se o método da requisição for OPTION, e checo token de acesso para todos os endpoint exceto para o endpoints ping. 

O parâmetro pContinue quando verdadeiro sinaliza que o método que está na configuração de roteamento deverá ser executado, se falso responde para quem fez a chamada geralmente com algum HTTPStatus que indique o erro.

ClassMethod OnPreDispatch(pUrl As %String, pMethod As %String, ByRef pContinue As %Boolean) As %Status
{
  #Dim %request   As %CSP.Request     = %request
  #Dim %response  As %CSP.Response    = %response
  If (pMethod = "OPTIONS") // Controle de CORS
  {
    Set pContinue = 0
    //
    Do ..HandleDefaultOptionsRequest(pUrl)
    Do ..HandleDefaultCorsRequest(pUrl)
    //
    Return $System.Status.OK()
  }
  If (pUrl = "/ping")
  { 
    Set pContinue = 1
    //
    Return $System.Status.OK()
  }
  #Dim authorization  As %String          = $ZConvert(%request.GetCgiEnv("HTTP_AUTHORIZATION"), "L")
  #Dim token          As %String          = $Piece(authorization, " ", 2)
  #Dim erro           As %DynamicObject   = {"Erro:" : "Token de autorização é obrigatório"}
  If (token = "")
  {
    Set pContinue           = 0
    Set %response.Status    = ..#HTTP400BADREQUEST
    //
    Write erro.%ToJSON()
    //
    Return $System.Status.OK()
  }
  ElseIf (token '= "t0k3n_d3_v4lid@c@0")
  {
    Set erro                = {"Erro": "Token não autorizado!"}
    Set pContinue           = 0
    Set %response.Status    = ..#HTTP401UNAUTHORIZED
    //
    Write erro.%ToJSON()
    //
    Return $System.Status.OK()
  }
  Set pContinue = 1
  //
  Return $System.Status.OK()
}

Parabéns pelo artigo Emily.

Uma correção no item 3 o parâmetro CONTENTTYPE está com um erro de digitação: aSpplication quando deveria ser application.

No item 4, por questão de segurança, (em ambiente produtivo ao menos) não é recomendado adicionar o %ALL como função do aplicativo, e sim uma função específica ao que necessário se acessar para que a aplicação funcione.