Línea de producto: | Microsiga Protheus® |
|---|---|
Segmento: | Backoffice |
Módulo: | Financiero |
Función: | FINA240 – Borderó de pagos FINA241 - Borderó con impuestos |
El punto de entrada F240TBOR permite detectar el cambio del portador del título (E2_PORTADO x Portador del borderó).
Nombre | Tipo | Descripción |
|---|---|---|
PARAMIXB[1] | Carácter | Portador del título (E2_PORTADO). |
PARAMIXB[2] | Carácter | Portador informado en la pantalla del borderó. |
No se aplica.
#INCLUDE "TOTVS.CH"
User Function F240TBOR()
Local cAntPort := ParamIXB[1] as character
Local cNovoPort := ParamIXB[2] as character
If cAntPort <> cNovoPort
FWAlertInfo("De: Cambio de portador. " + AllTrim(cAntPort) + " A: " + AllTrim(cNovoPort) ,"Punto de entrada F240TBOR")
Else
FWAlertInfo("Portador não alterado" ,"Punto de entrada F240TBOR")
EndIf
Return nil