From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on inbox.vuxu.org X-Spam-Level: X-Spam-Status: No, score=-0.8 required=5.0 tests=HEADER_FROM_DIFFERENT_DOMAINS, MAILING_LIST_MULTI,T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.4 Received: from minnie.tuhs.org (minnie.tuhs.org [50.116.15.146]) by inbox.vuxu.org (Postfix) with ESMTP id 0665A28509 for ; Fri, 8 Mar 2024 15:40:52 +0100 (CET) Received: from minnie.tuhs.org (localhost [IPv6:::1]) by minnie.tuhs.org (Postfix) with ESMTP id 772D343661; Sat, 9 Mar 2024 00:40:51 +1000 (AEST) Received: from lists.tip.net.au (pasta.tip.net.au [IPv6:2401:fc00:0:129::2]) by minnie.tuhs.org (Postfix) with ESMTPS id 7316143654 for ; Sat, 9 Mar 2024 00:40:43 +1000 (AEST) Received: from smtpclient.apple (ppp121-45-199-199.cbr-trn-nor-bras38.tpg.internode.on.net [121.45.199.199]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by mailhost.tip.net.au (Postfix) with ESMTPSA id 4TrpkJ4g29z9R5m; Sat, 9 Mar 2024 01:40:39 +1100 (AEDT) Content-Type: text/plain; charset=utf-8 Mime-Version: 1.0 (Mac OS X Mail 16.0 \(3774.300.61.1.2\)) From: steve jenkin In-Reply-To: <1612f004-2bd1-4cd8-bce9-1667e4d7e38e@home.arpa> Date: Sat, 9 Mar 2024 01:40:27 +1100 Content-Transfer-Encoding: quoted-printable Message-Id: <23C77EAC-DED5-4ABA-828E-1C18CF3A7FB2@canb.auug.org.au> References: <1612f004-2bd1-4cd8-bce9-1667e4d7e38e@home.arpa> To: =?utf-8?Q?Michael_Kj=C3=B6rling?= X-Mailer: Apple Mail (2.3774.300.61.1.2) Message-ID-Hash: ORD7XP3P745UFQGERYRYQNH3NYMTYGL7 X-Message-ID-Hash: ORD7XP3P745UFQGERYRYQNH3NYMTYGL7 X-MailFrom: sjenkin@canb.auug.org.au X-Mailman-Rule-Misses: dmarc-mitigation; no-senders; approved; emergency; loop; banned-address; member-moderation; nonmember-moderation; administrivia; implicit-dest; max-recipients; max-size; news-moderation; no-subject; digests; suspicious-header CC: coff@tuhs.org X-Mailman-Version: 3.3.6b1 Precedence: list Subject: [COFF] Re: NOT DELETED 8 (OS/360) List-Id: Computer Old Farts Forum Archived-At: List-Archive: List-Help: List-Owner: List-Post: List-Subscribe: List-Unsubscribe: I found the following =E2=80=9CIEF283I=E2=80=9D message, with 6 = sub-clauses for code =E2=80=988=E2=80=99, in Internet Archive copy of a bitsavers doc. Ken Robinson told a few horror stories of OS/360=E2=80=99s evil (my = word) error reporting. > On 8 Mar 2024, at 23:09, Michael Kj=C3=B6rling = wrote: >=20 > On 8 Mar 2024 17:57 +1100, from dave@horsfall.org (Dave Horsfall): >> Can anyone remember what this meant on OS/360? Ken Robinson (one of = my=20 >> CompSci lecturers) used to say "Ah, the old 'NOT DELETED 8 = trick!'"... >=20 > https://www.mail-archive.com/ibm-main@bama.ua.edu/msg107633.html seems > to suggest that "NOT DELETED 8" means "not deleted because in use". >=20 > --=20 > Michael Kj=C3=B6rling =F0=9F=94=97 = https://michael.kjorling.se > =E2=80=9CRemember when, on the Internet, nobody cared that you were a = dog?=E2=80=9D =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D ibm :: 360 :: os :: R21.7 Apr73 :: GC28-6631-13 OS 360 R21.7 Messages = and Codes Apr73 = https://archive.org/details/bitsavers_ibm360osR2S360R21.7MessagesandCodesA= pr73_53080992/page/n301/mode/1up?q=3D%22not+deleted%22 292 Messages 6 Codes (Release 21. 7) IEF283I dsn NOT DELETED x VCL SER NOS=3D ser [z],ser [z],ser [z],ser [z],ser [z] VCl SER NOS=3D = ser [z] ,ser [z],ser [z]. Expla ation; A DD statement specified DELETE as the disposition of data = set dsn, but the data set was not deleted from the volumes whose serial = numbers, ser, are listed in the message text. If the data set was net deleted from any of its volumes, the volumes = listed are all of the volum-es en which the data set resides. If the = data set was partially deleted, miessage IEF285I precedes this message = in the SYSOUT data set and lists the volumes from which the data set was = deleted . =E2=80=A2 If ser is a 6-digit number, it is the serial number ef the = volume, which contains labels . =E2=80=A2 If ser begins with a slash cr L, the vol\ame is unlabeled; the = number after the slash or L is an internal serial number assigned by the = system, to an unlabeled volume. If ser begins with L, the number after = the L is of the form xxxyy, where xxx is the data set number and yy is = the volume sequence number for the data set. Five volume serial numbers are listed per line until all the volumes = involved are listed. The last volume serial number is followed by a = period. The 1-digit code, x, explains why the data set was not deleted. X Explanation 1 The expiration date had not occurred. When the data set was created, = the expiration date was specified by the EXFET or RETPE subparameter in = the LABEL parameter cf the ED statement. 4 No device was available for mounting during deletion. 5 Too many volumes were specified for deletion. Deletion can be = accomplished in several job steps by specifying some of the volume = serial numbers in each step. 6 Either no volumes were mounted cr the mounted volumes cculd net be = demounted to permit the remaining volumes to be mounted. 8 The SCRATCH routine returned a code, z, following each vclum.e serial = number explaining why the data set was not deleted from that volume. The = values of z and their meanings are as follows;=20 1 - The data set was not found on the volume. 2 - The data set is security protected and the correct password was not = given. 3 - The expiration date had not occurred. When the data set was created, = the expiration date was specified by the EXPDT or RETPD subparameter in = the LABEL parameter of the DD statement. 4 - An uncorrectable input/output error occurred in deleting the data = set from the volume. 5 - The system was unable to have the volume mounted for deletion. 6 - The system requested that the operator mount the volume, but the = operator did not mount it. 9 A job was cancelled and was deleted from any of the following queues =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D -- Steve Jenkin, IT Systems and Design=20 0412 786 915 (+61 412 786 915) PO Box 38, Kippax ACT 2615, AUSTRALIA mailto:sjenkin@canb.auug.org.au http://members.tip.net.au/~sjenkin