Da RPG den Datentyp DATE nicht kennt (L) muss hier wohl noch ein casting durchgeführt werden:

SET :NEWDAT = char(date(:MYDATE) + 1 DAYS)