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 NGFEMBOL permite descargar (download) de las boletas personalizadas por medio del Nuevo administrador financiero y Portal del cliente.

Este P.E. informa al cliente el registro de la tabla SEA (Títulos Enviados al Banco – Borderó) que está posicionado (RECNO). Se enviará igualmente la dirección y nombre de la boleta generada por nuestra aplicación si existe la boleta generada en el sistema, si la boleta no existe, la variable se enviará vacía.

Todos los archivos generados por nuestra aplicación se grabarán en la carpeta SPOOL (RootPath).

La generación de la boleta y servicio del envío de e-mail quedará bajo responsabilidad del cliente.

La devolución esperada por este P.E. debe ser lógico, siendo:

.T. (Verdadero) – Grabaremos en base para control que el envío del e-mail ocurrió con éxito.

.F. (Falso) – Grabaremos en base para control que hubo error en el envío del e-mail.

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 fuera .T. archivo generado por nuestra aplicación. Si fuera .F. Archivo no generado y variable nombre del archivo estará vacía.

PARAMIXB[2]

Carácter

Archivo generado "\spool\NOMEDOARQUIVO.pdf"

04. DEVOLUCIÓN

lRet – L

Lógico

.T. (Verdadero) – Grabaremos en base para control que el envío del e-mail ocurrió con éxito.

.F. (Falso) – Grabaremos en base para control que hubo error en el envío del e-maill.

05. EJEMPLO DE UTILIZACIÓN

NGFEMBOL
#INCLUDE "Totvs.ch"

/*/{Protheus.doc} NGFEMBOL
Permite el envío de e-mail de los títulos personalizados por medio del Nuevo administrador financiero y Portal del cliente.

@owner      TOTVS
@version    P12
@since      09/06/2022
/*/

User Function NGFEMBOL()   

	Local aAreaSEA  As Array
	Local lRet		As Logical
	Local nRecSEA 	As Numeric
	Local lArqGer	As Logical
	Local cNomeArq	As Character

	aAreaSEA	:= GetArea('SEA')
	lRet		:= .T.
	nRecSEA 	:= PARAMIXB[1][1][1] // RECNO de la tabla SEA
	lArqGer		:= PARAMIXB[1][1][2] // Si fuera .T. archivo generado por nuestra aplicación. Si fuera .F. Variable nombre del archivo estará vacía.
	cNomeArq	:= PARAMIXB[2]       // Archivo generado "\spool\NOMEDOARQUIVO.pdf"   

	DbSelectArea("SEA")
	SEA->(DbGoTo(nRecSEA))

	If !lArqGer
		cNomeArq := "Personalizado por el cliente"
	Endif

	// Proceso de envío y/o generación del archivo - Lógica de acuerdo con la necesidad del cliente

	// ...
	// lRet := .F.
	// ou 
	// lRet := .T.
	// ....

	RestArea(aAreaSEA)

Return lRet