Histórico da Página

Produto:

Microsiga Protheus

Versões:

12

Ocorrência:

Exemplo de Utilização de Ponto de lançamento customizado: Lançamentos por processo customizado por usuário

Passo a passo:

Criando a Tabela criada via configurador tabela customizada EX: Z30

Dica
Observe acima que a legenda é vermelha (aguardando liberação do usuário)

Indíce

Image Added

Dica
Inserir dados na tabela criada EX: Z30 (Verificar os cadastros de : Contas Orçamentárias, Centro de Custo, Tipo de Saldo em suas respectivas rotinas e o Parâmetro MV_PCOINTE = 1)

Image Added

PCOA050 → Atualizações → Movimentos → Lançamentos (sem movimentos)

Image Added

Compilar a Função EXEMP030.PRW no repositório Função EXEMP030.PRW, veja abaixo que estou indicando a tabela Z30 e Ponto de Lançamento : 900000Image RemovedCustomizado : 900030

Image Added

#INCLUDE "PROTHEUS.CH"

User Function Exemp030()
dbSelectArea("Z30")
dbSetOrder(1)
dbGotop()
PcoInilan("900030")
While !Eof()
PcoDetLan("900030","01")
dbSkip()
EndDo
PcoFinLan("900030")
dbCloseArea()
Return