Ir para conteúdo
  • Cadastre-se

Pesquisar na Comunidade

Showing results for tags 'case'.

  • Search By Tags

    Digite tags separadas por vírgulas
  • Search By Author

Tipo de Conteúdo


Fóruns

  • Fórum Aberto - ACBr
    • Notícias do ACBr
    • Equipamentos testados
    • Base de Conhecimento
    • Dúvidas Gerais sobre o ACBr
    • ACBrSerial
    • ACBrSAT
    • ACBrNFe
    • ACBrDFe
    • Dúvidas sobre TEF
    • Dúvidas sobre PIX
    • ACBrMonitor PLUS
    • ACBrTXT
    • ACBrBoleto
    • ACBrDiversos
    • ACBrTCP
    • ACBrFramework
    • ACBrLIB
  • ACBr Pro
    • Dúvidas gerais
    • Duvidas Privadas
    • ACBrMonitorPLUS
    • NFe/NFCe - Nota Fiscal Eletrônica
    • DFe - Documentos Fiscais Eletrônicos
    • SAT / MFE
    • TEF
    • Boleto
    • ACBrSPED
    • ACBrTXT
    • Paf-ECF
    • Requisitos Fiscais por UF
    • ACBrLIB
  • Outros Assuntos
    • Boteco do ACBr
    • Legislação Fiscal e Tributária
    • Object Pascal - Delphi & Lazarus
    • Banco de Dados
    • Classificados
    • Dúvidas não relacionadas ao ACBr

Categorias

  • ACBr Pro
    • ACBrLib - PRO
    • ACBrMonitorPLUS - PRO
    • Utilitários - PRO
    • Dia do ACBr 1a edição
    • Dia do ACBr 2a edição
    • ACBrLib Android - Pro
  • Download Livre
    • ACBrLib - DEMO
    • ACBrMonitorPLUS - DEMO
    • Demos / Testes / Utilitários
    • Apresentações - Palestras
    • ACBrLib Android - Demo

Calendários

  • Eventos - Palestras - Webinars
  • Prazos SEFAZ
  • Calendário da Comunidade
  • ACBr Papo Pro
  • Feriados Nacionais

Find results in...

Find results that contain...


Data de Criação

  • Início

    End


Data de Atualização

  • Início

    End


Filter by number of...

Data de Registro

  • Início

    End


Grupo


Website URL

Encontrado 2 registros

  1. Pessoal, Tenho este sql abaixo, onde o campo VLTOTALBRUTO esta dando erro de arithimetic por estar zerado em alguns casos. Tentei usar um case para tratar quando for zero nao executar a sentensa do cast, porem ele nao passa pelo case. Ele deveria jogar para a variavel vltotal = 0 qdo o vltotalbruto for 0, caso contrario executar executar o cast, mas mesmo usando o case ele da erro de arithimetic SELECT p.cnpj_cpf, SUBSTRING(p.insc_rg FROM 1 FOR 14), p.tpinsc, m.dataemissao, nf.uf, cast(lpad (m.numdocumento, 6, '0') as varchar(06)), mi.percicms as aliquota, Case When m.vltotalbruto = 0 then 0 else CAST((sum((mi.qtde * mi.vlunitario) + coalesce(mi.vlipi, 0) + ((mi.qtde * mi.vlunitario)*(((coalesce(nf.vloutrasdespesas,0) * 100) / m.vltotalbruto) / 100)) + ((mi.qtde * mi.vlunitario)*(((coalesce(nf.vlseguro,0) * 100) / m.vltotalbruto) / 100)) + ((mi.qtde * mi.vlunitario)*(((coalesce(m.vlfrete,0) * 100) / m.vltotalbruto) / 100)) + coalesce(mi.valoricmsst, 0) - coalesce(mi.vldesconto, 0))) AS NUMERIC(11,2)) end as vltotal, CAST((sum((coalesce(mi.baseicms, 0)))) AS NUMERIC(11,2)) as baseicms, CAST((sum(mi.vlicms)) AS NUMERIC(11,2)) as vlicms, m.situacao, SUBSTRING(nf.modelo from 1 for 2), mi.cfop FROM mov_movimento m JOIN mov_nf nf on (m.cod= nf.cod) JOIN pes_pessoas p on (m.codclifor = p.cod) join g_tpmovimento tp on (m.codtpmovimento = tp.cod) join mov_movitens mi on (m.cod = mi.codmovimento) WHERE m.dataemissao >= :INICIO AND m.dataemissao <= :fim and m.codempresa = :codempresa GROUP BY p.cnpj_cpf, p.insc_rg, p.tpinsc, m.dataemissao, nf.uf, m.numdocumento, mi.percicms, m.situacao, nf.modelo,mi.cfop, m.vltotalbruto
  2. Olá, tenho uma dúvida em uma aplicação... eu tenho uma tela de escrituração de notas, na qual eu importo os XML's que quiser... agora estou fazendo uma auxiliar que permite que o usuário selecione vários XML de uma vez e importe, assim, eu chamo a tela original de escrituração oculta e vou dando insert a cada arquivo lido no loop. O problema é que quando existem items na qual utilizo Case.. não consigo fazer, segue exemplo: case Frm_Escrituracao_Notas.AcBrNFe.NotasFiscais.Items[0].NFe.Ide.indPag of TpcnIndicadorPagamento(0) : Frm_Escrituracao_Notas.CDS_CADASTROIDE_INDPAG.AsString := '0'; // VISTA TpcnIndicadorPagamento(1) : Frm_Escrituracao_Notas.CDS_CADASTROIDE_INDPAG.AsString := '1'; // PRAZO TpcnIndicadorPagamento(2) : Frm_Escrituracao_Notas.CDS_CADASTROIDE_INDPAG.AsString := '2'; // OUTROS end; Não consigo compilar pq não acha os TpcnIndicadorPagamento dentro do case na tela secundária... Alguém pode me ajudar?
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.