Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • PL660VAR - Manutenção de Sub-Contratos

Ponto-de-Entrada: PL660VAR - Manutenção de Sub-Contratos
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Descrição: 
O ponto de entrada PL660VAR foi criado para que o usuário possa implementar customizações na tela de manutenção de sub-contratos antes que ela seja apresentada.O usuário poderá desabilitar determinadas opções do menu como Incluir, Alterar ou Excluir de acordo com as regras que ele implementar no ponto de entrada.
Programa Fonte 
PLSA660B.PRW
Sintaxe

PL660VAR - Manutenção de Sub-Contratos ( [ nOpc ] ) --> lRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
nOpc Numérico Opção do menu que está sendo chamada2 - Visualizar;3 - Incluir;4 - Alterar;5 - Excluir;6 - Nova Versão;7 - (des)bloq.sub-ct
Retorno
    lRet(logico)
  • Retorno lógico do ponto de entrada. Se .F. não abrirá a tela se .T. abrirá a tela de manutenção do sub-contrato.
Observações

O ponto de entrada PL660VAR será chamado quando o usuário utilizar as opções do menu Incluir, Alterar, Excluir, Nova Versão, Visualizar e (des)bloq.sub-ct.

Exemplos 
#Include "Protheus.ch"User Function PL660VAR()Local nOpc := paramixb[1]Local lRet := .F.Do Case	Case nOpc == 3 .Or. nOpc == 5		lRet := .F.	oTherWise		lRet := .T.EndCaseReturn lRet
Variáveis
Nome Tipo Escopo Pode Alterar descrição
Array of Record Global Não