Linha Microsiga Protheus

Árvore de páginas

P200BLQOP - Bloqueia a operação no cadastro de estrutura

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):

NomeTipoDescriçãoDefaultObrigatórioReferência
PARAMIXB[1]Numérico

Indica a operação selecionada:

2 - Visualizar

3 - Incluir

4 - Alterar

5 - Excluir




Idiomas:

Todos

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:
O ponto de entrada P200BLQOP é executado ao selecionar uma das operações: Visualizar, Incluir, Alterar ou Excluir.
Localização:

Function PCPA200MNU - Função que trata e executa a view do PCPA200.

Eventos:

Ao selecionar uma das operações no PCPA200: Visualização, Inclusão, Alteração ou Exclusão.

Programa Fonte:PCPA200.PRW

Sintaxe:

P200BLQOP ( [ nOperacao ] ) --> lRet

Retorno:

lRet - Indica se a operação pode ser acessada ou não. Retorno obrigatório do tipo Lógico. 

Observações:


Exemplo
#INCLUDE "TOTVS.CH"

User Function P200BLQOP()
	Local nOperacao := PARAMIXB[1]
	Local lRet      := .T.
	/*
		nOperacao == 2 (Visualizar)
		nOperacao == 3 (Incluir)
		nOperacao == 4 (Alterar)
		nOperacao == 5 (Excluir)
	*/
	If nOperacao == 5
		Help( ,  , "Help", , "Não é permitido excluir estruturas.", 1, 0, , , , , , {"Execute outra operação."})
		lRet := .F.
	EndIf

Return lRet
  • Sem rótulos