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 |