Page 2 of 2

Re: Need help with code block

Posted: Wed Dec 30, 2020 5:25 pm
by Claudio Ricardo
Salinetas:
Tenes razón, viendo como funciona grid no es tan fácil evaluar campos entre si.
Muy ingenioso comparar primero y guardar el resultado en otro campo y luego
con tu función o con el codeblock de Martin pintar el row !

Martin:
En este caso necesitaba cumplir con una de dos condiciónes para resaltar el row evaluando 4 campos...
Tu CB lo utilizaré en otro programa en un grid que tiene un campo lógico que indica los clientes morosos :lol:

Muchisimas Gracias a todos por la ayuda brindada !!!

Re: Need help with code block

Posted: Fri Jan 01, 2021 2:50 pm
by movilceles
Claudio perdona por contestar tan tarde, yo tambien iba a necesitar esta opcion en la aplicacion que estoy desarrollando.

Asi si funciona, tenia que saber en que linea y columna buscar :

bColor:= { || if ( AllTrim(This.Cellvalue) < AllTrim(Stock_Sucursales.Grid_Stock.cell(this.CellRowIndex,(this.CellColIndex,4))), RED, NIL) }

Tambien se podria anidar por ejemplo para que mostrara naranja cuando este proximo al stock minimo ejp: stock minimo+1 y rojo cuando sea inferior:

bColor:= { || if ( AllTrim(This.Cellvalue) < AllTrim(Stock_Sucursales.Grid_Stock.cell(this.CellRowIndex,(this.CellColIndex,4)), RED, ;
if ( VAL(AllTrim(This.Cellvalue)) = VAL(AllTrim(Stock_Sucursales.Grid_Stock.cell(this.CellRowIndex,(this.CellColIndex,4)))+1)), ORANGE, NIL) }

Feliz año nuevo a todos !!

Re: Need help with code block

Posted: Sat Jan 02, 2021 2:06 am
by Claudio Ricardo
Muchisimas Gracias Movilceles...
Esa función ya la cerré con Browse (además eran 4 datos a evaluar)
Pero en otras funciones del mismo programa me va a ser muy util tu codigo.
Que tengas un próspero 2021 !!!!

Thank you very much Movilceles ...
I already closed that function with Browse (there were also 4 data to evaluate)
But in other functions of the same program your code will be very useful to me.
Have a prosperous 2021 !!!!

Re: Need help with code block

Posted: Sat Jan 02, 2021 9:54 pm
by movilceles
Claudio mi nombe es Celes, (de Celestino) :D

Encantado de haberte ayudado.

La verdad que es un placer estar en este foro y ver como todo el mundo pone de su parte,
aprovecho para dar las gracias a todos !!. :D

Igualmente, que tengas un prospero 2021 !!!
--------------------------------------------------------------------------------------------------------------------------------
Translated with google

Claudio my name is Celes, (from Celestino)
Nice to have helped you.
The truth is that it is a pleasure to be in this forum and see how everyone does their part,
I take this opportunity to thank everyone !!
Also, have a prosperous 2021 !!!