Script para retornar dados de orçamentos - nucleus

[Jair - Fórmula]

SELECT TTBORCAMENTO.CODCOLIGADA AS COLIGADA

, TTBORCAMENTO.CODTBORCAMENTO AS CODIGO_ORÇAMENTO
, TTBORCAMENTO.DESCRICAO AS DESCRIÇÃO_ORCAMENTO
, (CASE TTBORCAMENTO.NATUREZA
      WHEN '1' THEN 'A RECEBER'
      WHEN '2' THEN 'A PAGAR'
      WHEN '3' THEN ' AMBOS'
    END) AS NATUREZA
, (CASE TTBORCAMENTO.SINTETICOANALITICO
      WHEN '0' THEN 'SINTETICO'
      WHEN '1' THEN 'ANALITICO'
   END) AS SINTETICO_ANALITICO
, TTBORCAMENTOCONT.CODCONTA AS CODIGO_CONTABIL
, TTBORCAMENTOCONT.PERCENTUAL AS PERCENTUAL
, CCONTA.REDUZIDO AS CODIGO_REDUZIDO
, CCONTA.DESCRICAO AS DESCRIÇÃO_CONTABIL

FROM TTBORCAMENTO (NOLOCK)

JOIN TTBORCAMENTOCONT (NOLOCK)

  ON TTBORCAMENTO.CODCOLIGADA = TTBORCAMENTOCONT.CODCOLTBORCAMENTO  

         AND TTBORCAMENTO.CODTBORCAMENTO = TTBORCAMENTOCONT.CODTBORCAMENTO 

JOIN CCONTA (NOLOCK)

  ON TTBORCAMENTOCONT.CODCOLCONTA = CCONTA.CODCOLIGADA

       AND TTBORCAMENTOCONT.CODCONTA = CCONTA.CODCONTA

WHERE TTBORCAMENTO.CODCOLIGADA = 1