Línea de producto: | Microsiga Protheus® |
Segmento: | Backoffice |
Módulo: | Financiero |
Idiomas | Portugués |
Función: | FINA710 - Nuevo administrador financiero Portal del cliente |
El punto de entrada NGFBXBOL permite descargar (download) de las boletas personalizadas a través del Nuevo Administrador Financiero y Portal del cliente.
...
Todas las tablas que se utilicen por este P.E. Deben tener su área grabada y restaurada al final de la ejecución..
Nombre | Tipo | Descripción |
PARAMIXB[1][1][1] | Numérico | RECNO de la tabla SEA |
PARAMIXB[1][1][2] | Lógico | Si .T. archivo generado por nuestra aplicación. Si .F. Archivo no generado y variable nombre estará compuesto por la clave del título (Prefijo + Número + Cuota + Tipo). |
PARAMIXB[2] | Carácter | Archivo generado "\spool\NOMEDOARQUIVO.pdf" |
PARAMIXB[3] | Carácter | Nombre del archivo generado por nuestra aplicación o clave del título "Prefijo + Número + Cuota + Tipo.pdf" |
aArray – Array
cNomeArq := "\spool\NOMEDOARQUIVO.PDF" - Camino y nombre del archivo que se dará de baja.
cNomeBx := "NOMEDOARQUIVO.PDF" - Nombre para el archivo personalizado por el cliente.
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#INCLUDE "Totvs.ch"
/*/{Protheus.doc} NGFBXBOL
Permite descargar (download) de la boleta en PDF de las boletas personalizadas a través del Nuevo Administrador Financiero y Portal del cliente.
@owner TOTVS
@version P12
@since 09/06/2022
/*/
User Function NGFBXBOL()
Local aAreaSEA As Array
Local aRet As Array
Local nRecSEA As Numeric
Local lArqGer As Logical
Local cNomeArq As Character
Local cNomeBx As Character
aAreaSEA := GetArea('SEA')
aRet := {}
nRecSEA := PARAMIXB[1][1][1] // RECNO de la tabla SEA
lArqGer := PARAMIXB[1][1][2] // Si .T. archivo generado por nuestra aplicación. Si .F. Variable nombre del archivo estará vacía.
cNomeArq := PARAMIXB[2] // Archivo generado "\spool\NOMEDOARQUIVO.pdf"
cNomeBx := PARAMIXB[3] // Clave del título (Prefijo + Número + Cuota + Tipo.pdf" DbSelectArea("SEA")
SEA->(DbGoTo(nRecSEA))
If !lArqGer
cNomeArq := "Personalizado por el cliente"
Endif
// Proceso de descarga (download) del archivo - Lógica según la necesidad del cliente
// ...
// cNomeArq := "\spool\NOMEDOARQUIVO.PDF" - Camino y nombre del archivo que se dará de baja.
// cNomeBx := "NOMEDOARQUIVO" - Nombre para el archivo personalizado por el cliente.
// ....
Aadd(aRet, {cNomeArq, cNomeBx} )
RestArea(aAreaSEA)
Return aRet
|