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]Emissão de cheque

    avatar
    DCezar
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 19/09/2013

    [Resolvido]Emissão de cheque Empty [Resolvido]Emissão de cheque

    Mensagem  DCezar 14/8/2014, 20:42

    Boa tarde senhores,

    Estou criando um programa para preencher e imprimir cheques, mas estou com um probleminha.
    Criei três campos: Dia; Mês; Ano que são preenchidas de acordo com a data do preenchimento usando o seguinte código:

    campo dia: =DiaIgual(Dia([Data]))
    campo mês: =MesExtenso(Mês([Data]))
    campo ano: =AnoIgual(Ano([Data]))

    Eis o problema, ele preenche na parte do formulário, mas não armazena estas informações na tabela e quando puxo o relatório os campos dia, mês e ano, aparecem #Erro.

    Como devo fazer para que as informações desdes campos sejam salva na tabela?


    Agradeço a ajuda...
    Connekta Informatica
    Connekta Informatica
    VIP
    VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1062
    Registrado : 01/07/2011

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  Connekta Informatica 14/8/2014, 21:09

    Boa Tarde

    Tente assim

    Dia = Format(Date, "dd")
    Mês = Format(Date, "mmmm")
    Ano = Format(Date, "yyyy")


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    Clique Aqui


    Lembrete: Desfrutar e Preservar é um direito de Todos.




    avatar
    DCezar
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 19/09/2013

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  DCezar 14/8/2014, 22:06

    Coloquei no campo dia e da o seguinte erro:

    A expressão que você inseriu contém sintaxe inválida.
    Você omitiu um operando ou operador, inseriu uma vírgula ou caractere inválido, ou inseriu texto sem delimitá-lo por aspas.

    Connekta Informatica
    Connekta Informatica
    VIP
    VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1062
    Registrado : 01/07/2011

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  Connekta Informatica 15/8/2014, 01:10

    Então mude a (,) por (Wink


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    Clique Aqui


    Lembrete: Desfrutar e Preservar é um direito de Todos.




    avatar
    DCezar
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 19/09/2013

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  DCezar 15/8/2014, 18:08

    Com a mudança dá o seguinte erro: #Nome?
    Estou enviando uma copia do programa para ver como estou colocando
    Anexos
    [Resolvido]Emissão de cheque AttachmentChequeBB.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (138 Kb) Baixado 45 vez(es)
    avatar
    DCezar
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 19/09/2013

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  DCezar 15/8/2014, 19:54

    Amigo

    Quase resolvemos o problema, mudei a expressão para:

    Dia =Format([Data];"dd")
    Mês =Format([Data];"mmmm")
    Ano =Format([Data];"yyyy")

    Mas esses campos só aparecem no formulário, eu preciso que esses dados sejam salvos na tabela e assim quando for fazer a pesquisa no relatório apareça o dia, mês e ano para ser impresso no cheque.
    Se der uma olhada no relatório esses campos saem como #Erro.
    Julio Lustosa
    Julio Lustosa
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  Julio Lustosa 15/8/2014, 20:03

    DCezar,

    Você estão usando colchetes, e o correto seria usar sem o colchetes pois a função Data não é um campo do relatório. Então a função seria assim:

    Format(Data();"d")
    Format(Data();"mmmm"")
    Format(Data();"yyyy")

    Agora, se você quer o resultado, baseando no campo Me.Data do seu formulário, então você deve alterar a sua expressão que contém Date, para Data, mantendo os colchetes para especificar para a expressão que é um campo. Assim:

    Format([Data];"d")
    Format([Data];"mmmm"")
    Format([Data];"yyyy")

    Abraços.
    Julio Lustosa
    Julio Lustosa
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  Julio Lustosa 15/8/2014, 20:07

    É só fazer o mesmo no relatório. Com as mesmas expressões.

    Abraços.
    Julio Lustosa
    Julio Lustosa
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  Julio Lustosa 15/8/2014, 20:18

    DCezar,

    Fiz algumas modificações no programinha.

    No formulário, nos campos dia, mês e ano, referenciei estes campos aos respectivos campos da tabela. No campo Data, coloquei um pequeno procedimento que permite você salvar os dados na tabela (do jeito que você quer).

    No relatório, também referenciei os campos dia, mês e ano aos respectivos campos da tabela. E agora faz o que você quer.

    OBS.: O procedimento que coloquei no campo Data, também pode ser colocado no procedimento AoCarregar do formulário se for mais conveniente para você.

    Abraços.
    Anexos
    [Resolvido]Emissão de cheque AttachmentChequeBB.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (148 Kb) Baixado 18 vez(es)
    Connekta Informatica
    Connekta Informatica
    VIP
    VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1062
    Registrado : 01/07/2011

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  Connekta Informatica 16/8/2014, 19:47

    Dê uma olhada nesse:
    Anexos
    [Resolvido]Emissão de cheque AttachmentChequeBB.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (147 Kb) Baixado 52 vez(es)


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    Clique Aqui


    Lembrete: Desfrutar e Preservar é um direito de Todos.




    avatar
    DCezar
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 19/09/2013

    [Resolvido]Emissão de cheque Empty Re: [Resolvido]Emissão de cheque

    Mensagem  DCezar 19/8/2014, 15:34

    Pessoal obrigado pela ajuda, consegui fazer o que queria.
    Segue anexo como ficou para quem quiser dar uma olhada.
    Agora só falta alguns ajustes para finalizar.

    Valeu.
    Anexos
    [Resolvido]Emissão de cheque AttachmentEmissor de cheque.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (171 Kb) Baixado 71 vez(es)

      Data/hora atual: 12/4/2021, 02:19