Есть два способа исправить эту ошибку.
Способ первый
вам нужны нулевые индикаторы, и вы их проверяете.
метод два объединяет поле со значением, которое RPG может обрабатывать изначально.
declare mycsr cursor for
select cast(coalesce(myfield,' ') as char(10))
, cast(coalesce(mydec,0) as integer) from myfile.mylib