I'd like to format my header to have a date like Oct 16, 2007 but it's coming across as 20071016

here's the code I have...
HEADING
"Sales Progress Report for &YYMD"

is there a way to put in a format function or something?

Jason
what you can do is

-SET &day=EDIT('&YYMD.EVAL','$$$$$$99');
-SET &month=EDIT('&YYMD.EVAL','$$$$99$$');
-SET &year=EDIT('&YYMD.EVAL','9999$$$$');
-SET &mname=DECODE &month('01' Jan '02' Feb etc);
-SET &TSTRING='&mname'|' '|'&day'|','|'&year';

but I'm sure there is more than one other solution.

Set the date like this

-SET &RepDate = &DATEtMDYY;

TABLE FILE ....
...
HEADING
"Sales Progress Report for &RepDate"

You can do it with a system & variable I call it pretty dates.
&DATEtrMDYY

I just put it in the heading and don't do dialog manager as Glenda's example. But either way, the 'tr' says mixed case.

As Leah states, you can put it directly in the heading. I put it all variables the the beginning of my fex procedure (dialog manager?) because it allows me to make changes to variable with out having to go through all the code.

-*********************************************************************
-* TITLE : FOCEXEC (SRL PRINT OUT)
-* SYSTEM : HEALTH
-*********************************************************************
-* AUTHOR : GLENDA STURM
-* DATE WRITTEN : 08/10/2005
-* DESCRIPTION : PRINT OUT OF SRL ALL SRL REPORTS
-* INPUT FILES : ADJMST
-* INPUT FILES : CONTRL
-* INPUT FILES : SIGNRS
-* INPUT FILES : SIGNGP
* OUTPUT FILES : EXCEL FORMAT FILE
-*********************************************************************
-* --------- CHANGE LOG ---------
-* 8/15/2005 CHANGED CODE TO PULL NAME FROM CONTRL FILE.
-* 3/28/2007 gb5q02_security screen_20070326
-* Add MEDSUPP Division and restructure Directories as follows:
-* Select Division - - >> ALL
-* INDIVIDUAL
-* 1)Production
-* 2)Model Office
-* 3)Training
-* 4)Development
-* 5)Claims User Test
-* 6)Eligibility User Test
-* GROUP
-* 7)Production
-* 8)Model Office
-* 9)Training
-* 10)Development
-* 11)Claims User Test
-* 12)Eligibility User Test
-* MDSUP
-* 13)Production
-* 14)Model Office
-* 15)Training
-* 16)Development
-* 17)Claims User Test
-* 18)Eligibility User Test
-************************************************************************************************************
-*
-SET &Userid = GETUSER(USERID);
-SET &RepDate = &DATEtDMYY;
-SET &RepTime = EDIT(&TOD,'99$:99$:99');
-SET &BDate = 20070101;
-SET &EDate = 20070930;