Consulta Processos Judiciais por Unidade Judiciária

Utilizando uma linguagem de programação de sua preferência invoque a url abaixo: 
  
"https://www.tjpr.jus.br/documents/d/planejamento/processos_tjpr" 

Não tem parâmetros de entrada. 
  
O Resultado é um arquivo JSON que retornará uma lista de dados de todos os processos judiciais não sigilosos, exceto os arquivados antes de 2022, com as seguintes informações:
 
[Processos]: Este campo indica o número exclusivo designado a um processo judicial, seguindo o formato NNNNNNN-DD.AAAA.J.TR.OOOO, conforme estabelecido pela Resolução CNJ Nº 65 de 16/12/2008. Para realizar a consulta, utilizar somente números do processo, sem pontuação.
Status: Este campo mostra o status atual do processo judicial, podendo ser:
Arquivado
Arquivado declínio de competência
Arquivado por cancelamento de distribuição
Arquivado provisoriamente
Arquivado sem distribuição
Ativo
em instância superior
Inválido
Suspenso ou Sobrestado

Comarca: Divisão territorial para fins de organização judiciária, composta por um ou mais municípios, conforme o Código de Organização Judiciária do Paraná. Para fins deste serviço, foros regionais e centrais são classificados como comarca.
Vara Judicial: Unidade organizacional criada para fins de distribuição de processos judiciais em cada Comarca, podendo ser juízo único ou varas especializadas, na forma da Resolução OE nº 93/2013. Em situações específicas há varas regionalizadas especializadas que atendem mais de uma comarca.

Por exemplo, na próxima página, utilizando a linguagem R, consulta-se os dados do processo judicial nº 0184821.2023.8.16.0058:

library(httr)
library(jsonlite)

headers <- c(
  'Content-Type' = 'application/json'
)

numero_processo <- "00018482120238160058"

body <- toJSON(list(
  query = list(
    term = list("Processos" = numero_processo)
  )
), auto_unbox = TRUE)

res <- POST(
  url = "https://www.tjpr.jus.br/documents/d/planejamento/processos_tjpr?download=true",
  body = body,
  add_headers(.headers = headers),
  encode = "json"
)

resposta_json <- fromJSON(content(res, 'text', encoding = "UTF-8"))
resultado_filtrado <- resposta_json[resposta_json$Processos == numero_processo, ]
resultado_json <- toJSON(resultado_filtrado, pretty = TRUE, auto_unbox = TRUE)

cat(resultado_json)

Nesse exemplo, a resposta esperada é um JSON com os seguintes dados retornados do processo nº 0001848-21.2023.8.16.0058:

[
  {
    "Processos": "00018482120238160058",
    "Status": "Arquivado",
    "Comarca": "Campo Mourão",
    "Vara": "Juizado Especial Cível de Campo Mourão"
  }
]