Línea de producto: | Microsiga Protheus® |
|---|---|
Segmento: | Backoffice |
Módulo: | Financiero |
Función: | FINR480 – Impresión de cheques |
El punto de entrada FA480BENE permite modificar el nombre del beneficiario en la impresión del cheque y en el SEF.
No se aplica.
Tipo | Descripción |
|---|---|
Carácter | Nombre del beneficiario para impresión. |
#INCLUDE "TOTVS.CH"
User Function FA480BENE() as character
Local aPEArea := GetArea() as array
Local aPEAreaSA2 := SA2->(GetArea()) as array
Local cPEBenef := '' as character
DBSelectArea('SA2')
DBSetOrder(1)
If DBSeek( xFilial("SA2") + SEF->EF_FORNECE + SEF->EF_LOJA )
cBenef := SA2->A2_NOME
EndIf
RestArea(aPEAreaSA2)
RestArea(aPEArea)
Return cPEBenef