F677VLDCF - Punto de entrada valida liberación de verificación de la rendición de cuentas - FINA677

User Function F677VLDCF() as logical
	//Ubicado en la tabla "FLF" - Rendición de cuentas  
    Local lRet      as logical
	Local cStatus   as character
	Local cCCusto   as character

	lRet    := .T.
	cStatus := FLF->FLF_STATUS
	cCCusto := FLF->FLF_CC

	IF !((FLF->FLF_STATUS $ '2/3' ).AND. EMPTY( cCCusto ))
		MSGINFO( "Es necesario informar el Centro de costo para la liberación de la verificación de la rendición de cuentas.", "Verificación Rendición" )
		lRet := .F.
	ENDIF

Return lRet