MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário.

    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário. Empty [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário.

    Mensagem  joaomarcosferlinibento 28/5/2014, 18:11

    Pessoal,

    Mas uma vez aqui. E isto é uma situação que me deparei no sistema que estou desenvolvendo.

    No meu sistema, há 3 níveis de áreas: Recepção, Produção e Financeiro.

    Todos tem acesso ao formulário: OrdemServiço (que gera todas as rotinas subsequentes).

    O problema agora é que eu tenho no formulário o "AcompRecepção" que lista (objeto não acoplado) todas ordens e se "clicar duas vezes" selecione o registro (da coluna) que foi clicado abrindo o formulário "OrdemServiço".

    Porém existem também o "AcompProdução" que é a mesma coisa, e eu fiz no formulário "OrdemServiço" no "Ao Abrir" coloquei a seguinte expressão:

    Código:

     If IsNull(Me.OpenArgs) Then
            DoCmd.RunMacro "IrParaRegistroNovo"
        Exit Sub
        Else
        Me.DataEntry = False
        Dim x As Integer
        [b]x = Forms![u]AcompRecepção[/u].ListaLocalizar.Column(1)[/b]
        If (x) > 0 Then
            Me.OrdServ.Enabled = True
            DoCmd.GoToControl "OrdServ"
            DoCmd.FindRecord x, , True, , True, , True
        End If
    End If
    End Sub

    O problema disso, é que o formulário "AcompProdução" realiza a mesma tarefa, porém na linha (em negrito), a palavra sublinhada deve mudar para "AcompProdução" pois é uma variável de acordo onde o usuário está consultado (que pode varia: "AcompRecepção", "AcompProdução" e "AcompFinanceiro") para chamar o valor buscado "OrdServ".

    Minha dúvida é: como resolver este problema.

    Eu não quero duplicar o formulário "OrdemServiço". Quero algo mais eficiente.

    A comunidade consegue me ajudar? (Creio que sim).

    Desde já agradeço a todos.
    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário. Empty Re: [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário.

    Mensagem  joaomarcosferlinibento 28/5/2014, 18:30


    Pensando numa abordagem simples, poderíamos utilizar uma condicional para erro.

    Mas também não sei como monta-la, somente imaginei a lógica.

    If (#erro) then

    (Executa o processo de novo)

    If (#erro) then

    [...]

    E assim até achar o formulário aberto.

    Será que funciona?
    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário. Empty Re: [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário.

    Mensagem  joaomarcosferlinibento 23/6/2014, 12:43

    Resolvido.

    Fiz a criação de níveis de usuários, e ao abrir do formulário, cada um tem acesso a informação conforme foi determinado.
    joaomarcosferlinibento
    joaomarcosferlinibento
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 223
    Registrado : 23/02/2011

    [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário. Empty Re: [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário.

    Mensagem  joaomarcosferlinibento 23/6/2014, 12:43

    Resolvido.

    Conteúdo patrocinado


    [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário. Empty Re: [Resolvido]Validação de Formulários - Várias Consultas Relacionadas com um formulário.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 20:09