> > 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

