CONTEÚDO
01. DADOS GERAIS
Linha de Produto: | Microsiga Protheus® |
---|
Segmento: | Backoffice |
---|
Módulo: | Planejamento e Controle Orçamentário |
---|
Rotina: | PCOA530 - Contingências
|
---|
02. DESCRIÇÃO
Ponto de Entrada para validar a inclusão de contingências duplicadas.
Para o Ponto de Entrada ser acionado é necessário ter uma chave cadastrada no campo AKA_CHVCTG da tabela AKA.
O Ponto de Entrada é acionado após algumas validações padrão do sistema, assim é utilizado para criar validações adicionais.
03. VARIÁVEIS
Nome | Tipo | Descrição |
Paramixb[1] | Caracter | Chave da contingência a ser incluída. (Macro execução do campo "AKA_CHVCTG"). |
04. RETORNO
Nome | Tipo | Descrição |
lRet | Lógico | Retorna se a contingência for incluída (.T.) ou não(.F.) |
05. EXEMPLO DE UTILIZAÇÃO
lContinua := ExecBlock("PCOA5306",.F.,.F.,{ cChave } )
If Valtype(lContinua)<>"L"
lContinua := .F.
EndIf
User Function PCOA5306()
cChaveALI := Paramixb[1]
Alert("PCOA5306")
// Regra de Validação do Cliente
Return .T. //Libera a inclusao da contigencia