CRIAR CONSULTAR HIERAQUICA NO REPORT FORM
Na minha última colocação ouve um equÃvoco meu, eu consegui colocar SIM por regiao, só não consegui foi colocar a soma por região, abaixo segue a sintaxe.
cmdGUIA_REMESSAcab.CommandText = "SHAPE{SELECT SUM(TB_LANCAMENTOS.LN_VALOR_LANCTO_MES) as Total,tb_loja.RG_NOME,tb_loja.LJ_NOME,TB_LANCAMENTOS.LN_MESANOREF , tb_loja.LJ_CODIGO_CND, TB_LANCAMENTOS.LJ_CODIGO_CND " & _
"FROM tb_loja INNER JOIN TB_LANCAMENTOS ON tb_loja.LJ_CODIGO_CND = TB_LANCAMENTOS.LJ_CODIGO_CND " & _
"GROUP BY tb_loja.RG_NOME,tb_loja.LJ_NOME,TB_LANCAMENTOS.LN_MESANOREF,tb_loja.LJ_CODIGO_CND, TB_LANCAMENTOS.LJ_CODIGO_CND,TB_LANCAMENTOS.LN_VALOR_LANCTO_MES " & _
"HAVING TB_LANCAMENTOS.LN_MESANOREF = '" & sCODIGO & "'} AS qGUIA_REMESSAcab " & _
"APPEND ({SELECT tb_loja.RG_NOME,tb_loja.LJ_NOME as Igreja ,TB_LANCAMENTOS.LN_VALOR_LANCTO_MES as Valor,TB_LANCAMENTOS.LN_MESANOREF,tb_loja.LJ_CODIGO_CND, TB_LANCAMENTOS.LJ_CODIGO_CND " & _
"FROM tb_loja,TB_LANCAMENTOS " & _
"WHERE tb_loja.LJ_CODIGO_CND = TB_LANCAMENTOS.LJ_CODIGO_CND AND TB_LANCAMENTOS.LN_MESANOREF = '" & sCODIGO & "' " & _
"GROUP BY tb_loja.RG_NOME,tb_loja.LJ_NOME, TB_LANCAMENTOS.LN_VALOR_LANCTO_MES,TB_LANCAMENTOS.LN_MESANOREF,tb_loja.LJ_CODIGO_CND, TB_LANCAMENTOS.LJ_CODIGO_CND } AS qGUIA_REMESSAdet RELATE 'tb_loja.LJ_CODIGO_CND' TO 'TB_LANCAMENTOS.LJ_CODIGO_CND') AS qGUIA_REMESSAdet "
Obrigado
cmdGUIA_REMESSAcab.CommandText = "SHAPE{SELECT SUM(TB_LANCAMENTOS.LN_VALOR_LANCTO_MES) as Total,tb_loja.RG_NOME,tb_loja.LJ_NOME,TB_LANCAMENTOS.LN_MESANOREF , tb_loja.LJ_CODIGO_CND, TB_LANCAMENTOS.LJ_CODIGO_CND " & _
"FROM tb_loja INNER JOIN TB_LANCAMENTOS ON tb_loja.LJ_CODIGO_CND = TB_LANCAMENTOS.LJ_CODIGO_CND " & _
"GROUP BY tb_loja.RG_NOME,tb_loja.LJ_NOME,TB_LANCAMENTOS.LN_MESANOREF,tb_loja.LJ_CODIGO_CND, TB_LANCAMENTOS.LJ_CODIGO_CND,TB_LANCAMENTOS.LN_VALOR_LANCTO_MES " & _
"HAVING TB_LANCAMENTOS.LN_MESANOREF = '" & sCODIGO & "'} AS qGUIA_REMESSAcab " & _
"APPEND ({SELECT tb_loja.RG_NOME,tb_loja.LJ_NOME as Igreja ,TB_LANCAMENTOS.LN_VALOR_LANCTO_MES as Valor,TB_LANCAMENTOS.LN_MESANOREF,tb_loja.LJ_CODIGO_CND, TB_LANCAMENTOS.LJ_CODIGO_CND " & _
"FROM tb_loja,TB_LANCAMENTOS " & _
"WHERE tb_loja.LJ_CODIGO_CND = TB_LANCAMENTOS.LJ_CODIGO_CND AND TB_LANCAMENTOS.LN_MESANOREF = '" & sCODIGO & "' " & _
"GROUP BY tb_loja.RG_NOME,tb_loja.LJ_NOME, TB_LANCAMENTOS.LN_VALOR_LANCTO_MES,TB_LANCAMENTOS.LN_MESANOREF,tb_loja.LJ_CODIGO_CND, TB_LANCAMENTOS.LJ_CODIGO_CND } AS qGUIA_REMESSAdet RELATE 'tb_loja.LJ_CODIGO_CND' TO 'TB_LANCAMENTOS.LJ_CODIGO_CND') AS qGUIA_REMESSAdet "
Obrigado
Acho que na minha resposta anterior já estava tudo lá:
GroupFooter
SCampo1 SCampo2 SCampo3 SCampo4 SCampo5
Agora se não sabe como fazer, eu explico:
Vá ao report footer, click com o botão direito:
1. Escolha "Insert Control"
2. Escolha "Function" - Imediatamente ele vai inserir um control que diz sum(Unbound)
3. Click em cima deste control para aparecerem as propriedades
4. Vá a DataField e escreva(rigorosamente) o nome do campo que quer somar
5. Teste
Se resultar OK, repita os passos acima para todos os campos que deseja somar.
GroupFooter
SCampo1 SCampo2 SCampo3 SCampo4 SCampo5
Agora se não sabe como fazer, eu explico:
Vá ao report footer, click com o botão direito:
1. Escolha "Insert Control"
2. Escolha "Function" - Imediatamente ele vai inserir um control que diz sum(Unbound)
3. Click em cima deste control para aparecerem as propriedades
4. Vá a DataField e escreva(rigorosamente) o nome do campo que quer somar
5. Teste
Se resultar OK, repita os passos acima para todos os campos que deseja somar.
Mais uma "gafe", aqui:
Vá ao report footer, click com o botão direito:
era
Vá ao report footer, click com o botão direito:
Vá ao Group footer, click com o botão direito:
Vá ao report footer, click com o botão direito:
era
Vá ao report footer, click com o botão direito:
Vá ao Group footer, click com o botão direito:
João obrigado pela ajuda, como vc deve reparar eu estava tentando somar através do select, como vc orientou, consegui o total geral, mas eu preciso também somar por região, o que não está permitindo quando coloco a função no "Group Footer", gerando um erro informando que o controle não pode ser colocado naquela seção, de toda forma vc já me deu uma grande ajuda, estou explorando para ver se acho a solução.
Elan
Elan
Vá Ã Â minha página a "Programação"-"Quase Tudo para Visual Basic".
Esse exemplo tem uma Function exactamente no GroupFooter, veja se se o ajuda em alguma coisa.
Agora que já está mais familiarizado como funcionam as coisas, talvez consiga adaptar aquele exemplo para o seu caso.
Esse exemplo tem uma Function exactamente no GroupFooter, veja se se o ajuda em alguma coisa.
Agora que já está mais familiarizado como funcionam as coisas, talvez consiga adaptar aquele exemplo para o seu caso.
Joao Mateus, obrigado pelas dicas, infelizmente ainda não consegui foi somar por região, vou continuar tentando, qualquer coisa exponho aqui.
Elan
Elan
Tive que usar o Data Environment para solucionar meu problema.
Mesmo assim agradeço pela colaboração de todos, pois aprendi novas coisas.
Mesmo assim agradeço pela colaboração de todos, pois aprendi novas coisas.
Tópico encerrado , respostas não são mais permitidas