PCOA050 - Processos de Contabilização Orçamentária -- 12501

A função PCOA050 apresenta os lançamentos efetuados no Sistema, sejam eles incluídos manualmente ou gerados automaticamente, originados pelos processos de contabilização orçamentária. Esta documentação detalha a  forma automatica de manutenção do lançamento assim como os parâmetros envolvidos nesta operação.

PCOA050.PRW

PCOA050 - Processos de Contabilização Orçamentária ( [ nCallOpcx ] [ lAuto ] [ aRecnos ] [ lProc ] [ lLockBlq ] ) --> lRet

lRet(logico)
• Retorna .T. em caso Sucesso na Manutenção do Lançamento

Rotina de manutenção dos lançamentos que pode ser utilizada de forma manual ou chamada por rotinas de contabilização orçamentária.

No caso de rotinas de contabilização orçamentária a chamada desta rotina ocorre na funcão PcoFinLan(...) na finalização da transação orçamentária ou pela chamada da rotina PcoVldLan(...) que se refere a bloqueios, sendo responsável pela validação dos lançamentos gerados pela função PcoDetLan(....) ou pela função PcoVldLan(...) e atualização dos saldos de cubos. Os parâmetros recebidos por esta função quando chamada pela PcoFinLan(...) são os seguintes:

nCallOpcx - 4 (quatro) por se tratar de uma alteração no movimento orçamentário

lAuto - .T. quando de forma automática, limitado à operação de alteração (4) ou estorno (6)

Neste caso não será exibida a tela de dialogo para manutenção dos lançamentos, sendo apenas carregados o conteúdo do conjunto de registros ou todos do lote posicionado na enchoice e nas linhas do acols, e entra diretamente na rotina de gravação.

aRecnos - Array contendo conjunto de registros em alteração (os envolvidos na transação), se não fornecido este conjunto, a rotina carrega todos os do lote posicionado no momento da chamada da rotina.

lProc - .T. para exibir barra de progresso do processamento na carga dos itens

lLockBlq - .T. somente quando é chamado pela rotina PcoVldLan(...)

A rotina de gravação dos lançamentos atualiza o estado do lançamento para "Aprovado" (anteriormente o estado foi colocado como "Invalido" pela rotina PcoDetLan) e atualiza os saldos dos cubos.

Para inclusão de lançamentos em processos definidos por usuarios deve ser utilizado preferencialmente as funções PcoIniLan(...), PcoDetLan(...) e PcoFinLan(...) que já chama de forma automática a função PcoA050(...).

O estorno de lançamento é similar à alteração somente mudando o parâmetro nCallOpcx para 6 (seis) e o resultado final da operação se resume em mudar o estado para "Estornado" e os saldos do cubo são decrementados dos valores do lançamento.