Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 2 minutos

01. DATOS GENERALES

Producto:

TOTVS Backoffice

Línea de producto:

Línea Protheus

Segmento:

Tecnología

Módulo:

TOTVS Backoffice (Línea Protheus) - Contabilidad de gestión (SIGACTB)

Función:

CTBA105

País:

Brasil

Ticket:

Interno

Requisito/Story/Issue

DSERCTR1-46829

02. DESCRIPCIÓN


El punto de entrada CT105VLENT permite la validación de los entes contables en el momento de la grabación del asiento contable, aplicable a las rutinas CTBA102 y CTBA105.

03. OTRAS INFORMACIONES


Manejo de PE en el sistema 
lRet := ExecBlock("CT105VLENT",.F.,.F.,{cDC,cDebito,cCredito, cContCCD,cContCCC, cItemD,cItemC, cCLVLD,cCLVLC,cEnt05Db,cEnt05Cr,cEnt07Db,cEnt07Cr,cEnt08Db,cEnt08Cr,cEnt09Db,cEnt09Cr})
Ejemplo de PE
User Function  CT105VLENT()

	Local lRet	    := .T.
	Local cTipo	    := Paramixb[1] // Tipo de asiento contable 1-> Débito, 2-> Crédito, 3-> Partida doble
	Local cDebito	:= Paramixb[2] // Cuenta Débito
	Local cCredito	:= Paramixb[3] // Cuenta Crédito
	Local cCustoDeb	:= Paramixb[4] // C.Costo Débito
	Local cCustoCrd	:= Paramixb[5] // C.Costo Crédito
	Local cItemDeb	:= Paramixb[6] // Ítem contable Débito
	Local cItemCrd	:= Paramixb[7] // Ítem contable Crédito
	Local cCLVLDeb	:= Paramixb[8] // Cl Valor Débito
	Local cCLVLCrd	:= Paramixb[9] // Cl Valor Crédito

	If cDebito == cCredito // ejemplo de condición que puede realizarse para validación de los entes	
		lRet := .F.
		// si lRet = .F.  el sistema emite el mensaje informando que los            
		// entes no pueden ser iguales y anula la operación
   EndIf

Return lRet


Importante

  • Se observa que la utilización del PE y sus impactos en el sistema son de responsabilidad del cliente.
  • Los ejemplos utilizados en esta documentación solamente son para fines de demostración, cada cliente debe verificar qué comportamiento desea realizar de acuerdo con el alcance del punto de entrada.

04. ASUNTOS RELACIONADOS

  • No se aplica.