1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br
Cookies Anuncie aqui Patrocinador Anuncios

Duvida Chamando Zoom de Cotação (QO0310)

Discussão em 'Progress 4GL' iniciado por lm1979, Julho 5, 2016.

  1. lm1979

    lm1979 Membro Participativo

    Boa tarde pessoal,
    Estou desenvolvendo um relatório para o pessoal do comercial e nesse relatório eu estou chamado o zoom "dizoom/z09di159.p", mas quando eu clico duas vezes no campo o sistema apresenta um erro.

    Código utilizado para chamar o zoom:
    {include/zoomvar.i &prog-zoom=dizoom/z09di159.w
    &campo=c-nome-abrev
    &campozoom=nome-abrev}

    Mensagem de erro:
    Procedure dizoom/z09di159.w has no entry point for pi-entry. (6456)
    lm1979, Julho 5, 2016
    #1
  2. Cobra.cne

    Cobra.cne Equipe de Suporte Moderador

    Olá,

    Não sei se já resolveu o problema, mas alguns programas não são feitos com os smart objects, então tenta utilizar este código:
    Código:
        DEFINE VARIABLE hProgramZoom AS HANDLE      NO-UNDO.
    {method/zoomfields.i &ProgramZoom  = "dizoom/z09di159.w"
                         &FieldZoom1   = "nome-abrev"
                         &FieldScreen1 = "c-ini-campo"
                         &Frame1       = "f-pg-sel"}
    Abs.
    Cobra.cne, Agosto 4, 2016
    #2
    Edenilson Ferreira curtiu isso.
  3. lm1979

    lm1979 Membro Participativo

    Boa tarde Cleiton,
    Ainda não resolvi.
    Vou testar esse código, depois coloco o resultado.

    Obrigado.

    Att,
    Leandro.
    lm1979, Agosto 29, 2016
    #3
  4. lm1979

    lm1979 Membro Participativo

    Boa tarde Cleiton,
    Só hoje que eu voltei a tratar esse assunto.
    Adicionei o código conforme você passou, mas gerou um erro.

    ** Nao entendi apos: "RUN". (247)
    ** Comando invalido. (254)
    ** \\srv12\datasul\dts11tst\ERP\ddk\METHOD\zoomfields.i Nao entendi a linha . (198)
    lm1979, Fevereiro 24, 2017
    #4

Compartilhe esta Página