imbed sql in rpg quesion using "in"

I'm trying to do the following but its not working. Can the "in" be used in
this fashion?



D tc s 8

D list s 5555



*inlr = *on;



tc = '3098002';

list = '904359,956835,964733';



exec sql update aafjie

set fld1 = :tc

where fld2 in (:list);