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


2 participantes

    Identificação AlfaNumerico

    avatar
    joseantonio
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 142
    Registrado : 18/07/2011

    Identificação AlfaNumerico Empty Identificação AlfaNumerico

    Mensagem  joseantonio 16/1/2013, 21:19

    Pessoal, estou com um dúvida e venho novamente pedir um help. Tenho uma tabela chamada "idconfig" nessa tabela insiro o id inicial para base de minha sequencia, em 5 digitos numerais e um digito alfabético, exemplo: C99999-13, a letra C refere-se a identificação do tipo de OS "CITOLOGIA", podendo alternar para letra B de "BIOPSIA" de acordo com a abertura da os, a numeração 99999 refere-se a sequencia que deverá acompanhar a sequencia do id inicial da tabela "idconfig" de acordo com a inserção dos registro, o digito 13 refere-se ao ano atual.

    Pois bem, pensei em atribuir um botão para o tipo de OS sendo botão CITOLOGIA que abrirá novo registro com o código do id com a letra "C" e BIOPSIA para abrir novo registro como o código do id com a letra B.

    Assim que o código inserir a letra ele deverá também localizar o próximo registro na tabela "OS" exemplo: C00001-13, C00002-13 no caso de CITOLOGIA e B00001-13, B00001-13 no caso de BIOPSIA e assim por diante.

    Alguém pode me ajudar?
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    Identificação AlfaNumerico Empty Re: Identificação AlfaNumerico

    Mensagem  Alexandre Neves 17/1/2013, 18:44

    Boa noite, joseantonio
    Trabalhe a numeração por partes:
    1ª parte: Left(Numeracao,1)
    2ª parte: Mid(Numeracao,2,5)
    3ª parte: Mid(Numeracao,8,2)


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    joseantonio
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 142
    Registrado : 18/07/2011

    Identificação AlfaNumerico Empty Re: Identificação AlfaNumerico

    Mensagem  joseantonio 17/1/2013, 19:27

    Não compreendi, pode detalhar melhor?
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    Identificação AlfaNumerico Empty Re: Identificação AlfaNumerico

    Mensagem  Alexandre Neves 17/1/2013, 19:32

    Novo IdInicial:
    COUNT("*","IdConfig","Mid(IdInicial,8,2)=Format(Date(),'yy')+1


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    joseantonio
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 142
    Registrado : 18/07/2011

    Identificação AlfaNumerico Empty Re: Identificação AlfaNumerico

    Mensagem  joseantonio 18/1/2013, 00:07

    É só incluir esse código no botão? Deu erro de sintase.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    Identificação AlfaNumerico Empty Re: Identificação AlfaNumerico

    Mensagem  Alexandre Neves 18/1/2013, 19:35

    Boa noite,
    Não experimentei, mas veja se funciona assim
    COUNT("*","IdConfig","Mid(IdInicial,8,2)=Right(year(Date),2)+1


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    Conteúdo patrocinado


    Identificação AlfaNumerico Empty Re: Identificação AlfaNumerico

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/5/2024, 01:51