Can date math be done in CL ?

Standard scenario ..
CL sets up prompt screen
user choices on prompt screen control choices which RPG JOBQ printer data 
ranges

I want prompt screen default date selection range to pre-compute thru 2 weeks 
into the future

I can write then call an RPG program to translate what that is from today 
date.
Is there a standard CMD or API already available to do this?

hypothetical example

RTVSYSVAL QDATE &TODAY

CALL   QSYS/QDATEMATH 
DAYS(14)   DIRECTION(*PLUS)   START(&TODAY)   RESULT(&RESULT)

Alister William Macintyre 
Computer Data Janitor etc. of BPCS 405 CD Rel-02 on 400 model 170 OS4 V4R3 
(forerunner to IBM e-Server i-Series 400)  @ http://www.cen-elec.com Central 
Industries of Indiana--->Quality manufacturer of wire harnesses and 
electrical sub-assemblies

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---