MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Data Juliana

    Compartilhe

    ddoc
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 05/08/2011

    Data Juliana

    Mensagem  ddoc em 5/3/2012, 23:52

    Prezados amigos

    Estou criando uma tabela que irá conter Ordem de Produção. Mas, gostaria de gerar o número de lote da fabricação de forma automática. Portanto estou querendo criar a seguinte situação:

    Campo: NrLote. Formato: Texto. No valor padrão, ao colocar uma expressão ="LP"&"-"&Data()&"."&[OPCod].

    o Campo [OPCod] é o número da Ordem de Produção.

    Então, quero exibir assim, mas como valor padrão:

    LP-40973.3 - LP: Lote Produção - 40973: Data Juliana equivalente a 05/03/2012 . 3: Nr. Automático da OP [OPCod]

    Tem como fazer isso por expressão sem precisar programar VBA (que eu não entendo) para aparecer como valor padrão?
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11240
    Registrado : 30/12/2009

    Re: [Resolvido]Data Juliana

    Mensagem  criquio em 5/3/2012, 23:59

    Não entendi bem, mas pelo que parece, você já tem todos os dados em campos da tabela e quer concatená-los, é isso? Você quer apenas exibir essa concatenação em um campo do formulário? Pelo que entendi, não precisa gravar essa concatenação em tabela, uma vez que já teria todos os campos.


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.


    ddoc
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 05/08/2011

    Re: [Resolvido]Data Juliana

    Mensagem  ddoc em 6/3/2012, 12:32

    Não entendi bem, mas pelo que parece, você já tem todos os dados em campos da tabela e quer concatená-los, é isso? Você quer apenas exibir essa concatenação em um campo do formulário? Pelo que entendi, não precisa gravar essa concatenação em tabela, uma vez que já teria todos os campos.

    Prezado Criquio

    O número de lote tem que ser gravado, uma vez que é único e não pode ter outro similar dentro da tabela, e portanto, precisa ser gravado.

    A questão é simples. Preciso gerar um número de lote de forma automática, sem a interferência do usuário.

    Para tanto, quero colocar um valor padrão. Quando quero colocar data padrão, coloco no valor padrão =Agora() e bloqueio no formulário a opção de editar o campo. É o mesmo caso do número de lote.

    A situação é assim. Optei pela data juliana por ser numeração serial, porisso, a cada dia terei um número serial novo. Preciso juntar o número da OP [OPCod] para individualizar o lote, senão, todos sairiam com o mesmo número no dia.

    Por esta razão é que preciso de uma expressão para o campo valor padrão.

    LP = Lote de Produção
    Data Juliana = número serial do dia
    OP [OPCod] = número da ordem de produção

    Agora, se não for possível colocar o número da OP [OPCod], gostaria que os amigos contribuíssem com o seguinte:

    Substituiria o campo OP pela hora serial.

    Mas como fazer?
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11240
    Registrado : 30/12/2009

    Re: [Resolvido]Data Juliana

    Mensagem  criquio em 6/3/2012, 16:50

    Poderia tambem ser o código do registro+data completa + hora completa: 0001-02032012-134827. Mas como você já tem todos esses dados gravados, não precisa gravar esse campo. Basta buscar os dados na hora da exibição no formulário ou relatório.


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.


    ddoc
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 05/08/2011

    Re: [Resolvido]Data Juliana

    Mensagem  ddoc em 6/3/2012, 19:05

    Poderia tambem ser o código do registro+data completa + hora completa: 0001-02032012-134827. Mas como você já tem todos esses dados gravados, não precisa gravar esse campo. Basta buscar os dados na hora da exibição no formulário ou relatório.

    Criquio acho que você não entendeu. Esta informação tem ficar gravada sim. Pois tenho que recuperá-la mais tarde. Caso dê algum problema no item que foi fabricado, preciso localizar a informação dentro de uma pesquisa para verificar qual a OP que pertence ao lote. Para então localizar área que fabricou, localizar o funcionário e também os fornecedores de materiais. Todos estarão ligados a este número de lote.

    Não posso simplesmente fazer uma busca por estes campos, como você sugeriu. Tanto que a indexação do campo não pode permitir registros duplicados. Cada lote é único. Pois quando o auditor do Inmetro vier na empresa fazer a auditoria, é necessário toda esta relação de amarração e individualização do histórico.
    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11240
    Registrado : 30/12/2009

    Re: [Resolvido]Data Juliana

    Mensagem  criquio em 6/3/2012, 19:13

    Ainda não entendi muito bem o que realmente está tentando fazer. Talvez seja o caso de se ter um um evento que coloque isso no campo, pois se colocar uma expressão na origem do campo, ele perde o vínculo com a tabela. Talvez no evento "Após atualizar" do último campo que servirá como base, você colocaria isso via vba:

    Me.NomeDoCampo = "..."


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.


    ddoc
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 05/08/2011

    Re: [Resolvido]Data Juliana

    Mensagem  ddoc em 6/3/2012, 19:45

    Então Criquio, acho que deveria ser alguma coisa de vba para gerar o número de lote ao atualizar o campo nº de lote. Só que não sei como fazer isso. E importante, a data deve ser juliana.

    Convidad
    Convidado

    Re: [Resolvido]Data Juliana

    Mensagem  Convidad em 6/3/2012, 22:28

    Olá Ddoc

    Em primeiro lugar, você sabe o que é valor padrão?
    Como o nome já diz; é um valor numérico ou texto que sempre será exibido numa caixa de texto em todos os registros que ainda não foi digitado nada nela.
    Exemplo: Em um cadastro de cliente temos o campo cidade e estado.
    Como a maioria dos clientes serão da cidade local, colocamos como valor padrão o nome dessa cidade e estado, assim só daremos {Enter} nesses campos e só iremos alterar esse valor padrão se o cliente for de outras cidades.
    Então creio que o valor padrão não se aplica na tua situação:

    E para fazer esse código para o Nº Lote, terá que usar o vba.

    Precisamos saber de onde vem os dados seguintes:

    LP = Lote de Produção
    Esse será com incremento automático
    Data Juliana = número serial do dia
    dataatual
    Sugestão, ao invés de usar data serial,pode-se usar assim 060320021920.
    Observe que dessa maneira poderá ler diretamente, mas é apenas sugestão.
    OP [OPCod] = número da ordem de produção
    Esse número de onde vem?

    Precisamos saber se esses códigos já existem, se são digitados, automáticos (estão em outra tabela?)

    Porque teremos que fazer o algoritmo em VBA para concatenar esses valores e produzir e gravar o resultado que você necessita.

    Uma dúvida

    LP-40973.3 - LP: Lote Produção - 40973: Data Juliana equivalente a 05/03/2012 . 3: Nr. Automático da OP [OPCod]
    Esses valores em marrom, são assim mesmo, não estão repetidos?

    No aguardo

    Abraços









    avatar
    criquio
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11240
    Registrado : 30/12/2009

    Re: [Resolvido]Data Juliana

    Mensagem  criquio em 6/3/2012, 23:10

    Eu não sou muito fã de usar a propriedade Valor Padrão porque ela não é muito dinâmica. Ainda mais quando se precisa juntar diversos campos.


    .................................................................................
    Meu novo site: [Você precisa estar registrado e conectado para ver este link.]

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.


    ddoc
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 05/08/2011

    Re: [Resolvido]Data Juliana

    Mensagem  ddoc em 7/3/2012, 00:29

    LP = Lote de Produção
    Esse será com incremento automático
    Data Juliana = número serial do dia
    dataatual
    Sugestão, ao invés de usar data serial,pode-se usar assim 060320021920.
    Observe que dessa maneira poderá ler diretamente, mas é apenas sugestão.
    OP [OPCod] = número da ordem de produção
    Esse número de onde vem?

    Precisamos saber se esses códigos já existem, se são digitados, automáticos (estão em outra tabela?)

    Porque teremos que fazer o algoritmo em VBA para concatenar esses valores e produzir e gravar o resultado que você necessita.

    Uma dúvida

    LP-40973.3 - LP: Lote Produção - 40973: Data Juliana equivalente a 05/03/2012 . 3: Nr. Automático da OP [OPCod]
    Esses valores em marrom, são assim mesmo, não estão repetidos?


    LP = Lote de Produção - São letras que identificam o lote fabrica. Quando é feito aquisição de outras empresas a identificação vem como LC - Lote Comercial.

    O número 3 (LP-40973.3) é o número sequencial da ordem de produção (código, numeração automática). É o único valor que está gravado na tabela de ordem de produção.

    A data juliana será número calculado. E o LP é uma string - tipo: ="LP"&"-"&DataJuliana&"."&[OPcod]

    Não sei se consegui me explicar... Na imagem em anexo o nº op é OPLotePrimario

    Convidad
    Convidado

    Re: [Resolvido]Data Juliana

    Mensagem  Convidad em 7/3/2012, 11:34

    ddoc

    Dessa maneira iremos longe, você tentando explicar e nós tentando entender.

    Como desenvolvedor do teu aplicativo, é o único que o conhece bem.

    Melhor seria, postar parte do teu aplicativo com os formulários e tabelas em questão para que possamos entender direitinho e construir o número de lote final.
    Creio que somente vendo como funciona o teu aplicativo, que poderemos definir como construir essa sequencia.

    No aguardo, amigo

    avatar
    casilveira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 10/02/2012

    Re: [Resolvido]Data Juliana

    Mensagem  casilveira em 7/3/2012, 18:12


    Veja o exemplo que eu fiz se serve para alguma coisa.

    Baixar

    [Você precisa estar registrado e conectado para ver este link.]


    casilveira

    Convidad
    Convidado

    Re: [Resolvido]Data Juliana

    Mensagem  Convidad em 7/3/2012, 18:48

    Casil

    Já vi teu exemplo

    Eu preciso que me diga exatamente como quer a sequencia final, pois em cada post está de uma maneira diferente.

    Coloque com dados para eu poder ver a formatação;
    Considere a data juliana como 185 que é a data de hoje.

    abraços

    avatar
    casilveira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 10/02/2012

    Re: [Resolvido]Data Juliana

    Mensagem  casilveira em 7/3/2012, 19:46

    Balen

    Quem fez a pergunta foi o ddoc eu só sugeri uma forma de criar a sequencia...

    Aliás é a primeira vez que vejo falar em data juliana... kkk

    Abraços

    Convidad
    Convidado

    Re: [Resolvido]Data Juliana

    Mensagem  Convidad em 8/3/2012, 15:43

    Casil

    Desculpe minha falha, já to ficando meio louco. drunken

    Grande abraço

    ddoc
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 05/08/2011

    Re: [Resolvido]Data Juliana

    Mensagem  ddoc em 11/3/2012, 00:46

    Olá amigos!

    Na consulta ADD que utilizo para adicionar dados a tabela, realizei a seguinte operação no campo lote:

    Código:
    Lote: "LP" & "." & Format(Agora();"hhnn") & "." & Format(Agora();"ww") & "." & Format(Agora();"yy") & "." & [OPCod]

    Portanto, quando atualizo o primeiro campo após o campo da chave primária [OPCod], ele imediatamente calcula o número que preciso. Acabei esquecendo essa confusão de data juliana e criei uma nova situação.

    Como mencionei, não sou nem razoável em VB, portanto, tenho que achar solução em expressões.

    Mas, obrigado a todos pela tentativa em me ajudar.

    Meu respeito a todos daqui!

    Convidad
    Convidado

    Re: [Resolvido]Data Juliana

    Mensagem  Convidad em 11/3/2012, 04:02

    ddoc

    Valeu pelo retorno

    Boa sorte!
    avatar
    anderfranca
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 25/04/2016

    Data de Vencimento x transformar em Data Juliana

    Mensagem  anderfranca em 30/11/2016, 18:06

    Olá Amigos,

    Estou fazendo um programa onde eu preciso colocar a data de Vencimento ... tipo 01/05/2017 ... e eu queria transformar em Data Juliana.

    Alguém poderia me ajudar?

    Abraços,

    Anderson
    avatar
    anderfranca
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 25/04/2016

    Data Venc x Data Juliana

    Mensagem  anderfranca em 30/11/2016, 22:47

    Boa noite pessoal,

    Consegui já... e pra deixar minha contribuição, criei um sisteminha básico só pra converter Data de Vencimento em Data Juliana.
    Espero que possa ajudar alguém que tenha a mesma dúvida.

    Abraços
    Anexos
    DataJuliana.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (36 Kb) Baixado 11 vez(es)

      Data/hora atual: 16/10/2018, 11:34