Funções específicas (PCOA030 - SIGAPCO)

Quando o cliente necessitar ou tiver, por exemplo, uma rotina de gravação de títulos a pagar específica, e esta rotina precisa alimentar os saldos do sistema Planejamento e Controle Orçamentário (PCO), este processo deverá ser cadastrado e configurado nos processos do PCO. Porém o programa específico também deverá estar preparado com as funções de integração com os lançamentos do PCO.

Estas funções executam a chamada da gravação dos lançamentos permitindo assim que o cliente faça integrações de rotinas específicas do controle orçamentário.

A seguir temos a sintaxe das funções:

1. PcoIniLan ([Código do Processo])

Função responsável pela inicialização da gravação dos lançamentos do orçamento. Deverá sempre ser chamada antes da gravação do processo e antes da Transação (Begin Transaction).

2. PcoDetLan ([Código do Processo], [Item do Processo], [Nome do Programa], [Exclusão])

Função responsável pela chamada do ponto de lançamento durante a gravação. Esta função executa a macro execução do ponto de lançamento no registro de origem, gerando assim o lançamento do controle orçamentário. Tratando-se de exclusão, o parâmetro |Exclusão deverá ser preenchido como .T. e a função deverá ser chamada antes da exclusão (dbDelete()) do registro origem.

3. PcoFinLan ([Código do Processo])

Função responsável pela finalização da gravação dos lançamentos do orçamento. Deverá sempre ser chamada após a gravação do processo e após a Transação (End Transaction).

Exemplo de utilização das funções (MATA110 - Solicitação de Compras):

//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿

//³ Inicializa a gravacao dos lancamentos do SIGAPCO ³

//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

PcoIniLan("000051")

Begin Transaction

…

…

End Transaction

//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿

//³ Finaliza a gravacao dos lancamentos do SIGAPCO ³

//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

PcoFinLan("000051")

Após a gravação do Item na alteração ou inclusão :

//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿

//³ Grava os lancamentos nas contas orcamentarias SIGAPCO ³

//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

PcoDetLan("000051","01","MATA110")