Histórico da Página

#include 'Protheus.ch'

User Function F450OWN()
	Local cQuery := ""

	cQuery:= "SELECT R_E_C_N_O_ RECNO FROM " + RetSqlName("SE1") + " SE1 WHERE "
	cQuery+= "E1_FILIAL = '" + xFilial("SE1") + "' AND "
	cQuery+= "E1_VENCREA >= '" + DTOS(dVenIni450) + "' AND "
	cQuery += "E1_VENCREA <= '" + DTOS(dVenFim450) + "' AND "

	// Se não considera títulos transferidos, filtra (exibe) apenas os títulos que estão em carteira.
	If mv_par03 == 2
		cQuery+= "E1_SITUACA IN('0','F','G') AND "
	Endif

	cQuery+= "E1_MOEDA = " + Alltrim(Str(nMoeda,2)) + " AND "
	cQuery+= "E1_SALDO > 0 "
Return( cQuery)