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] 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.
  1. lucasiam

    lucasiam Membro Participativo

    Boa tarde pessoal,
    Criei uma UPC no FT4001 pra incluir na browse uma coluna exibindo a Data de Entrega do pedido.
    Até aí, tudo certo.
    O problema é que após eu ativar a UPC o sistema deixou de "formatar" as linhas da browse, mudando a cor/negrito da fonte conforme condições de faturamento.

    Pelo que percebi, minha UPC está "sobrescrevendo" o row-display nativo da browse. Seria isso? Como faço pra após a execução da UPC, chamar o comportamento nativo da browse?

    Segue trecho de código aonde atualizo o meu campo "Data Entrega" na browse:
    Código:
    IF p-ind-event = "PI-ROW-DISPLAY" THEN DO:
    
        ASSIGN hBuffer      = p-wgh-object
               hbr_table    = SELF
               hdt-entrega = HANDLE(p-ind-object).
        IF VALID-HANDLE(hbr_table) THEN DO:
            IF hBuffer:AVAILABLE THEN DO:
    
                FIND FIRST pre-fatur
                     WHERE pre-fatur.cdd-embarq = INT(wh-ft4001-cdd-embarq:SCREEN-VALUE)
                       AND pre-fatur.nr-resumo  = hBuffer:BUFFER-FIELD("nr-resumo"):BUFFER-VALUE NO-LOCK NO-ERROR.
    
                IF AVAIL pre-fatur THEN DO:
                    FIND FIRST ped-venda
                         WHERE ped-venda.nome-abrev = pre-fatur.nome-abrev
                           AND ped-venda.nr-pedcli  = pre-fatur.nr-pedcli NO-LOCK NO-ERROR.
    
                    IF AVAIL ped-venda THEN
                        ASSIGN hdt-entrega:SCREEN-VALUE = STRING(ped-venda.dt-entrega,"99/99/9999").
    
                END.
           END.
        END.
    END.
    
  2. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Não tem outro evento pra sobrescrever, só esse??
  3. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Tem certeza que esse código cria uma coluna nova? parece que só está mudando o valor exibido do campo no evento ROW-DISPLAY.
  4. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    apply 'row-display' in handle-browse.
  5. lucasiam

    lucasiam Membro Participativo

    Rafael, realmente esse trecho de código que coloquei é referente ao evento row-display, onde eu populo o campo que eu criei.
    A criação do campo eu fiz no evento before-Initialize.

    Coloquei o apply 'row-display' mas não funcionou. No padrão TOTVS, logo que abro o FT4001, ele já deixa em itálico as linhas de resumos que ainda não foram calculados. Com minha UPC, ele já abre com a fonte normal, sem nenhuma diferenciação.
  6. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Estou estranhando esse nome do evento PI-ROW-DISPLAY, esse PI parece que é uma procedure.

    Tenta colocar RUN PI-ROW-DISPLAY.
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página