Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Serviços

Módulo:Contabilidade Gerencial (SIGACTB)
Função:CTBA105 - ANTCTBGRV 
Ticket:Interno
Requisito/Story/Issue:DSERCTR1-36032

02. SITUAÇÃO/REQUISITO

O ponto de entrada ANTCTBGRV é utilizado antes da gravação dos saldos e lançamentos contábeis.


03. SOLUÇÃO

Objetivo desse documento é esclarecer sobre os parâmetros e o funcionamento do PE ANTCTBGRV.

Obsevações


Vale ressaltar que o ponto de entrada não tem uma definição especifica de uso, mas o intuito é utilizar os parâmetros passados pelo Ponto de entrada da forma desejada.

Esse ponto de entrada também pode ser utilizado em conjunto com os PE's DEPCTBGRV e CHKCTBGRV para além de utilizar as informações dispostas pelo ponto de entrada, se pertinente ao cenário desejado manipular a gravação da filial.


Documentação de referencia → DT CHKCTBGRV Se controla gravação de Filiais na contabilização BRA

Importante !


O exemplo demonstrado é meramente ilustrativo. A regra, o funcionamento e os impactos gerados pelo ponto de entrada no sistema são de responsabilidade do cliente que o utiliza.



04. DEMAIS INFORMAÇÕES


Parâmetros:

Parâmetro / Descritivo

Tipo

Descrição

Obrigatório

PARAMIXB[1] - nOpcxLógico

Opção da rotina ao passar pelo PE(Exemplo inclusão(3), alteração(4))

Sim
PARAMIXB[2] - dDataLancDataData do lançamentoSim
PARAMIXB[3] - cLoteCaractereNúmero do LoteSim
PARAMIXB[4] - cSubLoteCaractereNúmero do subLoteSim
PARAIMXB[5] - cDocCaractereNúmero do documento.Sim


Retorno:

Retorno

Tipo

Descrição

Obrigatório

Não se aplica.Não se aplica.Não se aplica.Não se aplica.



Manipulação do PE no Sistema 
#include "protheus.ch"   

STATIC lAntCtbGrv	:= ExistBlock("ANTCTBGRV")

If lAntCtbGrv
	ExecBlock("ANTCTBGRV",.F.,.F.,{ nOpcx,dDataLanc,cLote,cSubLote,cDoc} )
Endif
  



Exemplo de utilização do Ponto de Entrada 
#include "protheus.ch"
 
User Function ANTCTBGRV()
 	
	nOpcx 		:= PARAMIXB[1]
 	dDataLanc	:= PARAMIXB[2]
 	cLote		:= PARAMIXB[3]
 	cSubLote	:= PARAMIXB[4]
	cDoc		:= PARAMIXB[5]

    If nOpcx == 3
		funcao_salvalote(cLote,cSubLote,cDoc,dDataLanc)
	Endif 

Return



05. ASSUNTOS RELACIONADOS