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:

Servicios

Módulo:

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

Función:

CTBA102

País:

Brasil

Ticket:

Interno

Requisito/Story/Issue

DSERCTR1-46829

02. DESCRIPCIÓN

Punto de entrada utilizado después de la grabación de los datos de la tabla de registro.

En el siguiente ejemplo, el punto de entrada DPCTB102GR se utiliza para aplicar una validación/ajuste adicional después de la grabación de un asiento contable. Si la operación fuera de reversión (indicada por el parámetro nOpc == 6), el punto de entrada puede ajustar un campo específico del registro recién grabado, de acuerdo con una lógica de negocios definida por el usuario.

03. OTRAS INFORMACIONES


Manejo de PE en el sistema 
If nOpc == 6
	ExecBlock("DPCTB102GR",.F.,.F.,{ nOpc,dDataEst,cLoteEst,cSubLtEst,cDocEst } )
Else
	ExecBlock("DPCTB102GR",.F.,.F.,{ nOpc,dDataAux,cLoteAux,cSubLtAux,cDocAux } )											
EndIf
Ejemplo de PE
User Function DPCTB102GR()

	Local nOpc      := PARAMIXB[1] 
	Local dDataEst  := PARAMIXB[2] 
	Local cLoteEst  := PARAMIXB[3] 
	Local cSubLtEst := PARAMIXB[4]  
	Local cDocEst   := PARAMIXB[5] 

    // Verifica si la operación es de reversión
    If nOpc == 6
        // Define una lógica para ajuste de campo después de la reversión
        DbSelectArea("CT2")
        DbSetOrder(1)
        
        If MsSeek(xFilial("CT2") + DTOS(dDataEst) + cLoteEst + cSubLtEst + cDocEst)
			//VALIDACIÓN DEL CLIENTE
        EndIf
    EndIf

Return

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.