FA080LIB – Validación al confirmar la baja manual

#INCLUDE "TOTVS.CH"

User Function FA080LIB() as logical
Local lRetorno := .T. as logical

FWAlertInfo("Punto de entrada FA080LIB")

If Empty(CCHEQUE)   
	lRetorno := .F. 
EndIf

//-----------------------------------------------------------------------------------------
//Ejemplo de variables private para consulta
//----------------------------------------------------------------------------------------- 
//Nombre		Tipo			Alcance			Puede modificar Descripción
//CBANCO		Carácter		Privado			No				Código del banco
//CAGENCIA		Carácter		Privado			No				Código de la agencia bancaria
//CCONTA		Carácter		Privado			No				Código de la cuenta corriente
//CCHEQUE		Carácter		Privado			No				Número del cheque
//DBAIXA		Fecha			Privado			No				Fecha de la baja
//CHIST070		Carácter		Privado			No				Historial de la baja
//CBENEF		Carácter		Privado			No				Beneficiario
//NDESCONT		Decimal			Privado			No				Valor del descuento
//NMULTA		Decimal			Privado			No				Valor de la multa
//NJUROS		Decimal			Privado			No				Ts Permanencia
//NVALPGTO		Decimal			Privado			No				Valor pagado
 //-----------------------------------------------------------------------------------------

RETURN lRetorno