Como Mudar a cor na Grid Registros bloqueados no Totvs Protheus?

Ponto-de-Entrada-MBlkColor-Protheus

Vamos ver como mudar a cor na Grid registros bloqueados no ERP Totvs Protheus (campo MSBLQL), tanto para Clientes, Fornecedores, Produtos entre outros registros bloqueados do Protheus, inclusive para registros da SXB (consultas padrão).

Cor no Padrão:

No Padrão do sistema Protheus essas linhas na Grid são apresentadas na cor Cinza com letra na cor branco conforme o seu tema, mas através desse Ponto de Entrada (PE) MBlkColor, é possível alterar a cor.
Confome podemos ver no vídeo apresentado abaixo.

Academia Protheus
Sua academia para uma carreira de sucesso!

Ref. Links do TDN:

https://tdn.totvs.com/display/public/framework/Campo+Reservado+_MSBLQD+e+_MSBLQL
https://tdn.totvs.com/display/public/framework/MBlkColor+-+Retorna+cores+a+utilizar

#Include "Protheus.ch"
 
#Define CLR_RGB_PRETO    	RGB(000,000,000)	//Cor Preto
#Define CLR_RGB_BRANCO  	RGB(254,254,254)	//Cor Branco
#Define CLR_RGB_VERMELHO  	RGB(255,000,000)	//Cor Vermelho
 
/*-------------------------------------------------------------------------------------------*
	{Protheus.doc} User Function MBlkColor
    ()   
    @type: 		User Function
    @author: 	Jose Moura
    @site: 		https://academiaprotheus.com.br
    @desc.: 	Altera a cor da linha bloqueada

 *-------------------------------------------------------------------------------------------*/

User Function MBlkColor()
	Local aRet := {} 
	 
	//Ajustando o array aRet com as cores
	aAdd(aRet, CLR_RGB_VERMELHO) 
	aAdd(aRet, CLR_RGB_BRANCO) 
 
Return aRet

Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *