Qual evento ?Pintar Linha do Grid

Discussão em 'Progress 4GL' iniciado por maicon, Janeiro 4, 2013.

  1. maicon

    maicon Membro Participativo

    Boa Tarde

    Fiz o Código abaixo para pintar a linha do grid, conforme o valor do campo t-fornec.aprovada.
    Obs1: o Código funciona, mas quando clico no Grid.

    Em qual evento de qual objeto devo colocar esse código, para que quando o Formulário(Programa) abrir, já apareça a linha pintada conforme o campo t-fornec.aprovada?
    Desde já agradeço a ajuda.

    IF t-fornec.aprovada = YES THEN DO: /*Pintar a linha*/
    ASSIGN t-fornec.codigo:bgcolor IN BROWSE Browse-Fornec = 10
    t-fornec.nome:bgcolor IN BROWSE Browse-Fornec= 10
    t-fornec.condpagto:bgcolor IN BROWSE Browse-Fornec= 10
    t-fornec.prazoentrega:bgcolor IN BROWSE Browse-Fornec= 10.
    END.
    ELSE DO:
    ASSIGN t-fornec.codigo:bgcolor IN BROWSE Browse-Fornec = 7
    t-fornec.nome:bgcolor IN BROWSE Browse-Fornec= 7
    t-fornec.condpagto:bgcolor IN BROWSE Browse-Fornec= 7
    t-fornec.prazoentrega:bgcolor IN BROWSE Browse-Fornec= 7.
    END.
  2. LeandroSantos

    LeandroSantos Membro Participativo

    No row-display do browse.

    Abs.
  3. maicon

    maicon Membro Participativo

    Ok
    Deu certo
    Muito Obrigado

Compartilhe esta Página