Histórico da Página

02. 

...

O ponto de entrada CTB102ESTL é utilizado para realizar a validação do estorno de lançamentos contábeis por lote. Ele oferece ao cliente a possibilidade de implementar regras específicas para garantir que o estorno em lote dos lançamentos seja realizado de forma controlada e em conformidade com as políticas contábeis da empresa.

Com o CTB102ESTL, é possível definir critérios personalizados para validar se os lançamentos contábeis estão aptos a serem estornados, assegurando a consistência dos registros e minimizando riscos de inconsistências no processo contábil.

...

DESCRIPTION

The entry point CTB102ESTL is used to perform the validation of the reversal of accounting entries by batch. It offers the customer the possibility to implement specific rules to ensure that the batch reversal of the entries is performed in a controlled manner and in compliance with the company's accounting policies.

With CTB102ESTL, it is possible to define custom criteria to validate whether the accounting entries are eligible for reversal, ensuring the consistency of the records and minimizing the risks of inconsistencies in the accounting process.

03. OTHER INFORMATION

lOk := ExecBlock("CTB102ESTL",.F.,.F.,{nOpc})

#INCLUDE "PROTHEUS.CH" 

User Function CTB102ESTL() 
	
	// nopc = 5 -> exclusaodeletion// nopc = 6 -> estornoreversal
	Local nOpc := ParamIXB[1] 
	Local lRet   := .T. 

	If nOpc == 5	
		If AvisoNotification("AtencaoAttention -", "ConfirmaConfirm exclusaodeletion deof lançamentoentries", {"SimYes","NaoNo"} )!= 1		
			lRet := .F.	
		EndIf
	ElseIf nOpc == 6	
		If AvisoNotification("AtencaoAttention -", "ConfirmaConfirm estornoreversal deof lançamentoentries", {"SimYes","NaoNo"} )!= 1		
			lRet := .F.	
		EndIf
	EndIf 
	
Return( lRet )

04. ASSUNTOS RELACIONADOS

04. RELATED SUBJECTS

• N/ANão se aplica.