LISTSERV at the University of Georgia
Menubar Imagemap
Home Browse Manage Request Manuals Register
Previous messageNext messagePrevious in topicNext in topicPrevious by same authorNext by same authorPrevious page (July 1999, week 4)Back to main SAS-L pageJoin or leave SAS-L (or change settings)ReplyPost a new messageSearchProportional fontNon-proportional font
Date:   Wed, 28 Jul 1999 14:12:11 -0400
Reply-To:   CHUCK MAKINSON <clmakinson@GOODYEAR.COM>
Sender:   "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
Comments:   To: SAS-L@VTVM1.CC.VT.EDU
Subject:   Custom Y2K Format
Content-Type:   text/plain; charset=iso-8859-1

Does anyone have or know of a format and informat that will handle packed decimal dates that use the high 4 bits as a century indicator? We currently have an MVS system that stores dates as YYMMDD in PD4.. The system is being converted to store the dates in the same PD4. but prefix them with a 1 for the 21st century. For example, if the date is 01JAN99 then it is stored as '0990101'x; In the new system 01JAN1999 will be '0990101'x and 01JAN2099 will be '1990101'x. The suggestion from SAS tech support was to add 19000000 to the date and then convert it such as, input @1 dt1 pd4.0; dt1= input(put(dt1+19000000,8.),yymmdd10.); Although this will work it does not seem very elegant. Due to the number of programs to convert it would be simpler use informat and format statements.

Back to: Top of message | Previous page | Main SAS-L page