I need to convert a alpha to a smart date.

The alpha format is: 070523, YMD.

I need it to be a smart date in this format YYMD.

I've tried the following with no success.

NLETY/A2 = EDIT ('&LETTING', '$$99');
NLETM/A2 = EDIT ('&LETTING', '$$$$99');
NLETD/A2 = EDIT ('&LETTING', '$$$$$$99');
NLETDATE/A16 = '20'||NLETY||'-'||NLETM||'-'||NLETD||' 00:00';
LETTING/YYMD = HDATE(NLETDATE, 'YYMD');


&LETTING = CT070523
Thanks

This message has been edited. Last edited by: Kerry,

Try-

 
LETTING=DATECVT('&LETTING','A6MDY','YYMD');
 

Nope, returned .00

I tried this with success...

-SET &DAYIN = '070523';
-SET &DAYIN = '20' || &DAYIN;

DEFINE FILE CAR
DATEIN/YYMD = &DAYIN;
END

TABLE FILE CAR
PRINT DATEIN
BY MODEL
IF RECORDLIMIT EQ 5
END

or with the year threshold to get it in the year 2000

SET DEFCENT=19
SET YRTHRESH=56 
-SET &DAYIN = '070523';
DEFINE FILE CAR
DATEIN/YYMD = &DAYIN;
END

TABLE FILE CAR
PRINT DATEIN
BY MODEL
IF RECORDLIMIT EQ 5
END

*thanks Alan B for that one.. I knew it was simple... just never needed it.

This message has been edited. Last edited by: Leo L,

Nick forgot to put a format on, that's all.

LETTING/YYMD=DATECVT('&LETTING','A6YMD','YYMD');

You may want to SET DEFCENT=19 and SET YRTHRESH=56 as well.

quote:

The alpha format is: 070523, YMD.

Using defines, this works too;
-SET &LETTING= 070515;
SET DEFCENT=19
SET YRTHRESH=56

DEFINE FILE EMPLOYEE
IDATE1/I6YMD = EDIT('&LETTING');
MYDATE/YYMD=IDATE1;
END
TABLE FILE EMPLOYEE
SUM CURR_SAL FST.IDATE1 FST.MYDATE
END

Not sure what I'm doing wrong but none of the suggestions are working.

SET DEFCENT=19
SET YRTHRESH=56
DEFINE FILE EMPLOYEE
NDATE/A6 = EDIT ('$LETTING', '$$999999');
NLETDATE/I6 = EDIT(NDATE);
LETTING/YYMD = NLETDATE;
-*LETTING/YYMD=DATECVT('&LETTING','A6MDY','YYMD');
END

Don't forget that &LETTING = 'CT070523' NOT '070523'

quote:

SET DEFCENT=19
SET YRTHRESH=56
-SET &DAYIN = '070523';
DEFINE FILE CAR
DATEIN/YYMD = &DAYIN;

Sorry, I overlooked one sugguestion. the following one worked Thanks alot for the quick response.

SET DEFCENT=19
SET YRTHRESH=56
-SET &DAYIN = '070523';
DEFINE FILE CAR
DATEIN/YYMD = &DAYIN;

Hi All,

My date format is 2009/10/23
how to convert the same to 200910

If your date is in an ampersand variable, you can use the EDIT function:

-SET &NEWDATE = EDIT(&OLDDATE,'9999$99$$$');

If it isn't an ampersand variable but an actual date field instead, then you will need to convert it from DATE to ALPHA and then extract the pieces you need.

Please review the documentation for DATECVT and other DATE functions which you will surely need in the future.