1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.
  2. Anuncie Aqui
    Anuncie aqui você Também: fdantas@4each.com.br

[RESOLVIDO] Controle de treeview por upc

Discussão em 'EMS , HCM e Totvs 11' iniciado por elmo, Julho 3, 2014.

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

    elmo Membro Ativo

    Boa tarde,
    Tenho uma upc no programa PD4000 e no programa de cotação QO0310 minha upc sugere itens após o usuário incluir algum item que possui relacionamento (relação em tabela expecífica). Após a aceitação da sugestão a upc faz o input do item no pedido usando as APIs, até aí tudo certo.

    Porém após o input do item pela API o item não aparece na treeview sendo necessário sair e entra do pedido para que o mesmo apareca. Até encontrei um o Handle do CONTROL-FRAME que consigo interagir mudando os atributos de SENSITIVE e VISIBLE mas isso não é suficiente para que o item apareca.

    Alguém sabe com dar um refresh ou controlar essa treeview?

    upload_2014-7-3_15-46-48.png
    Obrigado.
  2. jaisonantoniazzi

    jaisonantoniazzi Membro Ativo

    Bom dia, tudo bom?
    Experimente executar o procedimento pi-ReloadNodes, de modo persistente (in hpd4000), passando Itens, Entregas, Representantes, Condições de Pagamento, InclusaoItem ou Inclusão Componente.

    *InclusaoItem é sem espaço.

    run pi-ReloadNodes in hPD4000 (input "Itens":U).
    run pi-ReloadNodes in hPD4000 (input "Entregas":U).
    run pi-ReloadNodes in hPD4000 (input "Representantes":U).
    run pi-ReloadNodes in hPD4000 (input "Condições de Pagamento":U).
    run pi-ReloadNodes in hPD4000 ("InclusaoItem":U).
    run pi-ReloadNodes in hPD4000 ("Inclusão Componente":U).

    Veja se funciona.

    Grande abraço.
    Jaison Antoniazzi
    elmo curtiu isso.
  3. elmo

    elmo Membro Ativo

  4. elmo

    elmo Membro Ativo

    Realizei o teste do código mas o mesmo apresentava erro na execução, alterei conforme abaixo o erro não aparece mas não tenho o resultado esperado.
    Talvez meu código esteja errado.

    Código:
    IF NOT VALID-HANDLE(hPD4000) OR
               hPD4000:TYPE      <> "PROCEDURE":U OR
               hPD4000:FILE-NAME <> "pdp/pd4000.p":U THEN DO:
                RUN pdp/pd4000.r  PERSISTENT SET hPD4000 .
                MESSAGE "ok" VIEW-AS ALERT-BOX.
    END.
           
            run pi-ReloadNodes in hPD4000 (input "Itens":U).
            run pi-ReloadNodes in hPD4000 (input "Entregas":U).
            run pi-ReloadNodes in hPD4000 (input "Representantes":U).
            run pi-ReloadNodes in hPD4000 (input "Condições de Pagamento":U).
            run pi-ReloadNodes in hPD4000 ("InclusaoItem":U).
            run pi-ReloadNodes in hPD4000 ("Inclusão Componente":U).
    Obrigado.
  5. jaisonantoniazzi

    jaisonantoniazzi Membro Ativo

    Desculpa meu, bastaria você usar o handle do programa PD4000 que foi passado com um dos parâmetros da UPC e chamar estes métodos.
    Forte abraço.
    elmo curtiu isso.
  6. elmo

    elmo Membro Ativo

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

Compartilhe esta Página