CONCATENAÇÃO DE CAMPOS COM PROBLEMA NO ARITHABOR

 Tópico anterior Próximo tópico Novo tópico

CONCATENAÇÃO DE CAMPOS COM PROBLEMA NO ARITHABOR

VB / VBA

 Compartilhe  Compartilhe  Compartilhe
#496007 - 06/01/2021 21:10:25

WEBIER
URUCUI
Cadast. em:Dezembro/2003


Boa Noite Pessoal,

Precisei concatenar 4 campos para serem exibidos numa mesma célula de um grid ou relatório...

Fiz Assim:

sSQL = 'SELECT OS_recapadora.FABRICANTE, OS_recapadora.ANO, OS_recapadora.MODELO, OS_recapadora.STATUS AS var_status, CASE status_os WHEN 1 THEN 'FECHADO' WHEN 0 THEN 'ABERTO' END AS var_status_os, OS_recapadora.COD_OS, ' & _
       'OS_recapadora.STATUS_OS, OS_recapadora.STATUS, OS_recapadora.SUBTOTAL, OS_recapadora.TOTAL, OS_recapadora.TIPO_PAGAMENTO, OS_recapadora.PAGAMENTO, OS_recapadora.ValorDescReal, cliente.Nome, ' & _
       'STUFF ((SELECT ' /' + cliente.Nome+ '/ ' + A.FABRICANTE+ ' ' + A.MODELO+ ' ' + A.ANO FROM OS_recapadora AS A WHERE A.COD_OS= OS_recapadora.COD_OS FOR XML PATH(''), TYPE).value('.', 'varchar(max)') , 1, 3, '') as Compatibilidade ' & _
        'FROM OS_recapadora INNER JOIN cliente ON OS_recapadora.COD_CLIENTE = cliente.CODIGO '


sendo que a concatenação é somente esse trecho:
'STUFF ((SELECT ' /' + cliente.Nome+ '/ ' + A.FABRICANTE+ ' ' + A.MODELO+ ' ' + A.ANO FROM OS_recapadora AS A WHERE A.COD_OS= OS_recapadora.COD_OS FOR XML PATH(''), TYPE).value('.', 'varchar(max)') , 1, 3, '') as Compatibilidade ' & _

Se executo no Microsoft SQL Server Management e defino o ARITHABORT como ON antes da consulta... roda normalmente
SET ARITHABORT ON


Meu problema está em setar o ARITHABORT no select da linha de código no vb.

Dando uma pesquisada sobre... vi que deveria acrescentar na linda do select assim:
'SELECT  SESSIONPROPERTY ('ARITHABORT') AS ARITHABORT, OS_recapadora.FABRICANTE, ...

Mais sempre dar o erro como o ARITHABORT não estivesse setado como ON





#496008 - 06/01/2021 21:46:14

KERPLUNK
RIO GRANDE DO SUL
Cadast. em:Junho/2009


Membro da equipe
Você não está selecionando o campo que quer fazer o join, o campo 'OS_Recapadora.Cod_cliente

_______________________________________________________________________
Virei Orculo!
The end is nigh, be ready for the nukes!


#496009 - 06/01/2021 22:16:34

WEBIER
URUCUI
Cadast. em:Dezembro/2003


 Anexos estao visíveis somente para usuários registrados

Citação:
:
Você não está selecionando o campo que quer fazer o join, o campo 'OS_Recapadora.Cod_cliente


No SQL Server Management funciona normal



#496010 - 06/01/2021 22:19:24

WEBIER
URUCUI
Cadast. em:Dezembro/2003


 Anexos estao visíveis somente para usuários registrados

Citação:
:
Você não está selecionando o campo que quer fazer o join, o campo 'OS_Recapadora.Cod_cliente


Já no VB6 pede para setar





#496012 - 06/01/2021 23:38:53

KERPLUNK
RIO GRANDE DO SUL
Cadast. em:Junho/2009


Membro da equipe
Veja se isso ajuda

_______________________________________________________________________
Virei Orculo!
The end is nigh, be ready for the nukes!


#496029 - 10/01/2021 12:37:01

WEBIER
URUCUI
Cadast. em:Dezembro/2003


Citação:
:
Veja se isso ajuda


Dei uma lida e achei meio complexo...

Se eu fizesse uma query e chame-se no codigo?



 Tópico anterior Próximo tópico Novo tópico


Para responder este tópico o login é requerido
Se você já possui uma conta de usuário por favor faça seu login
Se você não possui uma conta de usuário use a opção Criar usuário