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