> 
> Count yourself lucky how you learned about that. When I was a 
> systems programmer at ADR, we had one programmer with the bad 
> habit of resting his box of punch cards on the 1403; it was 
> conveniently next to the card reader, and a comfortable height. 
> He persisted in this habit despite numerous warnings, and cited 
> having seen me do the same thing. Then one day the printer ran 
> out of paper, the cover lifted, and his deck decorated the 
> floor; he also saw that one section didn't raise, and that's 
> where I normally put my cards <g>
> 
> 
> Gerhard Postpischil
> Bradford, VT
> 

Sometime about 1980, we (not my current employer) had a card deck that 
went something like this:

//CLEANUP JOB
//JS010   EXEC PGM=DELETE_DATA_SETS_OLDER_THAN_5_DAYS
//SYSPRINT DD  SYSOUT=A
//DISK1    DD  ...
//DISK2    DD  ...
//DISK3    DD  ...
... 
//SYSIN    DD  *
do not delete data set list
/*

The shift supervisor duplicated the deck (I guess it was getting old and 
frayed), didn't check the results, and ran the newly punched deck.  One of 
the DISK DD cards had been mispunched like
/DISK1    DD  *
Of course, JES2 interpreted this as instream data.  JES2 generated a SYSIN 
DD statement ahead of the /DISK1, and our "do not delete" list suddenly 
became a null list.

A majority of our disk data sets that were not in use were deleted as a 
result.

The next two weeks were very interesting.  As a rookie systems programmer, 
I learned a lot.

Steve




**************************************************************************************
This e-mail message and all attachments transmitted with it may contain legally 
privileged and/or confidential information intended solely for the use of the 
addressee(s). If the reader of this message is not the intended recipient, you 
are hereby notified that any reading, dissemination, distribution, copying, 
forwarding or other use of this message or its attachments is strictly 
prohibited. If you have received this message in error, please notify the 
sender immediately and delete this message and all copies and backups thereof.

Thank you.
**************************************************************************************

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to