AF060FIL - Customization of the Asset Transfer filter

Description

The entry point AF060FIL is used when customizing filter in the Asset Transfer routine, returning only expressions in ADVPL.

Examples

User Function AF060FIL
Local cFil := "N3_AQUISIC = CTOD('30/09/2013')"
Alert("Displaying assets only from" + cFil)
Return cFil

Language

Portuguese(Brazil)

Versions

Microsiga_Protheus11

Operating Systems Supported

All

Compatible with the following Databases

All

Parameters

cFilter

Call events of the Entry Point

IF ExistBlock("AF060FIL")

cFilter :=ExecBlock("AF060FIL",.F.,.F.,cFilter)

cFilter :=IIF(ValType(cFilter) == "C",cFilter,Nil)

cFiltroAux := strtran(upper(cFilter), "AND" , ".AND.")

cFiltroAux := strtran(cFiltroAux, "OR" , ".OR.")

EndIf

Source Program

ATFA060.PRW