[RESOLVIDO] Atualização de Browse Pai x Filho

Discussão em 'EMS , HCM e Totvs 11' iniciado por Rogerio, Março 15, 2012.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Galera desenvolvi uma Window Cadastro Pai x Filho, para a seguinte situação: No cadastro Pai, a cada alteração feita é gravado um LOG, e esse LOG aparece no Browse Filho... até ai tranquilo, o problema que que quando faço uma alteração o Browse não é atualizado automaticamente, mas isso apenas para o primeiro registro, o restante atualiza o Browse normalmente, alguem sabe como posso forçar essa atualização?
  2. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Alguem saberia como eu posso forçar a atualização do Browse?
  3. jdchaves

    jdchaves Membro Participativo

    Boa tarde, segue o manual de padrões. Espero que ajude ;)

    Arquivos Anexados:

  4. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Cara o manual eu tenho obrigado!!!

    Eu segui o manual na Criação de um Cadastro Pai x Filho, mas sempre no primeiro registro o Browse Filho não atualiza automaticamente, eu tenho que ir um pra frente e voltar para que o Browse atualize....

    Eu acho que deve ter algum RUN, pra que eu consiga atualizar o Browse Filho..
  5. jdchaves

    jdchaves Membro Participativo

    já tentou na local-display da Viewer rodar um pi-open-query do browse?
    Já passei por isso, e pelo que lembro consegui resolver com isso:

    Código:
    /*************************Viewer****************************/
    RUN dispatch IN THIS-PROCEDURE ( INPUT 'display-fields':U ) .
    
    IF VALID-HANDLE(h-browse) AND
            AVAIL TABELA THEN DO:
            
            RUN pi-recebe-rowid IN h-browse(ROWID(TABELA)).
            RUN pi-open-query IN h-browse.
    END.
    /*************************FIM-Viewer****************************/
    
    /********************Procedure no browse********************/
    PROCEDURE pi-recebe-rowid:
    DEF INPUT PARAM p-row-table AS ROWID NO-UNDO.
    
    ASSIGN v-row-parent = p-row-table.
    
    FIND FIRST ped-venda NO-LOCK 
         WHERE ROWID(ped-venda) = v-row-parent .
    
    END PROCEDURE.
    
    PROCEDURE pi-open-query:
    IF AVAIL TABELA THEN DO:
    
        OPEN QUERY br-table FOR EACH TABELA-BROWSE
                               WHERE TABELA-BROWSE.CHAVE = TABELA.CHAVE NO-LOCK.
    END.
    
    END PROCEDURE.
    
  6. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Cara pior que mesmo assim não tá funcionando...

    Olha o que eu fiz ainda... antes do OPEN QUERY eu ainda deu um FOR EACH na tabela-browse e dei um MESSAGE... ele me trouxe a alteração... mas não tá jogando no browse...o pior é que isso tá ocorrendo em várias telas... já tentei apagar e fazer novamente mas não tá adiantando...
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página