Humm

uai.. é so criar um campo no relatorio que some os 3 crie uma caixa de texto lá e coloque: =[total]+[icm]+[ipi] ou se quiser somar o total da folha exibida: =soma([total]+[icm]+[ipi]) lembrando que você tem que ter os campos em algum lugar do relatorio pra usa-los em controle calculado. se você deseja exibir somente o total, então defina a propriedade do campo que ta em area Detalhes como invisivel. ahh.. o total tem que ir no rodape do relatorio

entendo.. mas agora vai outra pergunta.. onde você quer que seja exibidos os valores de icm e ipi?? você tem que botar e mente que esses totais são apenas resultados de valores armazenados.. você pode exibilos onde você quiser.. formularios, consultas, relatorios.. sacou? mesmo sendo um campo "virtual" ele tem funcao.. exemplo.. se você quer calcular o ICM e o IPI em cima de um resultado de ourts campos, é facil. dependendo da extrutura dos seus dados.. você pode fazer primeiro uma consulta pra obter a soma do valor principal em um campo virtual. exemplo: TOTAL ai então monte outra consulta e adicione nela essa consulta que tem o TOTAL virtual.. e ai crie outros campos nessa nova se utilizando do campo TOTAL da outra sacou? não se esqueça que campos que retornem valor Zero podem ser considerador nulos. então você usa: CAMPOVIRTUAL: nz([campo1])+nz([campo2]) o nz() transforma nulo em Zero saca? se estiver com dificuldade.. poste seu BD que eu te mostro

ainda não entendi o que voce quer.. mas lembre-se que você pode usar umaconsulta dentro da outra

Meu sistema ta um pouco lento hehe.. devido a quantidade de informacoes gostaria de saber se: o uso de variaveis no código acelera muito mesmo os processos? sei que compilando em MDE, tudo fica mais rapido. porém, qual a ordem certa das coisas? primeiro para MDE e depois dividir o BD em back e front? depois de dividido em Back e Front e ainda no formato MDB.. quando eu quiser fazer alteracoes, mesmo assim terei que abrir a aplicacao em modo exclusivo? abracos

olha só o macete.. eu tive que arrastar a barra e ancorar em cima.. e ai tive que fazer aparecer o Menu Interno padrão, ancorar em baixo da minha.. e depois fechar as opcoes, sair e reentrar na aplicacao. mole?

velho.. você acabou tirando outra duvida minha hehe.. vou tentar

cara.. não entendi.. você ta somando alicotas? explica melhor ai.. ta somando a porcentagem ou o valor já calculado do icm e do ipi?

simples no campo vazio da consulta coloque assim: VALOR_TOTAL: [QTDE]*[VALOR_UNITARIO] então ela criara um campo chamado VALOR_TOTAL com o resultado dos campos [QTDE] x [VALOR_UNITARIO]

sim.. tirei os menus internos e criei um proprio. já defini em inicializar.. mas quando reabro a aplicacao, ele vem destacado do topo. e essa?

criei um menu personalizado para a aplicacao.. consigo ancorar o menu no topo mas ao reabrir a aplicacao, ele vem destacado do topo. como fazer pra salvar a posicao dele?

crie um procedimento na caixa de texto do formulario em "apos atualizar" ou "antes de atualizar" assim: Me.SEUCAMPO = Lcase$(Me.SEUCAMPO) e lemvre-se Ucase para maiusculas Lcase para minusculas

achei algo muito interessante hahahehe Do While Forms.Count > 0 DoCmd.Close acForm, Forms(0).Name Loop isto fecha todos os forms abertos abracos

amigo, clique na aba consultas do seu BD e crie uma baseada na tabela que voce quer.. selecione os campos que deseja consultar, e no campo chave já colocado na consulta va em criterio, clique o o direito e em contruir. então selecione formularios\formularios carregados\campo chave do formulario assim a consulta so exibe dados onde o campo chave dela seja coincidente com o campo chave do form aberto

voce tem que basear o relatorio numa consulta que pesquise os dados que você quer.. sendo que o campo chave da consulta tenha o criterio de mostrar somente o mesmo registro que tem no formulario aberto.

mais ou menos isso.. vai depender do que voce precisa. eu não sei o que você quer no relatorio.. mas cara, eu tenho uma aplicacao aqui que faz tud em uma loja. então na parte do caixa foi complicadissimo porque eu quis fazer uma aplicacao que para cada venda, aceitasse varias formas de pagamento ao mesmo tempo, porem gerando troco. então faz ideia de quantas consultas eu tive que fazer so pra calcular o dinheiro por causa do troco. acho que foram umas 15 consultas pra calcular o dinheiro no fechamento do dia por causa dessa variante do troco. foi terrivel, mas consegui.

monte outra consulta usando ao invez de tabelas.. a consulta da data que você já fez sacou? e assim por diante ate somar todos os dados que você quer no relatorio.

talvez.. faça o seguinte retire os apostrofes dos campos marcados do codigo: 'If dvcpf = strDigVer Then Rem 999.999.999-99 'CPF = Mid(CPF, 1, 3) & "." & Mid(CPF, 4, 6) & "." & Mid(CPF, 7, 9) & "-" & Right(CGC, 2) 'dvcpf = CPF ficando assim If dvcpf = strDigVer Then Rem 999.999.999-99 CPF = Mid(CPF, 1, 3) & "." & Mid(CPF, 4, 6) & "." & Mid(CPF, 7, 9) & "-" & Right(CGC, 2) dvcpf = CPF

ahh ai está o erro.. tem campos ai que tem valores diferentes.. neste caso ele vai repetir pra cada valor diferente sacou? você tem que usar somente os campos de iteresse. cod_matl e data_nf

bom, aqui codigo funcionou perfeitamente do jeito que é.. so tive que configurar porque uso mascara de entrada. e to usando no Antes de Atualizar mesmo, assim ele não pula para proximo campo nem armazena um numero errado de cpf.

quais os campos da consulta?

cara vu te explicar.. se você apenas quer os totais dos numeros para OC então a consulta tem que ter apenas OC e os numeros se você quer apenas para COR ai ele deve conter apenas os campos COR e os numeros sacou? não da pra fazer numa só consulta varias somas ao mesmo tempo de diferentes campos acumulados sacou? faça varias consultas de acordo com o que precisa.

no campo da DATA na consulta, ali na opcao TOTAIS voce colocou MAXIMO ?

abra a consulta como extrutura.. clique em exibir e marque a caixa TOTAIS

eu tenho campo de cpf aqui também.. vou colocar isso aqui e ver o que da..

matou a pau.. exatamente o que eu preciso. abracos fera. vou aproveitar e deixar um exemplo do sistema de seguranca que to fazendo direto na aplicacao. Private Sub Form_Load() If DLookup("[NIVEL]", "USUARIOS", "[USER] ='" & Forms!LOGIN![USER] & "'") = 1 Then MsgBox "Voce não tem acesso a esta area!" DoCmd.Close ElseIf DLookup("[NIVEL]", "USUARIOS", "[USER] ='" & Forms!LOGIN![USER] & "'") = 2 Then Forms!funcionarios.AllowAdditions = False Forms!funcionarios.AllowEdits = False Forms!funcionarios.AllowDeletions = False ElseIf DLookup("[NIVEL]", "USUARIOS", "[USER] ='" & Forms!LOGIN![USER] & "'") = 3 Then Forms!funcionarios.AllowAdditions = True Forms!funcionarios.AllowEdits = False Forms!funcionarios.AllowDeletions = False ElseIf DLookup("[NIVEL]", "USUARIOS", "[USER] ='" & Forms!LOGIN![USER] & "'") = 4 Then Forms!funcionarios.AllowAdditions = True Forms!funcionarios.AllowEdits = True Forms!funcionarios.AllowDeletions = False ElseIf DLookup("[NIVEL]", "USUARIOS", "[USER] ='" & Forms!LOGIN![USER] & "'") = 5 Then Forms!funcionarios.AllowAdditions = True Forms!funcionarios.AllowEdits = True Forms!funcionarios.AllowDeletions = True End If End Sub