Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas


01. DATOS GENERALES

Producto:

TOTVS Backoffice

Línea de producto:

Línea Protheus

Segmento:

Servicios

Módulo:

Contabilidad de gestión (SIGACTB)

Función:

CTBXATU (Genérico) - CHKCTBGRV

Ticket:

10537859

Requisito/Story/Issue:

DSERCTR1-30184


02. SITUACIÓN/REQUISITO

El punto de entrada CHKCTBGRV permite verificar si el control de grabación de sucursales al contabilizar se realizará por el comportamiento estándar o si tendrá regla diferente en el punto de entrada ANTCTBGRV.

Observación: Cabe recordar que el PE CHKCTBGRV solamente devolverá Verdadero, con lo cual se efectuará la regla en el PE ANTCTBGRV.

03. SOLUCIÓN

Se realizó la documentación del PE.


Importante


El ejemplo mostrado es meramente ilustrativo. La regla, el funcionamiento y los impactos generados por el punto de entrada en el sistema son de responsabilidad del cliente que lo utiliza.


04. OTRAS INFORMACIONES


Parámetros:

Parámetro

Tipo

Descripción

Obligatorio

PARAMIXB[1]

Lógico

Se controla por el PE o funcionamiento estándar

Sí


Devolución:

Devolución

Tipo

Descripción

Obligatorio

Lógico

Lógico

Verdadero o Falso

Sí



Ejemplo de utilización del punto de entrada 
#include "protheus.ch"
 
User Function CHKCTBGRV()

	Local lAntCtbGrv := PARAMIXB[1]
	Local lRet       := .F.

	If lAntCtbGrv 
    	lRet := .T.
	endIf

return lRet



Ejemplo de utilización del punto de entrada utilizado en conjunto - ANTCTBGRV / DEPCTBGRV 
#include "protheus.ch"
 
User Function ANTCTBGRV()

    cFilant :=  'D MG 01'

Return



User Function DEPCTBGRV()

         cFilant  :=  SE1->E1_FILIAL

Return



Ejemplo del manejo del PE por el sistema - Ejemplo 
If !( lChkCtbGrv .And. Execblock("CHKCTBGRV" , .F., .F. , {lAntCtbGrv} ) )  //Si se controla por el Punto de entrada, no entra en este trecho
        Regla estándar del sistema que se ignorará si se seleccionara la utilización del PE de acuerdo con los objetivos buscados.

Endif


05. ASUNTOS RELACIONADOS

  • No se aplica.