New subject: [TUHS] The 2038 bug...

8 Jan 2021

Redirecting to COFF.  COBOL has really nothing to do with Unix.

On Thursday,  7 January 2021 at 20:25:56 -0500, Nemo Nusquam wrote:
...
  On 01/07/21 17:56, Stuart Remphrey wrote (in part):
   Dave,
who's kept his COBOL knowledge a secret in every job 
 Indeed! [...]; but especially COBOL: apart from everything else, too
 much like writing a novel to get anything done. 
 As long as we are bashing COBOL, I recall that someone -- name forgotten
 -- wrote a parody that contained statements such as "Verily, let the
 noble variable N be assigned the value known as one". 
Heh.  In 1973 I was once required to abandon assembler, the language
of Real Programmers, and write a program in COBOL (in fact, a database
front end to COBOL).  I took revenge in the label names.  From
http://www.lemis.com/grog/src/GOPU

     INVOKE SCHEMA KVDMS COPYING COMMON ALL
           RECORD COMMON DELIVERY-AREA IS PUFFER
           OVERLAY PUFFER WITH ALL
           ERROR RECOVERY IS HELL
           ROLLBACK IS IMPOSSIBLE.
     ...
     MAKE-GOPU.  IF ERROR-STATUS IS NOT EQUAL TO '000307', GO TO
           HELL.

Admire that manifest constant.

And yes, this program went into production.

Greg
--
Sent from my desktop computer.
Finger grog(a)lemis.com for PGP public key.
See complete headers for address and phone numbers.
This message is digitally signed.  If your Microsoft mail program
reports problems, please read http://lemis.com/broken-MUA

Re: [COFF] [TUHS] The 2038 bug...