Home

Linha Microsiga Protheus

Páginas filhas
  • PCOFINLAN - Finalização de MovimentosLançamentos -- 12504

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
PCOFINLAN - Finalização de MovimentosLançamentos
PCOFINLAN - Finalização de MovimentosLançamentos

Função: PCOFINLAN - Finalização de Movimentos/Lançamentos
Versões: Microsiga Protheus 8.11 , Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todas TotvsDbAccess
Nível de Acesso: Nível 1 (Acesso Clientes)
Idiomas: Espanhol , Inglês
Descrição:

A função PcoFinLan serve para finalizar uma transação de um processo que gera movimentos/lançamentos no módulo SIGAPCO e é de caráter obrigatorio. Esta função é responsável por destruir as instâncias de variáveis efetuadas pela funcão PcoIniLan(...) e chamar a rotina de alteração dos lançamentos (PCOA050) para validar os mesmos e atualizar os saldos de cubos.

Programa Fonte:
PCOXFUN.PRW
Sintaxe:

PCOFINLAN - Finalização de Movimentos/Lançamentos ( cProcesso [ lForceVis ] [ lProc ] [ lDelBlq ] )

Retorno:
    ()
Observações

Todos os processos a ser escriturado nos movimentos/lançamentos no SIGAPCO necessitam da chamada à função  PcoFinlan(...) após a gravação origem do processo envolvido,  para validação e atualização dos saldos efetuados na funcão PcoA050(...).

Em processos que estejam utilizando bloqueio passar o parâmetro lógico .T. ("lDelBlq") que verificará se existem lançamentos de bloqueios inválidos pendentes, que se não estiverem em uso serão excluidos.

Os processos padrões contemplados e seus respectivos códigos podem ser consultados e visualizados no cadastro de processos no módulo SIGAPCO em Atualizações > Lançamentos > Por Processo.

Os processos definidos por usuário devem iniciar o código com "9", isto é, codigo deve ser igual ou superior a 900000.

A chamada da PcoFinLan(...) deve estar imediatamente posterior à rotina de gravação origem do processo envolvido, normalmente após fechamento da janela de diálogo e é de caráter obrigatório.. Estas 2 funções (PcoIniLan/PcoFinLan) devem ser chamadas externas às instruções Begin Transaction ...........End Transaction, uma vez que a chamada a PcoIniLan(...) faz chamadas a instruções de abertura de arquivos.

Exemplos
 //--------------------------------------------------------------//Inicializa a gravacao dos lancamentos do SIGAPCO         PcoIniLan("000002")         //PROCESSO "000002 = CONTAS A PAGAR"//--------------------------------------------------------------//JANELA DE DIALOGO OU CHAMADA A ROTINA AUTOMATICAIf ( lF050Auto )	RegToMemory("SE2",.T.,.F.)	If EnchAuto(cAlias,aAutoCab,cTudoOk,nOpc)			nOpca := AxIncluiAuto(cAlias,cTudoOk,"FA050AXINC('"+cAlias+"')" )	EndIfElseIf lPodeInc	nOpca := AxInclui(cAlias,nReg,nOpc,, "FA050INIS", ,cTudoOk,,                                                            "FA050AXINC('"+cAlias+"')",aBut050,aParam)Endif//--------------------------------------------------------------//Finaliza a gravacao dos lancamentos do SIGAPCO            PcoFinLan("000002") 
Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
cProcessoCaracterCódigo do Processao de Lançamento no PCOX
lForceVisLógicoIndica se Força a Visualização do Lançamento.F.
lProcLógicoIndica se Exibe Barra de Processamento.F.
lDelBlqLógicoIndica se Verificara Lançamentos Originário de Bloqueio.F.