Error / Fout

SEARCH:  Error while evaluating SQL:
    SELECT  	DISTINCT a.datumtijd
								,		to_char(a.datumtijd, 'DD-MM-YYYY')
								,		to_char(a.datumtijd,  'hh24:mi')
								,		a.theaconcert
								,		c.id
								,		a.afgelast
								,		d.uitverkocht
								,		a.id
								,		to_char(a.datumtijd,  'DDMMYYYYHH24MI')
								,		e.naam
								,		e.id
								,		b.naam
								,		a.datumtijd - sysdate
								,		trunc(d.start_vvk) - trunc(sysdate)
								,		d.external_id
								,		g.naam
								,		g.id
								,		a.beep_id
								FROM	thea.T_PROGRAMMA a
								,		thea.T_ZAAL b
								,		thea.T_THEATER c
								,		thea.T_RANG d
								,		thea.T_VOORSTELLING e
								,		thea.T_VOORSTELLINGGEZELSCHAP f
								,		thea.T_GEZELSCHAP g
								WHERE	a.zaal_id = b.id	
								AND		b.theater_id = c.id
								AND		c.id = '197AMS'
								AND 	a.voorstelling_id = e.id
								AND		e.id = f.voorstelling_id
								AND		f.gezelschap_id = g.id 								
								AND		a.datumtijd >= trunc(sysdate)
								AND		a.id = d.programma_id (+)
								ORDER BY a.datumtijd

Database error: SQL call failed.
  Error num     : 5
  VendorError1  : 1406
  VendorMessage1: 
  VendorError2  : 1
  VendorMessage2: ORA-01406: fetched column value was truncated

while executing
"system_error "$msg""
    (procedure "error" line 9)
    invoked from within
"error "SEARCH:  Error while evaluating SQL:\n    $sql\n\n  Database error: $vdbmsg(Message)\n  Error num     : $vdbmsg(Error)\n  VendorError1  : $vdbm..."
    (procedure "SEARCH" line 123)
    invoked from within
"SEARCH TABLE a INTO b SQL "SELECT  	DISTINCT a.datumtijd
								,		to_char(a.datumtijd, 'DD-MM-YYYY')
								,		to_char(a.datumtijd,  'hh24:mi')
			..."
    (procedure "PROGRAMMA::theater" line 7)
    invoked from within
"PROGRAMMA::theater 1132 1630 197AMS 3x1_programma_theater -1 0"
    ("eval" body line 1)
    invoked from within
"eval $str"
    (procedure "SLOT::render" line 102)
    invoked from within
"SLOT::render [SHOW menu_id] b1"
    (procedure "detail::render" line 65)
    invoked from within
"detail::render 1630"
    ("eval" body line 1)
    invoked from within
"eval $str"
    (procedure "render" line 18)
    invoked from within
"render [SHOW layout] [SHOW menu_id] [SHOW pagestatus]"
    invoked from within
"IF {[SHOW layout] != {}} {[
	INCLUDE LIBNAME [SHOW layout]
	render [SHOW layout] [SHOW menu_id] [SHOW pagestatus]

]} ELSE {[INCLUDE LIBNAME error]<b..."
    invoked from within
"EVAL $body"
    invoked from within
"INCLUDE LIBNAME peephole
"