Histórico da Página
CONTEÚDO
- Visão Geral
- Exemplo de utilização
- Tela XXX
- Outras Ações / Ações relacionadas
- Outras Ações / Ações relacionadas
- Tela XXX
- Principais Campos e Parâmetros
- Principais Campos e Parâmetros
- Tabelas utilizadas
01. VISÃO GERAL
A função PcoVldLan tem como finalidade validar se o lançamento de origem tem verba orçamentária disponível, efetuando um pseudo-lançamento na movimentação orçamentária e conforme parametrização, no tipo de bloqueio, compara os valores orçados ou previstos com os realizados efetivamente, e sendo o valor orçado maior ou igual ao do realizado, libera o lançamento, caso contrário bloqueia.
...
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
Function F050PcoLan()
Local lRet := .T.//se nao bloquear grava os lançamentos com a chamada a funcao PcoDetLan
If !PcoVldLan("000002",IIF(M->E2_TIPO$MVPAGANT,"02","01"),"FINA050")
lRet := .F.
//===========================================================
//Grava os lancamentos nas contas orcamentarias SIGAPCO
//===========================================================
If SE2->E2_TIPO $ MVPAGANT
PcoDetLan("000002","02","FINA050")
Else
PcoDetLan("000002","01","FINA050")
EndIf
Endif
Return lRet |
03. PARÂMETROS
| Nome | Tipo | Descrição | Default | Obrigatório |
| cProcesso | Caracter | Código do Processo de Lançamento de Bloqueio do PCO | X | |
| cItem | Caracter | Item do Processo de Lançamento do Bloqueio do PCO | X | |
| cPrograma | Caracter | Programa Origem do Lançamento de Bloqueio | X | |
| lUsaLote | Lógico | Indica se utilizou numero de lote na Ggeraçao do lançamento | ||
| lDeleta | Lógico | Indica se é Exclusão do Lançamento de Bloqueio do PCO | ||
| lVldLinGrade | Lógico | Indica se a Validação é por Grade |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas