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]Fechamento Ordem Serviço

    avatar
    marcocalixto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 08/12/2011

    [Resolvido]Fechamento Ordem Serviço Empty Fechamento Ordem Serviço

    Mensagem  marcocalixto 5/1/2012, 23:02

    Tenho uma tabela de ordem serviço.
    Como devo fechar para ela não poder mais ser digitada? Ficar Bloqueada a ordem de serviço de código especifico e só liberar com um comando
    Grato pela atenção
    avatar
    Convidad
    Convidado


    [Resolvido]Fechamento Ordem Serviço Empty Re: [Resolvido]Fechamento Ordem Serviço

    Mensagem  Convidad 5/1/2012, 23:25

    Olá

    Eu costumo usar uma cx de seleção "Bloqueado" sim/não na tabela.
    avatar
    Convidad
    Convidado


    [Resolvido]Fechamento Ordem Serviço Empty Re: [Resolvido]Fechamento Ordem Serviço

    Mensagem  Convidad 6/1/2012, 12:48

    Uma vez incluído o campo Bloqueado (tipo sim/não) na tabela, há várias formas de aplicar:

    Pode incluir este campo no form OS, e no evento No atual do form colocar um código assim:

    Private Sub Form_Current()
    If Me.Bloqueado = True Then
    Me.AllowEdits = False
    Else
    Me.AllowEdits = True
    End If
    End Sub

    Claro que precisa impedir que qualquer usuário possa marcar/desmarcar o campo. Eu uso um controle de usuários, e atribuo nele a permissão para isso:
    No evento Ao carregar do form vai o código:

    Private Sub Form_Load()
    'verifica na tabela tUsuario se o usuário atual tem permissão para bloquear/desbloquear
    If DLookup("Bloqueio", "tUsuario", "[login] = getUsuarioAtual()") = True Then
    Me.Bloqueado.Locked = False
    Else: Me.Bloqueado.Locked = True: End If
    End Sub

    Outra forma de uso seria bloquer o form após imprimir um relatório. Neste caso, o evento Ao imprimir da seção Detalhe do relatório, leva um código para marcar o registro do form como Locked = True

    Também pode optar por não incluir o campo no form OS, e sim criar outro form só para bloquer/desbloquear, este com permissão de acesso restrita.
    avatar
    marcocalixto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 08/12/2011

    [Resolvido]Fechamento Ordem Serviço Empty Re: [Resolvido]Fechamento Ordem Serviço

    Mensagem  marcocalixto 8/1/2012, 17:34

    Olá!!!

    Criei um campo sim/não, coloquei na Os aparece um lugar para marcar, porém não consigo marcar e desmarcar.

    Fui no Private Sub Form_Current() e coloquei o código que vc indicou, quando vou no campo marcado ele não desmarca fica bloqueado. Quando consultei outro número de os tambem estava bloqueada.

    p.s Ainda não cheguei a fazer usuário.

    Obrigado pela atenção
    avatar
    Convidad
    Convidado


    [Resolvido]Fechamento Ordem Serviço Empty Re: [Resolvido]Fechamento Ordem Serviço

    Mensagem  Convidad 8/1/2012, 18:15

    Olá

    Se vc criou o controle na tabela e ele está acoplado no formulário, deveria funcionar.

    Não imagino o que possa estar errado.
    avatar
    marcocalixto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 08/12/2011

    [Resolvido]Fechamento Ordem Serviço Empty Re: [Resolvido]Fechamento Ordem Serviço

    Mensagem  marcocalixto 8/1/2012, 18:24

    Olá!!!!


    Bloquear já consigo. Consigo bloquear a os que quero

    Falta só desbloquear. Não consegui ainda.

    Obrigado
    avatar
    marcocalixto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 08/12/2011

    [Resolvido]Fechamento Ordem Serviço Empty Re: [Resolvido]Fechamento Ordem Serviço

    Mensagem  marcocalixto 8/1/2012, 19:18

    Consegui bloquear.
    grato pela atenção
    avatar
    Convidad
    Convidado


    [Resolvido]Fechamento Ordem Serviço Empty Re: [Resolvido]Fechamento Ordem Serviço

    Mensagem  Convidad 8/1/2012, 19:22

    Beleza!

    Grato pelo retorno.

    Conteúdo patrocinado


    [Resolvido]Fechamento Ordem Serviço Empty Re: [Resolvido]Fechamento Ordem Serviço

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/4/2024, 22:34