you are right, there is COD_PRD defined as char in fidx121t.
I had removed the length and now it looks like this:
....
create view evt111 as select num_prog length=8, num_adh, num_scp length=6, num_evt length=6, typ_evtv length=4,
val_evt length=4, val_pue length=4, date_cre, date_evt...