Iam working on a Aging Report that needs a Tempory Field to sort horizantaly.The Field want to display current month Dates MDYY format.
For Example For Jan '08
01/01/08
01/02/08
01/03/08
01/04/08
01/05/08
01/06/08
.
.
.
etc

any suggestions would be great

Thanks in Advance,
Saikumar.

Saikumar,

Create a FOCUS file and load it with a range of dates as required.

FILEDEF DATEMAS DISK DATERNG.MAS
-RUN
-WRITE DATEMAS FILE=DATERNG,SUFFIX=XFOC
-WRITE DATEMAS SEGNAME=SEG1
-WRITE DATEMAS FIELD=DATE_KEY, ,DMYY ,DMYY , $
-RUN
CREATE FILE DATERNG
MODIFY FILE DATERNG
FREEFORM DATE_KEY.A8.
LOG FORMAT MSG OFF
LOG TRANS MSG OFF
LOG INVALID MSG OFF
DATA
-* Any invalid dates will be rejected.
-DEFAULT &Year  = 2008
-SET &Year  = EDIT(&YYMD,'9999$');
-SET &Month = EDIT(&YYMD,'$$$$99$');
-SET &Month = &Month * 1;
-SET &Day   = 1;
-REPEAT :Loop1 31 TIMES;
-SET &Date = IF &Day LT 10 THEN '0' || &Day ELSE &Day;
-SET &Mnth = IF &Month  LT 10 THEN '0' || &Month ELSE &Month;
&Date&Mnth&Year
-SET &Day = &Day + 1;
-:Loop1
END
-RUN
TABLE FILE DATERNG
PRINT *
END

T

Thanks Tony,for your time
Your's code id working fine ,I took part of your code.
now I have list of weekends in DATERNG TABLE.
Can I use this table to filterout weekends in MY CURRENT table ?

Thanks again Tony
Saikumar

Think about it logically - you want to remove Saturday and Sunday dates from your table?

Well using the DOWK routine is a big clue so see if you can work it out?

T

This might be simpler for you if you don't mind using ggsales sample table.

-DEFAULT &start_date  = '20120401';
-DEFAULT &num_of_days = 30;
 APP PATH IBISAMP
 TABLE FILE GGSALES
 SUM COMPUTE DATEYYMD/YYMD = IF LAST DATEYYMD EQ 0 
                             THEN '&start_date' 
                             ELSE LAST DATEYYMD + 1;
    BY SEQ_NO NOPRINT
 WHERE SEQ_NO LE &num_of_days
 ON TABLE HOLD AS DATELIST FORMAT FOCUS
 END