Mensagem de banco de dados

Discussão em 'Banco de Dados / Database' iniciado por leandro.marcelino, Janeiro 24, 2012.

  1. leandro.marcelino

    leandro.marcelino Sem Pontuação

    Boa tarde,
    A todo instante está aparecendo no arquivo de log a mensagem abaix e eu não estou conseguindo identificar o que está causando essa mensagem.

    [2012/01/12@15:02:08.078-0300] P-4584 T-4336 I SRV 1: (8826) Campo it-codigo da tabela b-ordem-rede (recid 38414532) nÆo encontra-se na cl usula FIELDS.
    [2012/01/12@15:02:08.078-0300] P-4584 T-4336 I SRV 1: (5512) Uma mensagem anterior foi enviada em nome do usuário 197.
    [2012/01/12@15:02:08.093-0300] P-4584 T-4336 I SRV 1: (8826) Campo it-codigo da tabela b-ordem-rede (recid 38414532) nÆo encontra-se na cl usula FIELDS.
    [2012/01/12@15:02:08.093-0300] P-4584 T-4336 I SRV 1: (5512) Uma mensagem anterior foi enviada em nome do usuário 197.
    [2012/01/12@15:02:08.093-0300] P-4584 T-4336 I SRV 1: (8826) Campo it-codigo da tabela b-ordem-rede (recid 38414532) nÆo encontra-se na cl usula FIELDS.

    Alguém já passou por isso antes ou saberia me dar um caminho para encontrar o que causa essa mensagem?
    leandro.marcelino, Janeiro 24, 2012
    #1
  2. Cobra.cne

    Cobra.cne Equipe de Suporte Moderador

    Olá Leandro,

    Isto esta acontecendo porque em algum programa foi utilizado a opção de FIELDS em um FOR, e campo não foi referenciado. Infelizmente o Progress não detecta este problema em tempo de compilação, só em execução.

    Exemplo do erro:
    Código:
    FOR EACH item FIELDS (desc-item) 
    WHERE item.it-codigo = "1" NO-LOCK:
    DISP item.it-codigo item.desc-item.
END.
    Se você checar a sintaxe do código acima estará certo, mas na hora de rodar irá apresentar o erro:
    Código:
    ---------------------------
Error (Press HELP to view stack trace)
---------------------------
Field it-codigo from item record (recid 33564611) was missing from FIELDS phrase. (8826)
---------------------------
OK   Help   
---------------------------
    e para corrigir:
    Código:
    FOR EACH item FIELDS (desc-item it-codigo) 
    WHERE item.it-codigo = "1" NO-LOCK:
    DISP item.it-codigo item.desc-item.
END.
    Agora você vai ter que descobrir em qual programa esta apresentando este erro.

    T+
    Cobra.cne, Fevereiro 13, 2012
    #2
  3. leandro.marcelino

    leandro.marcelino Sem Pontuação

    Bom dia Cobra.cne,
    Eu abri um chamado no suporte da Totvs e eles me enviaram os programas atualizados, esse erro estava em um programa do módulo de chão de fábrica, sem querer eu executei o programa para realizar um treinamento e apareceu a mensagem na minha tela.
    Obrigado pela atenção.

    Abraço.
    leandro.marcelino, Fevereiro 13, 2012
    #3

Compartilhe esta Página