SET :xDate = CURRENT DATE + 1 DAYS

Mit dem CODE kannst du in SQLRPG das nächste Datum ermitteln

oder das selbe in nur RPG-Free Code

D actDate s d
/free
actDate = %date(*DATE:*ISO);
actDate = actDate + %DAYS(1);
dsply actDate;
*INLR = *ON;
/end-free



lf perry_rhodan