OM010COR - Modificar los colores del Browse del registro

Descripción:

La finalidad de este punto de entrada es modificar los colores del browse del registro.

Observaciones:

Para los release anteriores al 11.7 la respuesta de la función es un array que sobrepondrá el array de colores de la rutina principal. Por lo tanto, es necesario agregar nuevos colores y/o cambiar los colores al array recibido por parámetro.

Para los release a partir del 11.7 la respuesta de la función es un array que complementará el array de colores de la rutina principal. Por lo tanto, es necesario agregar nuevos colores al array recibido por parámetro.

Ejemplos:

Release anterior al 11.7:

#INCLUDE "PROTHEUS.CH"

User Function OM010COR()
Local aCoresUsr := aClone(PARAMIXB)

Aadd(aCoresuSR,{"(Dtos(DA0_DATATE) >= Dtos(dDataBase) .Or. Empty(Dtos(DA0_DATATE))) .And.DA0_ATIVO =='3'","BR_AZUL"}) //Activa promoción VIP

Return(aCoresUsr)

Release a partir del 11.7:

#INCLUDE "PROTHEUS.CH"

User Function OM010COR()
Local aCoresUsr := aClone(PARAMIXB)

Aadd(aCoresuSR,{"(Dtos(DA0_DATATE) >= Dtos(dDataBase) .Or. Empty(Dtos(DA0_DATATE))) .And.DA0_ATIVO =='3'","BLUE","Promoción VIP"}) //Activa promoción VIP

Return(aCoresUsr)

Idioma:

Portugués (Brasil)

Versión:

Microsiga_Protheus11

Sistemas operativos compatibles:

Todos

Compatible con las bases de datos:

Todas

Parámetros:

aCores --> Array que contiene los colores de la rutina principal

Respuesta:

aCores --> Array que contiene los colores que se mostrarán

Programa fuente:

OMSA010.PRX