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

Duvida Como listar o FIELD DETAILS de tabela?

Discussão em 'Progress 4GL' iniciado por Vinicius Gasparini, Julho 28, 2014.

  1. Vinicius Gasparini

    Vinicius Gasparini Sem Pontuação

    Bom dia,

    Existe uma forma de fazer um "for each" e listar o "field details" de uma tabela?

    Eu sei que posso tirar essa informação no dicionario de dados, mas queria fazer isso para várias tabelas, exportando para um Excel formatado.

    Ex:

    Table: emitente
    ---------------------------------------------------------
    Field Name: nome-abrev
    Help: Nome abreviado do cliente/fornecedor
  2. Cobra.cne

    Cobra.cne Equipe de Suporte Moderador

    Olá Vinicius,

    Um exemplo que utilizo é este, só precisa adaptar para gerar para o Excel:
    PHP:
    OUTPUT TO n:\desenv\tabelas.txt NO-CONVERT.
    FOR 
    EACH banco._file NO-LOCK
        WHERE _file
    ._file-name BEGINS "es":
        
    DISP _file._file-name
             _file
    ._desc
            WITH WIDTH 300 STREAM
    -IO.
        FOR 
    EACH banco._field NO-LOCK
            WHERE _field
    ._file-recid RECID(_file)
            
    BY _field._order:
            
    DISP _field._order
                 _field
    ._field-name
                 _field
    ._data-type
                 _field
    ._format
                 _field
    ._initial
                 _field
    ._label
                 _field
    ._mandatory
                 _field
    ._help
                WITH WIDTH 300 SCROLLABLE STREAM
    -IO.
                
        
    END.
    END.
    OUTPUT CLOSE.
    Espero que ajude.
  3. Isaaac

    Isaaac Sem Pontuação

    Muito bom esse exemplo. Muito obrigado.

Compartilhe esta Página