Here's an example ...
-* SET CURRENT DATE
-SET &CUR_YYMD = &YYMD;
-*
-SET &BEG_YYMD = DATECVT((DATEADD((DATECVT (&CUR_YYMD, 'I8YYMD', 'YYMD')),'D', -7)), 'YYMD','I8YYMD');
-SET &END_YYMD = DATECVT((DATEADD((DATECVT (&CUR_YYMD, 'I8YYMD', 'YYMD')),'D', -1)), 'YYMD','I8YYMD');
-*
-SET &BEG_DATE = FPRINT(DATECVT(DATECVT(&BEG_YYMD,'I8YYMD','YYMD'),'YYMD','DMYY'),'DMYY','A10');
-SET &END_DATE = FPRINT(DATECVT(DATECVT(&END_YYMD,'I8YYMD','YYMD'),'YYMD','DMYY'),'DMYY','A10');
-*
-TYPE -------------------------------------------------
-TYPE CURRENT YYMD (CUR_YYMD) ------ &CUR_YYMD
-TYPE -------------------------------------------------
-TYPE BEGIN YYMD (BEG_YYMD) ------ &BEG_YYMD
-TYPE END YYMD (END_YYMD) ------ &END_YYMD
-TYPE -------------------------------------------------
-TYPE BEGIN DATE (BEG_DATE) ------ &BEG_DATE
-TYPE END DATE (END_DATE) ------ &END_DATE
-TYPE -------------------------------------------------
-EXIT
WebFocus 8.201M, Windows, App Studio