Histórico da Página
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): |
| ||||||||||||
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: |
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#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
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas