Cross Segmentos - TOTVS BackOffice (Línea Protheus) MI - Financiero (SIGAFIN) - Punto de Entrada FORMPRE de TOTVS Recibo para model FJT_MASTER y SETVALUE

Tiempo aproximado para lectura: 1:00 min

Duda
¿Cómo validar el Punto de Entrada FORMPRE del TOTVS Recibo para el model FJT_MASTER y la acción SETVALUE?

Ambiente
Cross Segmentos - TOTVS BackOffice (Línea Protheus) - MI - Financiero (SIGAFIN) - A partir de versión 12.1.2210

Solución
Para validar el Punto de Entrada FORMPRE del TOTVS Recibo con el model FJT_MASTER y la acción SETVALUE, se muestra un ejemplo con el campo FJT_SERIE para devolver falso cuando se informe cualquier valor en el campo:

#include "Protheus.ch"
#include "FWMVCDEF.CH"

User Function FINA887()

   Local aParam := PARAMIXB
   Local oModel := aParam[1]
   Local cIdPonto := ""
   Local cIdModel := ""
   Local lRet := .T.

   If aParam <> NIL
      oModel := aParam[1]
      cIdPonto := aParam[2]
      If cIdPonto == 'FORMPRE'
         cIdModel := aParam[3]
         cAccion := aParam[4]
         cIdCamp := aParam[5]
         IF cIdModel == 'FJT_MASTER' .AND. cAccion == 'SETVALUE' .AND. cIdCamp == 'FJT_SERIE'
            lRet := .F.
         ENDIF
      EndIf
   EndIf

Return lRet

Conozca más
Para adquirir más conocimiento, acceda al siguiente enlace:
TDN: Puntos de Entrada MVC - Financiero