Punto de entrada COMXLEG

Línea de producto:

Microsiga Protheus

Segmento:

Backoffice

Módulo:

Compras (SIGACOM)

Rutina:

Rutina

Nombre técnico

COMXCOL

Monitor TOTVS Colaboración                                        

Punto de entrada:

COMXLEG

País(es):

Brasil

Base(s) de datos:

Todos

Tablas utilizadas:

SDS / SDT

Sistema(s) operativo(s):

Windows/Linux

Punto de Entrada

Descripción:

Punto de entrada utilizado en el monitor TOTVS Colaboración para manejar el array con las descripciones de las leyendas de los registros.

Ubicación:

Función Leyenda - Muestra una ventana con la leyenda del browse.

Eventos:

Después de montar el array con las leyendas estándar de la rutina.

Programa fuente:

COMXCOL.PRW

Función:

COMCOLLEG

Observación:

1) - Se debe utilizar en conjunto con el punto de entrada COMXACOR que tiene como objetivo agregar leyendas en la dialog Brwlegenda.

2)- Al abrir la pantalla (Browse) del Monitor del TOTVS Colaboración, se evaluará documento por documento para ver en que regla de leyenda se encaja el documento. El primero que se encuentre, la leyenda quedará con su color definido.

Ej.:

Leyenda[1,1] está con "EMISSAO = dDatabase" / Leyenda[1,2] está WHITE
Leyenda[2,1] está con "USER = 'admin'" / Leyenda[2,1] está PINK


Accediendo a la pantalla de liberación de documentos, donde la emisión del documento = ddatabase y con el usuario admin la
Leyenda quedará: WHITE, porque la primera condición (leyenda[1,1]) es verdadera


Accediendo a la pantalla de liberación de documentos, donde la emisión del documento = "01/01/2021" y con el usuario admin la
Leyenda quedará: PINK, porque la primera condición (leyenda[2,1]) es verdadera

Parámetros:

Nombre

Tipo

Descripción

Obligatorio

PARAMIXB

Array

Reglas de leyenda y colores estándar del monitor TOTVS Colaboración.

X

 Devolución:

Nombre

Tipo

Descripción

Obligatorio

aCoresNew

Array

Leyenda personalizadas para el monitor TOTVS Colaboración.

aCoresNew{"condición","color","leyenda"}

 X

 

Ejemplo:

#Include 'Protheus.ch'

User Function COMXLEG()
Local aCoresNew := Paramixb[1] //Personalización del cliente

//Agregando leyenda
aAdd(aCoresNew, { 'BR_MARROM', 'Prueba Inclusión Leyenda' })// Inclusión de leyendas personalizadas


//Modificando leyenda
aCoresNew[1,1] := 'BR_PINK'

Return (aCoresNew)