select
	e.serviceid,
	e.eventid,
	e.title,
	e.titlelang,
	e.subtitle,
	e.description,
	e.descriptionlang,
	e.videoaspect,
	e.videoframerate,
	e.videohd,
	e.audiochannels,
	e.audiolanguage,
	e.subtitlelanguage,
	e.category,
	e.subcategory,
	e.usercategory,
	e.dvbrating,
	e.starttime,
	e.stoptime,
	e.episode,
	e.episodes,
	e.year,
	e.flags,
	e.season,
	e.eventuid,
	e.current
from events e
where now()::timestamp without time zone <@ tsrange(e.starttime, e.stoptime)
and current
order by e.serviceid
