Histórico da Página

Exemplo demonstrado acima meramente ilustrativo.

Indíce

Image Added

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 tip Image Added title Image Added	Exemplo meramente ilustrativo

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

Image Removed

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

Função EXEMP030.PRW, veja abaixo que estou indicando a tabela Z30 e Ponto de Lançamento : 900000

Image Removed

Customizado : 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