🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: bit.listserv.asm370
Article #219

Re: How to find PDS member name details

#219
From: McKown, John
Date: Tue, 25 Oct 2005 12:30
56 lines
4000 bytes
> -----Original Message-----
> From: IBM Mainframe Assembler List
> [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of Mike Baker
> Sent: Tuesday, October 25, 2005 1:25 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: How to find PDS member name details
>
>
> The problem is an extremely messy environment. Years ago some
> standard IMS
> database procedures were created, and people were meant to execute the
> centrally stored procs, and use whatever JCL overrides they
> needed. Now...
> 18 years later, everyone their own personal version/s of the
> procs, and
> they execute these most (not all) of the time. The test
> environment is a
> complete mess, and no-one has a clue what's going on.
>
> IMS version 7.1 does not force the use of the DBRC=Y
> parameter in the JCL,
> and whilst you can code it in the centrally stored procs,
> that is no help
> if people don't use those procs. Nor do they want anyone
> telling them what
> they should be using...  even though their own source
> libraries are now in
> a state of complete chaos.
>
> So... the intention would be to write a front-end for the IMS region
> controller program, rename the IBM one, and XCTL to it after
> extracting
> various items of info. such as the PDS member name details.
> And with the
> gathering of this information, then control can be established.
>

Well, this is just my personal opinion. But it is what I did once in a
similar (but not as bad) situation. It does require management
enforcement. Basically, I say: "Do it this way! If you don't, and you
have a problem, then YOU have a problem. If you bother me, I will laugh
at you and tell you to go away." Rude, crude, and socially unacceptable.
But sometimes that's the only way to clean up a really messy situation.

--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its'
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited.
Technical Details
Message-ID: <80ED1590A931EE45BAE1DA52D25AE0F2E0B996@UICNRHECHP6.uicnrh.dom>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!sn-xit-04!sn-xit-12!sn-xit-09!sn-xit-06!sn-xit-14!supernews.com!149.173.6.116.MISMATCH!foggy!vm.sas.com!uiciinsctr.com!john.mckown

Show Full Headers
Complete Article Headers
X-Google-Thread: fcdcb,21dc5dfdb7ef5f7f
X-Google-Attributes: gidfcdcb,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!news.glorb.com!sn-xit-04!sn-xit-12!sn-xit-09!sn-xit-06!sn-xit-14!supernews.com!149.173.6.116.MISMATCH!foggy!vm.sas.com!uiciinsctr.com!john.mckown
From: "McKown, John" <john.mckown@uiciinsctr.com>
Newsgroups: bit.listserv.asm370
Subject: Re: How to find PDS member name details
Date: Tue, 25 Oct 2005 07:30:51 -0500
Organization: SAS Inc.
Lines: 56
Sender: IBM Mainframe Assembler List <ASSEMBLER-LIST@LISTSERV.UGA.EDU>
Message-ID: <80ED1590A931EE45BAE1DA52D25AE0F2E0B996@UICNRHECHP6.uicnrh.dom>
NNTP-Posting-Host: mozart.unx.sas.com
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Trace: foggy.unx.sas.com 1130244106 21992 10.19.150.41 (25 Oct 2005 12:41:46 GMT)
X-Complaints-To: usenet@unx.sas.com
NNTP-Posting-Date: Tue, 25 Oct 2005 12:41:46 +0000 (UTC)
Comments: Gated by NETNEWS@VM.SAS.COM
Return-Path: <owner-assembler-list@LISTSERV.UGA.EDU>
X-MimeOLE: Produced By Microsoft Exchange V6.5.7226.0
Content-class: urn:content-classes:message
Thread-Topic: How to find PDS member name details
Thread-Index: AcXZLWMWkfvEUOZGR1iEuEbGhBJFSAAMh8Lw
X-OriginalArrivalTime: 25 Oct 2005 12:30:51.0528 (UTC)
                       FILETIME=[EF9FE080:01C5D95F]
X-MIME-Autoconverted: from quoted-printable to 8bit by listserv.cc.uga.edu id
                      j9PCUsXI012537
Approved-By: "McKown, John" <john.mckown@UICIINSCTR.COM>
Return-Path: owner-assembler-list@LISTSERV.UGA.EDU
X-Mime-Autoconverted: from 8bit to 7bit by mime827
Originator: daemon@mozart.unx.sas.com