Histórico da Página
...
A finalidade desta função é 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 previsto com os realizados efetivamente, e sendo seno o valor orçado maior ou igual ao do realizado, libera o lançamento, caso contrário bloqueia.
No cadastro de Bloqueios por Processo as regras (expressões ADVPL) para geração do pseudo-lançamento devem fazer referência às variáveis de memória no caso de interface do tipo enchoice ou conteúdo de acols quando interface do tipo grade, pois o lançamento de origem na maioria dos caso ainda não existem, isto é, não foram gravados ainda no banco de dados.
...
| 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.
...
Outras Ações / Ações relacionadas
...
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 |
04. TELA XXXXX
Principais Campos e Parâmetros
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas