Histórico da Página

#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} User Function F280DTVC
    (Ponto de entrada para tratar as datas de vendimentos das parcelas do desdobramento)
    @type  logical
    @author Cassio S. Dias
    @since 14/11/2023
    @version 12.1.2310
    @param param_name, param_type, param_descr
    @return lRet, logical
    @see (links_or_references)
    /*/
User Function F280DTVC(dDataVc) as logical

	
    Local lRet :=.T.

	if dDataVc < dDataBase
		MSGALERT( "A data de vencimento está menor que lRet:= dDataVc >= dDataBase
    a database. Necessário ajustar", "Data Menor" )
		lRet :=.F.
	ENDIF

Return lRet