Como localizar uma tabela dentro dos bancos?

Discussão em 'Progress 4GL' iniciado por Joni, Agosto 1, 2014.

  1. Joni

    Joni Membro Participativo

    Bom dia Gurus,

    Gostaria de saber se voces podem me ajudar com o seguinte problema. Tenho que saber a qual banco determinada tabela pertence. Minha ideia é informar o nome da tabela e o programa retornar a qual banco ou bancos esta tabela esta localizada. Qualquer ajuda é bem vinda.

    Obrigado,

    Joni
  2. jaozi_nho

    jaozi_nho Membro Participativo

    Código:
    MESSAGE LDBNAME(BUFFER movto-estoq) VIEW-AS ALERT-BOX .
    Abraço .
    jcgerarduzzi curtiu isso.
  3. Joni

    Joni Membro Participativo

    Amigo,

    Obrigado pela ajuda, mas eu preciso criar uma variavel onde irei inputar o nome da tabela e ai o retorno deverá ser o nome dos bancos onde esta tabela esta localizada.
    No código que voce enviou ele não aceita a utilização de variavel.

    Obrigado,

    Joni
    jcgerarduzzi curtiu isso.
  4. jaozi_nho

    jaozi_nho Membro Participativo

    Entendi, tente o codigo abaixo então .

    Código:
    DEF VAR cTabela     AS CHAR NO-UNDO .
    DEF VAR bfTabela    AS HANDLE NO-UNDO .
    
    ASSIGN cTabela = "movto-estoq" .
    CREATE BUFFER bfTabela FOR TABLE cTabela .
    
    
    MESSAGE bfTabela:DBNAME VIEW-AS ALERT-BOX .

    Caso tenha mais de um banco com a mesma tabela, a unica maneira será fazendo a busca utilizando FOR EACH nas tabelas _FILE do banco .
    jcgerarduzzi curtiu isso.
  5. Joni

    Joni Membro Participativo

    Amigão,

    Funcionou 100%.

    Muito obrigado pela pronta ajuda.

    Joni
  6. Joni

    Joni Membro Participativo

    Mais uma duvida, e se existir a mesma tabela em mais de um banco de dados como ficaria o codigo?

    Abs,

    Joni

Compartilhe esta Página