Formulário de Liquidações

[Raphael Souza]

Bom dia a todos,

Trabalha na seção de tributos da Prefeitura, e estamos informatizando alguns processs, implementando um BD em Access, e uma das coisas que ele faz é gerar guias de pagamento.

O problema esá no seguinte: existe um form denominado "LIQUIDAÇÕES", para dar baixa das guias pagas, colocamos um botão nele de "NOVA LIQUIDAÇÃO", onde o objetivo é evitar ter que se fechar o form e abrir de novo. Toda vez que se abre o form ele pede o nº da guia e depois preenche os campos com as informações da tabela, só restando ao operador colocar o valor pago e a data de pagamento.

A dúvida é a seguinte, como fazer esse botão "NOVA LIQUIDAÇÃO" salvar as alterações feitas e abrir novamente a caixa que pede o nº do recebimento.

=> Obs. O form é baseado numa consulta.

Desde já agradeço a ajuda e atenção prestadas.

[MrMALJ]

Se o form é baseado numa consulta é bem presumo que o registro na tela seja já filtrado com o recebimento que deseja, dessa forma as alteração nos objetos deveriam refletir diretamente tabela sem precisar de botões, mais se for crie um acSave (salvar/gravar) utilizando o próprio assistente de botões.

[Alexandre Neves]

Boa tarde,

Tente:

Docmd.close

docmd.openform me

Bom trabalho,

[Raphael Souza]

Se o form é baseado numa consulta é bem presumo que o registro na tela seja já filtrado com o recebimento que deseja, dessa forma as alteração nos objetos deveriam refletir diretamente tabela sem precisar de botões, mais se for crie um acSave (salvar/gravar) utilizando o próprio assistente de botões.

Isso já foi até cogitado, mas o objetivo é abrir a INPUTBOX que existe ao se abrir a Consulta.

Exmp....Ao abrir a consulta ela pede o nº do recebimento, para poder colher os dados da tabela e alimentar os campos do formulário com os dados de contribuinte, valor a recolher e outros,....o objetivo é que ao se clicar no botão "NOVA LIQUIDAÇÃO" ele "abra" novamente a INPUTBOX que pede o nº do recebimento.

Boa tarde,

Tente:

Docmd.close

docmd.openform me

Bom trabalho,

Boa dica:

Fiz isso....

Private Sub NewReg_Click()

DoCmd.Close

DoCmd.OpenForm Me

End Sub

Mas ao clicar aparece a seguinte mensagem:

Erro em tempo de execução '2498'

A expressão que você inseriu corresponde ao tipo de dados errado para um dos argumentos.

E delimita esse campo:

DoCmd.OpenForm Me

Editado Junho 15, 2009 por Raphael Souza