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

    Access 2016 recalc

    Compartilhe

    mes1970
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 11/05/2011

    Access 2016 recalc

    Mensagem  mes1970 em Ter 12 Jun 2018, 16:08

    Prezados

    Tenho campos calculados cuja origem advem de subformulario, sempre que clico no botão imprimir, utilizo a função recalc
    Ela funcionava super bem na versão 2003, porém agora, quando executo, a função demora e ocorre erro pois os valores dos campos calculados fica null

    exemplo:

    if not isnull(cod) then

    me.recalc
    if me.vlr_total>0 then (me.vlr_total tem sua origem baseada num subform)
    docmd.print ...
    endif
    endif

    neste exemplo, o me.vlr>0 é validado antes da conclusão do recalc, ocasionando a não impressão do relatório
    se clico no F9 e tiro o recalc da função funciona, mas não posso depender do usuário

    O mais engraçado é que se eu depurar passo a passo o erro não ocorre, tentei ate usar um for ou a função sleep após o recalc para simular um delay, mas tambem não funcionou

    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5176
    Registrado : 15/03/2013

    Re: Access 2016 recalc

    Mensagem  ahteixeira em Qua 13 Jun 2018, 14:19

    Olá Marcos, Bem-Vindo ao fórum.

    Uma vez que referiu que tem um SubForm e está a utilizar o me.recalc , verifique efetivamente onde está o foco, talvez seja melhor colocar o nome completo.
    Outra situação pode ser o valor do campo do SubForm ainda não ter sido guardado.

    Veja se será algo assim.

    Abraço
    avatar
    toyebom
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1018
    Registrado : 18/07/2012

    Access 2016 recalc

    Mensagem  toyebom em Qua 13 Jun 2018, 19:00

    Tenta substituir o recalc por DoCmd.Save ou DoCmd.Refresh ou Me.Require


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.

      Data/hora atual: Seg 18 Jun 2018, 10:49