Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

01. DATOS GENERALES

Línea de producto:

Microsiga Protheus®

Segmento:

Backoffice

Módulo:

Financiero

Idiomas

Portugués

Función:

FINA710 - Nuevo administrador financiero

Portal del cliente

02. DESCRIPCIÓN

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..

03. PARÁMETROS

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"

04. DEVOLUCIÓN

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.

05. EEMPLO DE UTILIZACIÓN

Bloco de código
languagevb
themeMidnight
firstline1
titleNGFBXBOL
linenumberstrue
#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