Exibir Dados

Discussão em 'Progress 4GL' iniciado por arossler, Setembro 4, 2009.

  1. arossler

    arossler Guest

    Boa tarde galera.

    Seguinte pessoas...
    Estou fazendo um programa pelo progress ems datasul... ele tem que mostrar os campos de uma tabela e um campo somente de outra tabela, isso em um cadastro simples... só que eu não consigo... não sei se devo colocar um find no local-display-fields, como deve ser a query?... ela tem que ter dados externos, ou pode ser uma query normal de uma única tabela??
    Estou uma tabela de gasto com cod_funcionario, e tenho que exibir o nome do funcionario da tabela funcionario.

    Valeu Galera...
  2. alexfowler

    alexfowler Membro Participativo

    Cria a local-display-fields, coloca o run-dispatch (input 'local-display-fields') e depois do dispatch, voce poe a logica:

    find first tabelaquevocequer where tabelaquevocequer.codigo-chave = input frame {&frame-name} codigo-chave na frame no-lock no-error.
    if avail tabelaquevocequer then
    assign campo:screen-value in frame {&frame-name} = tabelaqeuvocequer.campo.
    else
    assign campo:screen-value in frame {&frame-name} = "".
  3. alexfowler

    alexfowler Membro Participativo

    Esqueci de dizer que o codigo na mensagem acima é para era mostrar quando o usuario esta navegando pelos registros ja cadastrados, agora, nomomento de inclusao ou alteracao, voce poe a logica do find no leave do campo codigo.
  4. arossler

    arossler Guest

    Bom dia amigos...

    Ainda assim não funciona...
  5. arossler

    arossler Guest

    Consegui... valeu...

Compartilhe esta Página