public function LeerPorCadena($cr,$cad)
	{
		global $db;
		$oEmpresa = new Empresa();
		$Rs = $oEmpresa->LeerDatos();
		if($Rs)
		{
			$Ingreso = $Rs->fields['ingreso'];
			$Rs = $db->Execute("select * from {$this->_table} where spi_cuenta like'{$Ingreso}%' and {$cr} like  '%{$cad}%'");
		
		}
		return $Rs;
		
	}
	public function LeerCuentasIngrsos()
	{
		global $db;
		$oEmpresa = new Empresa();
		$Rs = $oEmpresa->LeerDatos();
		if($Rs)
		{
			$Ingreso = $Rs->fields['ingreso'];
			$Rs = $db->Execute("select sig_cuenta,denominacion from {$this->_table} where sig_cuenta.status='C' and sig_cuenta not in(select sig_cuenta from spe_plan_ingresos)");
		}
		return $Rs;
	}