[RESOLVIDO] UPC Adicionar Coluna Browse FT4001

Discussão em 'EMS , HCM e Totvs 11' iniciado por lucasiam, Maio 9, 2017.

Status do Tópico:
Não esta aberto para novas mensagens.
Página 2 de 3
  1. lucasiam

    lucasiam Membro Participativo

    Ah... verdade Rafael. Isso ficou confuso mesmo. Desculpem-me não ter já postado antes, mas que é no evento "before-initialize", eu adiciono a coluna na browse, e parametrizo pra que no "row-display" dela, seja executado a minha procedure, que é responsável por popular o campo.
    Esse código aqui:
    Código:
    IF p-ind-event  = "before-Initialize" THEN DO:

    RUN findWidget (INPUT "brSon1",
                    INPUT "browse",
                    INPUT p-wgh-frame,
                    OUTPUT hbr_table).
    IF VALID-HANDLE(hbr_table) THEN DO:

        ASSIGN hBuffer            = hbr_table:QUERY:GET-BUFFER-HANDLE(1)
               hdt-entrega        = hbr_table:ADD-CALC-COLUMN("CHARACTER", "X(10)" , "", "Entrega", 3 )
               hdt-entrega:WIDTH = 10.
        ON 'row-display':U OF hbr_table PERSISTENT RUN upc/ftp/upc-ft4001.p(INPUT "pi-row-display",
                                                                            INPUT STRING(hdt-entrega),
                                                                            INPUT hBuffer, 
                                                                            INPUT p-wgh-frame,
                                                                            INPUT p-cod-table,
                                                                            INPUT p-row-table).

    END.

END.
    lucasiam, Maio 10, 2017
    #7
  2. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    A última ideia que tenho eh refazer o que o produto padrão faz...assim você devolveria a função padrão
    rafael.andrade, Maio 10, 2017
    #8
  3. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    isso que eu ia dizer, vc vai ter que fazer ficar em italico o que precisa, tava pensando aqui, na upc vc está sobreescrevendo o metodo e não criando um outro para substituir, então a minha dica do apply está errada, ela funciona quando criamos via uma upc um botão gemeo do original e na tela fazemos o nosso ficar por cima do original, ou tornando o original invisible, dai um applay 'choose' no botão original funciona muito bem.
    Duro que não tem nenhum outro method que execute no momento do row-display.
    bootstrapmaster, Maio 10, 2017
    #9
  4. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Será que seria possível fazer algo como:

    Código:
    ON 'row-display':U OF hbr_table DO:
       RUN upc/ftp/upc-ft4001.p PERSISTENT (INPUT "pi-row-display",
                                                                            INPUT STRING(hdt-entrega),
                                                                            INPUT hBuffer,
                                                                            INPUT p-wgh-frame,
                                                                            INPUT p-cod-table,
                                                                            INPUT p-row-table).
       APPLY "ROW-DISPLAY" TO hbr_table.
END.
    rafael.andrade, Maio 10, 2017
    #10
  5. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    ai que está, quando vc montou o seu ON, vc sobreescreve o original, vc teria que ter um row-display-local, que o browse priorizaria para executar, dai vc cria esse, e dai sim, vc faz o que precisa e depois faz o apply no original, igual quando está desenvolvendo com smart-query
    bootstrapmaster, Maio 10, 2017
    #11
  6. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Bem que eu imaginei, pena que não dá pra copiar o evento para outro, tipo renomeasse para U1 e desse o apply nesse evento "novo".
    rafael.andrade, Maio 10, 2017
    #12
Página 2 de 3
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página