Linha Microsiga Protheus

Page tree

MA040VLD - Validações do Cadastro de Vendedores

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Faturamento

Rotina:

Rotina

Nome Técnico

MATA040

Cadastro de Vendedores

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Versão:12.1.17 e superior.

Ponto de Entrada

Descrição:

A finalidade do ponto de entrada MA040VLD é permitir ou não a inclusão, alteração ou exclusão de vendedores na rotina do Cadastro de Vendedores.

Localização:

Atualizações/Cadastros/Vendedores

Eventos:

MA040VLD( nOpc ) --> lRet

Programa Fonte:

MATA040.PRX

Parâmetros:

nOpc - Tipo Numérico - Número da opção selecionada, sendo: 3- Inclusão, 4- Alteração e 5- Exclusão

Retorno:

Nome

Tipo

Descrição

Obrigatório

lRet

Lógico

.T. - Permite a execução da operação

.F. - Não permite a execução da operação

Sim

Exemplo:

#Include 'Protheus.ch'

User Function MA040VLD()

Local _nOpc := PARAMIXB		//3- Inclusão, 4- Alteração e 5- Exclusão
Local _lRet	:= .T.
Local _cUsuario := RetCodUsr()

If _nOpc == 4 .And. _cUsuario == "000001"
	Alert("Usuário não pode efetuar alterações.")
	_lRet := .F.
ElseIf _nOpc == 5 .And. _cUsuario == "000002"
	Alert("Usuário não pode efetuar exclusão.")
	_lRet := .F.
EndIf

Return _lRet