Ir para conteúdo
Fórum Script Brasil

Leonardo C. Cavalcante

Membros
 Perfil  Explorar Conteúdo

  • Total de itens

    32

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Posts postados por Leonardo C. Cavalcante

  1. [RESOLVIDO] Campo Datetime (Iniciante)

    em SQL Server

    Postado

    Boa Noite.

    Não existe nenhuma maneira no SQL SERVER 2005 de inserir os dados sem que grave a hora, você até pode mandar inserir um valor apenas com a data mas devido ao tipo do campo ser datetime ele sempre vai gravar 0 nos valores da hora, eu nunca me preocupei com isso porque os componentes de data que utilizo no delphi tem como default ignorar as informações de hora.

    Se o que você precisa é apenas mostrar a data sem o time acho que este comando deve te ajudar, é quase aquilo que você já havia feito, só falto somar todos em um campo só.

    select CONVERT(varchar(2), Day(Data_Entrada)) + '/'+

    CONVERT(varchar(2), MONTH(Data_Entrada))+ '/' +

    CONVERT(varchar(4), Year(Data_Entrada))

    from alunos

    Ah e novidades para o SQL SERVER 2008 existe o tipo datetime e o tipo date.

    Espero ter ajudado

    Abraços!

  4. Atribuir SQL a varialvel

    em Delphi, Kylix

    Postado

    Boa Noite. Não consegui entender exatamente qual é sua necessidade, Talvez o que você precise seja um lookupCombobox para LIstar a descrição e gravar o código.

    Mas então, tenta explicar melhor para o que você precisa e Estou a disposição para ajudar.

    Abraços!

  5. Desempenho de View

    em SQL Server

    Postado

    Os indices influenciam sim, inclusive se nesta consulta voce tiver vários joins os campos de ligação de uma tabela com a outra deve ter um indice.

    Para que possa te ajudar mais precisamente preciso ver o código da view.

    Abraços Leonardo

  8. (Resolvido) Problemas com INSERT e SELECT

    em SQL Server

    Postado

    Boa Noite amigo

    Para fazer um select com outros valores a sintaxe seria essa

    INSERT INTO ALUNO(COD_LOGIN, NOME_ALU, EMAIL_ALU)

    SELECT MAX(COD_LOGIN), 'Nome', 'Email'

    FROM LOGIN

    porém no seu caso o campo COD_LOGIN já é do tipo identify significa que ele será incrementado automaticamente pelo sql então tente apenas assim

    INSERT INTO ALUNO(NOME_ALU, EMAIL_ALU)

    Values( 'Nome', 'Email')

    Espero ter ajudado

    Abraços

  11. Carregar um arquivo para uma variavel

    em SQL Server

    Postado · Editado por kuroi
    Adicionar tag CODE

    Estou tentando executar o código abaixo porém não consigo carregar o arquivo xml na minha variavel @vXml.

    Alguen pode me ajudar ???

    Desde já agradeço.

    DECLARE @vHdoc integer
DECLARE @vXml XML

-- Aqui é a minha dúvida não estou conseguindo carregar 
-- Esta variavel @vXml desta maneira abaixo não deu certo
select @vXML = 'D:\SQL\exportnull_64200701_94319115.xml'


EXEC sp_xml_preparedocument @vHdoc OUTPUT,@vXml


SELECT * 
FROM OPENXML(@vHdoc,'SalesOpportunityDetailsRs/SalesOpportunity/Quote')
WITH (
      ID  int 'ID',
      Status Varchar(30) '../Status',
      Cli_Nome Varchar(60) 'CustomerTrackingName',
      Doc_Proposta Varchar(15) 'BrokerProposalNumber',
      Doc_Data1 DateTime  'StartDate',
      Doc_Data2 DateTime 'EndDate',
      Doc_Data_Proposta DateTime 'QuoteScenario/CalculationDate',
      Doc_Premio Numeric(15,2) 'QuoteScenario/SingleProductQuote/NetTotalPremium',
      Doc_Comissao Numeric(15,2) 'QuoteScenario/SingleProductQuote/CommissionPct',
      Doc_Custo Numeric(15,2)  'QuoteScenario/SingleProductQuote/AdministrativeCostValue'




     )

exec sp_xml_removedocument @vHdoc

  22. (Resolvido) QUERY + Dbgrid + Filtro Edits

    em Delphi, Kylix

    Postado

    IBQueryfiltro.Close;

    if Trim(edit1.Text) <> '' Then

    IBQueryfiltro.ParamByName('pParametro1').Value := Trim(edit1.Text)

    else

    IBQueryfiltro.ParamByName('pParametro1').Value := 0; // Aqui um parametro ftInteger

    IBQueryfiltro.ParamByName('pParametro2').Value := Trim(edit2.Text) // Aqui um parametro ftString

    IBQueryfiltro.Open;

    Este é um exemplo de como utilizar os dois tipos de parametros

    O importante e você enteder que quando quiser desconsiderar um parametro(para que traga todos os registros) inteiro ele deve ser preechido com um valor 0.

    ai no SQL você verifica se o campo e igual o valor do parametro ou o parametro esta preechido com 0.

    Quando for string você quiser desconsiderar o parametro(para que traga todos os registros) você preenche com '' e no SQL verifica se o campo é igual ao parametro ou o parametro for igual ''.

    Talvez possa te ajudar melhor se me explicar o que exatamente quer fazer.

    Fico aguardando

    Abraços!!!

  23. UPDATE com vários INNER JOIN

    em SQL Server

    Postado

    Olá A sintaxe correta ficaria desta maneira.

    UPDATE NW_FILA

    SET flaanalista = '1056123'

    FROM NW_FILA INNER JOIN NW_CASO ON NW_CASO.casId = NW_FILA.flaCasId

    INNER JOIN FERRAMENTAS ON FERRAMENTAS.ID = NW_CASO.casFerId

    INNER JOIN NW_CASO_TERMINAL ON NW_CASO.casId = NW_CASO_TERMINAL.catCasId

    INNER JOIN CAD_USUARIOS ON NW_FILA.flaAnalista = CAD_USUARIOS.RE

    INNER JOIN NW_TERMINAL ON NW_CASO_TERMINAL.catTerId = NW_TERMINAL.terId

    INNER JOIN NW_CLIENTE ON NW_TERMINAL.terCliId = NW_CLIENTE.cliId

    where FERRAMENTAS.ferramenta = 'SP GERAL - A. TELECOM'

    and NW_CASO.casdtentrada >= '2008-10-01'

    Espero ter ajudado.

    Qualquer dúvida post ai.

    Abraços!!

  25. (Resolvido) QUERY + Dbgrid + Filtro Edits

    em Delphi, Kylix

    Postado

    beleza agora não falta muito você só precisa alterar o sql da query e deixar desta maneira.

    SELECT *

    FROM CADASTRO_ATENDIMENTO

    WHERE (NUMEROATENDIMENTO = :pParametro1 OR :pParametro1 = '')

    AND (CODIGOCLIENTE = :pParametro2 OR :pParametro2 = '')

    Isto deve resolver.

    Só no local onde você passa os parametros não se esqueça de tirar os espaços em brancos utilizando TRIM

    IBQueryfiltro.Close;

    IBQueryfiltro.ParamByName('pParametro1').Value := Trim(edit1.Text);

    IBQueryfiltro.ParamByName('pParametro2').Value := Trim(edit2.Text);

    IBQueryfiltro.Open;

    Caso precise utilizar parametros do tipo ftInteger deverá fazer desta maneira

    SELECT *

    FROM CADASTRO_ATENDIMENTO

    WHERE (NUMEROATENDIMENTO = :pParametro1 OR :pParametro1 = 0)

    AND (CODIGOCLIENTE = :pParametro2 OR :pParametro2 = 0)

    IBQueryfiltro.Close;

    if Trim(edit1.Text) <> '' Then

    IBQueryfiltro.ParamByName('pParametro1').Value := Trim(edit1.Text)

    else

    IBQueryfiltro.ParamByName('pParametro1').Value := 0;

    if Trim(edit2.Text) <> '' Then

    IBQueryfiltro.ParamByName('pParametro2').Value := Trim(edit2.Text)

    else

    IBQueryfiltro.ParamByName('pParametro2').Value := 0;

    IBQueryfiltro.Open;

    Ok

    Abraços!!

×
×
  • Criar Novo...