Adicioinar e concatenar o campo DS_Observacao

21/03/2019

3

USE [TRIBUTARIO_BONITO]
GO
/****** Object: StoredProcedure [dbo].[PGWATEIMPCERTIDAO_CD_TIPO_123] Script Date: 21/03/2019 14:01:43 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[PGWATEIMPCERTIDAO_CD_TIPO_123]
@vcd_certidao BIGINT

AS
BEGIN
SELECT TC.NM_ARQUIVO
, P.NM_PESSOA
, O.CD_AUXILIAR
, O.CD_TIPOOBJETO
, TOB.DS_TIPO TIPO_INSCRICAO
, DBO.FORMATCPFCNPJ(DBO.FNUMERO(P.NU_CPFCGC)) NU_CPFCGC
, P.NU_RGINSCREST
, DBO.FRETENDOBJ3(C.CD_OBJETO) ENDERECO
, B.NM_BAIRRO
, YEAR(C.DT_CERTIDAO) NU_ANO
, CAST(C.NU_CERTIDAO AS VARCHAR)+'/'+CAST(YEAR(C.DT_CERTIDAO) AS VARCHAR) NU_CERTIDAOANO
, CASE
WHEN O.CD_SITUACAO = 0 THEN 'ATIVIDADE'
WHEN O.CD_SITUACAO = 1 THEN 'INATIVIDADE'
ELSE SO.DS_SITUACAO
END DS_SITUACAO
, TC.DS_TITULO
, ISNULL(TC.DS_OBSERVACAO,'') DS_MENSAGEM
, UPPER(DBO.TRIM(F.NM_FUNCIONARIO)) FUNC_EMISSOR
, CONVERT(VARCHAR,C.DT_CERTIDAO,103)
+ DBO.LPAD(DBO.FNUMERO(P.NU_CPFCGC),14,'0')
+ DBO.LPAD(C.CD_TIPO,3,'0')
+ DBO.LPAD(F.CD_FUNCIONARIO,5,'0')
+ DBO.LPAD(C.NU_CERTIDAO,6,'0')
+ DBO.LPAD(C.CD_CERTIDAO,6,'0')
+ RIGHT(CAST(YEAR(C.DT_CERTIDAO) AS VARCHAR),2)
+ CAST(ISNULL(C.NU_SELO,0) AS VARCHAR) BARRA
, TC.DS_TIPO
, P.DT_INICIOEMP
, P.DT_ENCERRAMENTOEMP
, REPLACE(REPLACE(DBO.FRETATIVEMPRESA(C.CD_OBJETO),'*','(Principal)'),'#','') ATIVIDADE
, DBO.fretsociosempresa(C.CD_OBJETO,1) SOCIOS
, DBO.fretsociosempresa(C.CD_OBJETO,2) SOCIOSDOCS
, F.NM_FUNCIONARIO
, DBO.FRETDIAEXTENSO2(C.DT_CERTIDAO) DIAEXTENSO
, C.DT_VALIDADE DT_VALIDADE
, CASE
WHEN O.CD_TIPOOBJETO = 1 THEN REPLACE(C.DS_OBSERVACAO, 'contribuinte', 'imóvel')
ELSE C.DS_OBSERVACAO
END DS_OBSERVACAO

, E.DS_OBSERVACAO DS_OBSERVACAOEMPRESA
, C.*
, CASE WHEN C.TODASUNIDADES = 1 THEN 'SIM' ELSE 'NÃO' END TODASUNIDADADES1
, TC.DS_OBSERVACAO TIPO_OBSERVACAO
, CASE ISNULL(E.FG_HORARIOESPECIAL,0)
WHEN 1 THEN 'Sim'
ELSE 'Não'
END HORARIOESPECIAL
, CASE ISNULL(E.FG_PUBLICIDADE,0)
WHEN 1 THEN 'Sim'
ELSE 'Não'
END PUBLICIDADE
, E.NU_AREA
, DATEDIFF(DAY,CAST(C.DT_CERTIDAO AS DATE),CAST(C.DT_VALIDADE AS DATE)) NU_DIA_VALIDADE
, CASE
WHEN C.CD_CANCELADOPOR IS NOT NULL THEN ' *** Dados Cancelamento *** <br><br>'+
' Cancelado em : '+ CONVERT(VARCHAR,C.DT_CANCELADO,103) +'<br>'+
' Responsável : '+ FC.NM_FUNCIONARIO +'<br>'+
' Motivo : '+ C.DS_MOTIVOCANCELAMENTO
ELSE ''
END DS_CANCELADO
, CONVERT(VARCHAR,E.DT_VECTO_TERMOCOMPR,103) DT_VECTO_TERMOCOMPR
, E.DS_HABITESE
, TI.NU_MATRICULA
, O.NU_LOTE_ NU_LOTE_CARTORIO
, O.NU_QUADRA_ NU_QUADRA_CARTORIO
, F.NM_FUNCIONARIO
, CC.DS_CARGO
, F.NU_FUNCIONARIO MATRICULA

FROM TRIB_certidao C
JOIN TRIB_tipo_certidao TC
ON TC.CD_TIPO = C.CD_TIPO
JOIN TRIB_pessoa P
ON C.CD_PESSOA = P.CD_PESSOA
JOIN TRIB_objeto O
ON C.CD_OBJETO = O.CD_OBJETO
LEFT JOIN TRIB_empresa E
ON O.CD_OBJETO = E.CD_EMPRESA
JOIN TRIB_tipo_objeto TOB
ON TOB.CD_TIPO = O.CD_TIPOOBJETO
LEFT JOIN TRIB_bairro B
ON O.CD_BAIRRO = B.CD_BAIRRO
LEFT JOIN TRIB_sit_objeto SO
ON O.CD_SITUACAO = SO.CD_SITUACAO
LEFT JOIN TRIB_funcionario F
ON C.CD_FUNCIONARIO = F.CD_FUNCIONARIO
LEFT JOIN TRIB_funcionario FC
ON FC.CD_FUNCIONARIO = C.CD_CANCELADOPOR
LEFT JOIN TRIB_FUNC_CARGO FCC
ON FCC.CD_FUNCIONARIO = F.CD_FUNCIONARIO
LEFT JOIN TRIB_CARGO CC
ON CC.CD_CARGO = FCC.CD_CARGO
LEFT JOIN TRIB_IMOVEL TI
ON TI.CD_IMOVEL = O.CD_OBJETO
WHERE C.CD_CERTIDAO = @vcd_certidao;

END


--- GOSTARIA DE ADICIONAR E CONCATENAR (USANDO ESSA PARTE ABAIXO)



SELECT @todoscadastros += cast(O.CD_OBJETO AS VARCHAR) +' , ' +
FROM TRIB_OBJETO O
JOIN TRIB_CERTIDAO C
ON C.CD_OBJETO = O.CD_OBJETO
AND C.CD_CERTIDAO= @vcd_certidao

JOIN TRIB_TIPO_OBJETO TT
ON O.CD_TIPOOBJETO = TT.CD_TIPO
JOIN TRIB_PESSOA PE
ON O.CD_PESSOACONTRIB = PE.CD_PESSOA
JOIN TRIB_SIT_OBJETO SO
ON O.CD_SITUACAO = SO.CD_SITUACAO
WHERE O.CD_SITUACAO = 0
AND PE.CD_PESSOA = 1

IF @todoscadastros = ''
SET @todoscadastros = NULL
ELSE
SET @todoscadastros = LEFT(@todoscadastros, LEN(@todoscadastros)-1)

SELECT @todoscadastros
Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar