TMKENTCO - Filtrar Entidades no Relacionamento Contatos x Entidades

Este ponto de entrada permite filtrar as entidades antes de exibir a janela Relacionamento Contatos X Entidades.

#INCLUDE "PROTHEUS.CH"

User Function TMKENTCO()
Local lRet := .T.
Local cEnt := PARAMIXB[1]
Local cCodEnt := PARAMIXB[2]

MsgAlert("P.E TMKENTCO...")

If cEnt=='SA1' .AND. cCodEnt = '00000201'
lRet:= .F.
Endif

Return(lRet)

Português (Portugal)

Microsiga_Protheus11

Todos

Todas

PARAMIXB[1] -> Entidade(Ex. SA1)
PARAMIXB[2] -> Código da entidade

Se retorno = .T. --> a entidade será exibida na janela de relacionamento contatos x entidades

Se retorno = .F. --> a entidade não será exibida

TMKXFUN.PRW