Histórico da Página

O ponto de entrada CRM240CTRL permite a inclusão, a alteração ou a exclusão dos privilégios dos registros das entidades por usuário do módulo de CRM (Customer Relationship Management), durante a no final da gravação da estrutura de negócio. Este ponto é chamado fora do bloco de transação.

#INCLUDE "PROTHEUS.CH"

User Function CRM240CTRL()

Local cEntidade cChave := PARAMIXB[1]""
Local cCodUsr aAutoAO4 := PARAMIXB[2]
Local cCodVend := PARAMIXB[3]
Local lRetorno := .T.

MsgAlert("Entidade: "+cEntidade+" Usuário: "+cCodUsr+chr(10)+" Vendedor: "+cCodVend)

{}

//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³Adiciona privilégios para entidade de Clientes - SA1 Registro: Cliente/Loja - 000001/01
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
cChave := "00000101"
aAutoAO4 := CRMA200PAut(3,"SA1",cChave,/*cCodUsr*/,/*aPermissoes*/,/*aNvlEstrut*/,/*cCodUsrCom*/,/*dDataVld*/)
CRMA200Auto(aAutoAO4[1],aAutoAO4[2],3)

Return NilReturn(lRetorno)

Português (Brasil)

Microsiga_Protheus12

Todos

Todas

cEntidade (Caractere) - Entidade que está sendo processada na estrutura de negócio.

cCodUsr (Caractere) - Usuário do CRM que está sendo processado na estrutura de negócio.

cCodVend (Caractere) - Vendedor relacionando ao usuário do CRM. Caso o mesmo usuário não seja vendedor, este parâmetro será vazio.

Nenhum

Nenhum

lRetorno (Lógico) - Verdadeiro para continuar a gravação da estrutura de negócio ou Falso para cancelar a gravação.

CRMA240.PRW