To LUGNET HomepageTo LUGNET News HomepageTo LUGNET Guide Homepage
 Help on Searching
 
Post new message to lugnet.off-topic.geekOpen lugnet.off-topic.geek in your NNTP NewsreaderTo LUGNET News Traffic PageSign In (Members)
 Off-Topic / Geek / 1512
1511  |  1513
Subject: 
Re: CGI question
Newsgroups: 
lugnet.off-topic.geek
Date: 
Sat, 8 Apr 2000 17:10:59 GMT
Reply-To: 
[mattdm@mattdm]nomorespam[.org]
Highlighted: 
(details)
Viewed: 
172 times
  
Steve Bliss <blisses@worldnet.att.net> wrote:
IF FLD_XYZ_YR < 29 THEN
  FLD_XYZ_YR4 = 2000 + FLD_XYZ_YR4
ELSE
  FLD_XYZ_YR4 = 1900 + FLD_XYZ_YR4
ENDIF

Sure. That's a pretty typical Y2K fix. And it's basically what you do as a
human when looking at a two-digit year. (If I tell you that the expiration
date on my driver's license is 12-30-02, you assume 2002. If I tell you
it's 12-30-98, you assume I'm in trouble.) Of course, humans are much better
at fuzzy logic than COBOL, so it's not like 29 is hardcoded in your head,
but the concept is similar.

(This solution is known as "windowing".)


Oh, and speaking of fuzzy logic:
<http://www.brunching.com/features/feature-fuzzylogic.html>

--
Matthew Miller                      --->                  mattdm@mattdm.org
Quotes 'R' Us                       --->             http://quotes-r-us.org/



Message has 1 Reply:
  Re: CGI question
 
(...) Yeah, the windowing/epoching/whatevering isn't a big deal. The thing is, they *hardcoded* the 29. They didn't even make it a constant, defined at the top of the code (or in a copybook). So in some number of years, someone is going to have to (...) (24 years ago, 10-Apr-00, to lugnet.off-topic.geek)  

Message is in Reply To:
  Re: CGI question
 
(...) Scary bit of COBOL code one of my co-workers ran across today (he was given the code because it's the closest thing to documentation available for a file he has to deal with): IF FLD_XYZ_YR < 29 THEN FLD_XYZ_YR4 = 2000 + FLD_XYZ_YR4 ELSE (...) (24 years ago, 8-Apr-00, to lugnet.off-topic.geek)

14 Messages in This Thread:




Entire Thread on One Page:
Nested:  All | Brief | Compact | Dots
Linear:  All | Brief | Compact

This Message and its Replies on One Page:
Nested:  All | Brief | Compact | Dots
Linear:  All | Brief | Compact
    

Custom Search

©2005 LUGNET. All rights reserved. - hosted by steinbruch.info GbR