[RESOLVIDO] Customização do Zoom Z02AD098

Discussão em 'EMS , HCM e Totvs 11' iniciado por Rogerio, Maio 15, 2011.

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

    Rogerio Moderator Moderador Equipe de Suporte

    Perfeito!!!

    Muito Obrigado!!!
  2. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Cara mais uma coisa, aproveitando de você...

    Eu precisaria tambem, na trigger LEAVE do Nome-Abrev do Cliente, validar o grupo de cliente, mas se eu fizer da mesma forma do Zoom, e deixarei da fazer várias ações que hoje sçao feitas pelo programa padrão....
    Agora pergunto, tem como eu fazer a minha validação do grupo de cliente antes da validação padrão do EMS???
  3. TrombiniSP

    TrombiniSP Membro Participativo

    Rogerio,

    Acho que vc pode trabalhar com duas variáveis WIDGET-HANDLE. Vc mantem declarada a variavel que vc já está usando e cria uma outra auxiliar que vai receber os mesmos atributos.

    Tipo:
    Código:
    def new global shared var wh-pd4000-nome-abrev             as widget-handle no-undo.
    def new global shared var wh-pd4000-nome-abrev-leave    as widget-handle no-undo.
    
    Depois vc vai atribuir uma trigger de Leave e criar um novo programa para esta validação, ex.: upcpd4000-u02.p
    Código:
    ON 'LEAVE' OF wh-pd4000-nome-abrev
             PERSISTENT RUN esp\upcpd4000-u02.p.
    
    Dentro do upcpd4000-u02.p vc vai fazer a validação que deseja e depois executar o código do LEAVE original com o comendo APPLY.
    Código:
    APPLY "LEAVE" TO wh-pd4000-nome-abrev-leave.
    
    Acho que é por ae. :D

    []s
  4. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Entendi, mas dai eu tenho que alterar as triggers do F5, Mouse-Select-DblClick nos eventos de Display, etc.... do nome-abrev padrao para o nome-abrev-leave, correto???

    e se tiver masi validações com isso, eu não posso ter problemas?
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página