01. DATOS GENERALES

Línea de producto:Microsiga Protheus®
Segmento:Backoffice
Módulo:Financiero
IdiomasPortugués
Función:

FINA710 - Nuevo administrador financiero

02. DESCRIPCIÓN

El punto de entrada NGFQRF79, se activará en la pantalla de Log Devolución (Bajas) en el NGF (FINA710) tanto para Cuentas por cobrar como para Cuentas por pagar.

Este punto de entrada permite agregar un filtro personalizado de la tabla F79 para la interfaz de Log Devolución (Bajas) del Nuevo administrador financiero (FINA710).


03. PARÁMETROS

Nombre

Tipo

Descripción

PARAMIXB[1]

Carácter

Si fuera "R" -> Llamado del Log Devolución Bajas Cuentas por cobrar; "P" -> Llamado del Cuentas por pagar

PARAMIXB[2]

Array

Lista de sucursales seleccionadas en la opción Selección de susursales del Administrador financiero. Obs: Para sucursal conectada utilizar cFilAnt.


04. DEVOLUCIÓN

cFiltro – Carácter - Condición adicional para la query


05. EJEMPLO DE UTILIZACIÓN

NGFQRF79
#INCLUDE "TOTVS.CH"
#INCLUDE "PROTHEUS.CH"

/*/{Protheus.doc} NGFQRF79
    Permite agregar un filtro personalizado de la tabla F79 a la interfaz de Log Devolución (Bajas) del Administrador financiero (FINA710).
    @type  Function
    @author totvs
    @since 01/11/2024
    @version 1.0
    @param param_name, param_type, param_descr
    @return cFiltro, Character, String que representa el filtro personalizado
/*/

User Function NGFQRF79()

    Local cRecPag           := PARAMIXB[1]      // Se "R" -> Llamado del Log Devolución Bajas Cuentas por cobrar; "P" -> Llamado del Cuentas por pagar
    Local aFiliais          := PARAMIXB[2]      // Lista de sucursales seleccionadas en la opción Selección de sucursales del Administrador financiero. Obs: Para la sucursal conectada utilice cFilAnt.
    Local cFiltro           := ''

    If cRecPag == 'R'
		//Ejemplo de filtro directo en la F79   
        cFiltro := " F79_BANCO = '001' AND F79_AGENCI = '001' "

		//Ejemplo de filtro relacionado con la tabla de registro de los bancos (SA6)
	 	cFiltro := " 0 < (SELECT COUNT(SA6.A6_COD) FROM SA6T10 SA6 WHERE SA6.A6_FILIAL = '" + xFilial('SA6') + "' AND SA6.A6_BCOOFI = F79.F79_BANCO AND SA6.A6_AGENCIA = F79.F79_AGENCI AND SA6.A6_NUMCON = F79.F79_CONTA AND SA6.D_E_L_E_T_ = '')  "
    EndIf

Return cFiltro