USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Somar itens de nota fiscal (Urgente)
Pierre
não registrado
Postada em 24/02/2005 09:09 hs   
Bom dia Pessoal !!!
 
Tenho uma tabela de itens da nota conforme abaixo:
 
NF |CFOP |ICM |TOTNF |BC |ICMS |ISEIPI
348 |5.949 |12 |0,77 |0,77 |0,09 |0,77
348 |5.949 |18 |0,9 |0,9 |0,16 |0,9
348 |5.949 |7 |1,05 |1,05 |0,07 |1,05
348 |5.949 |18 |1,18 |1,18 |0,21 |1,18
348 |5.949 |18 |1,65 |1,65 |0,3 |1,65
348 |5.949 |18 |1,78 |1,78 |0,32 |1,78
348 |5.949 |18 |2 |2 |0,36 |2
348 |5.949 |18 |2,05 |2,05 |0,37 |2,05
348 |5.949 |18 |2,17 |2,17 |0,39 |2,17
348 |5.949 |18 |2,8 |2,8 |0,5 |2,8
348 |5.949 |18 |3,36 |3,36 |0,6 |3,36
348 |5.949 |25 |4,8 |4,8 |1,2 |4,8
348 |5.949 |12 |8,1 |8,1 |0,97 |8,1
348 |5.949 |18 |9,6 |9,6 |1,73 |9,6
349 |5.949 |18 |0,9 |0,9 |0,16 |0,9
349 |5.949 |12 |1,19 |1,19 |0,14 |1,19
349 |5.949 |12 |1,2 |1,2 |0,14 |1,2
349 |5.949 |12 |1,47 |1,47 |0,18 |1,47
349 |5.949 |18 |1,76 |1,76 |0,32 |1,76
349 |5.949 |18 |2,11 |2,11 |0,38 |2,11
349 |5.949 |7 |3,95 |3,95 |0,28 |3,95
350 |5.949 |18 |0,71 |0,71 |0,13 |0,71
350 |5.949 |18 |3,16 |3,16 |0,57 |3,16
351 |5.949 |18 |5,15 |5,15 |0,93 |5,15
352 |5.949 |18 |0,99 |0,99 |0,18 |0,99
352 |5.949 |18 |1,12 |1,12 |0,2 |1,12
352 |5.949 |18 |1,82 |1,82 |0,33 |1,82
352 |5.949 |18 |2,26 |2,26 |0,41 |2,26
 
Agora que vem o trampo:
Preciso totalizar estas notas Pelo Campo ICM, por exemplo:
 
NF |CFOP |ICM |TOTNF |BC |ICMS |ISEIPI
348 |5.949 |7 |1,05 |1,05 |0,07 |1,05
348 |5.949 |12 |8,87 |8,87 |1,06 |8,87
348 |5.949 |18 |27,49 |27,49 |4,94 |27,49
348 |5.949 |25 |4,8 |4,8 |1,2 |4,8
 
e mais uma linha com a soma do campo ISEIPI das 04 linhas mencionadas acima:
 
348 |5.949 |0 |0 |0 |0 |42,21

Espero ter esclarecido minha dúvida, se alguém souber como fazer isto estou no aguardo e ficarei mui grato.
 
Pierre
     
Jayme
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 24/02/2005 09:37 hs            
Tente isto:
 
Sql = ""
Sql = "SELECT nf, cfop, icm, totnf, bc, icms, iseipi SUM(iseipi) as iseipi FROM FATURAS"
Sql = V_Sql & " GROUP BY icm"
Sql = V_Sql & " ORDER BY icm DESC"
RS_fatura.Open Sql, CONEXAO, adOpenStatic, adLockReadOnly
Jayme
   
Pierre
não registrado
Postada em 25/02/2005 08:57 hs   
Meu amigo não deu certo de uma olhada para ver se vc acha algum erro pra mim pois quando rodo aparace um mensagem de erro: "-2147217887 - Você tentou executar uma consulta que não inclui a expressão 'RzSoc_VendaNF' especificada como parte de uma função agregada." Segue abaixo o código que estou utilizando
 
BANCO.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Caminho.Text & ";"
TABELA.CursorLocation = adUseClient
TABELA.Open "SELECT RzSoc_VendaNF, CGC_VendaNF, IE_VendaNF, NumNF_VendaNF, UF_VendaNF, CFOP_VendaNF, DTEmi_VendaNF, Sit_VendaNF, ICMS_VendaNFItem, VTot_VendaNFItem, VTotBaseCalcICMS_VendaNFItem, VTotDebICMS_VendaNFItem, SUM(VTotIseIPI_VendaNFItem) AS VTotIseIPI_VendaNFItem FROM Items GROUP BY ICMS_VendaNFItem ORDER BY ICMS_VendaNFItem DESC", BANCO, adOpenKeyset, adLockOptimistic, adCmdText
TABELA.MoveMin
Grato
Pierre
     
7Cordas
PORTO ALEGRE
RS - BRASIL
ENUNCIADA !
Postada em 25/02/2005 10:52 hs            
Cara tenta o seguinte,
 

SELECT
         SUM(ICM) AS Total_ICM,
         SUM(ISEIPI) AS Total_ISEIPI,
       NF,
       CFOP,
       TOTNF,
       BC,
       ICMS,
FROM
       ITENS
GROUP BY
       NF,
       CFOP,
       TOTNF,
       BC,
       ICMS

tentei.....


Cristiano Fischer
Projeto SIGA - Sistemas Integrados de Gestão
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página