Focal Point
Unusual date format

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/8181077331

April 22, 2004, 08:56 PM
S.J. Kadish
Unusual date format
We have a 9 character claim number wherein the first character points to the last digit of the year (0 = 2000, 1 = 2001, etc.) and the next three characters indicates the day of the year (either 090 or 091 is for April Fools' Day, depending on whether it's a leap year or not.) How can we convert these characters to either a YYMD or YYJUL format?

Thanks in advance,
Sandy Confused
April 22, 2004, 09:43 PM
Mikel
Try this example:
TABLE FILE CAR<br />  PRINT <br />    COMPUTE CLAIM/A9     = '411300000' ;<br />    COMPUTE JULDATEA/A7  = '200' | EDIT(CLAIM, '9999') ; <br />    COMPUTE JULDATEI/I7L = EDIT(JULDATEA) ;<br />    COMPUTE DATEI/I8YYMD = GREGDT(JULDATEI, 'I8YYMD') ;<br />  BY COUNTRY<br />END
Regards,
Mikel