Re: ISPF to Panvalet interface

[allan winston]

Brian,

   I used Panvalet extensively from 1976 to 1982, including the Panvalet
Access method.  It is disappointing that PAM is now an extra-cost feature.

   I looked over the code in CBT148.  It appears that the code is simply
setting up the ISPF user to run the Panvalet batch programs inside TSO.
The validation for the record format of the Panvalet library being DA is
just a reasonableness check to make sure the user is not pointing to a
dataset that is not a Panvalet library. It should not be a major issue that
sometime over the years that the Panvalet development staff chose to change
the DSORG from DA to SD.

   I would recommend removing the 8 sections of validation code in FILE002
that look like this:

IF  NE DA THEN   /* Oh, not direct access!  */+

  DO  /* */

SET ZEDSMSG = (NOT DIRECT ACCESS) /* */

SET ZEDLMSG = ('' IS '' -- PANVALET LIBRARIES +

  ARE DIRECT ACCESS)  /* */

ISPEXEC SETMSG MSG(ISRZ001)   /* Display error message.  */

GOTO TOP  /* Re-enter.   */

  END /* */

and see how far you can get before running into further problems.

It is certainly possible that the output from PAN#2 could have changed
over the years and that may need minor code modifications.

   Allan

On Wed, Dec 20, 2023 at 12:24 AM Brian Westerman <
brian_wester...@syzygyinc.com> wrote:

> Does anyone have an inexpensive (i.e. free) working ISPF interface to
> Panvalet.  There is one on the CBT Tape that doesn't support any recent
> versions of Panvalet and it abends because of Panvalet changing to PS
> datasets from DA, and also the format of the data being sent back from the
> PAN# modules has changed since the time it was written.
>
> Is anyone aware of another one or a working version of the CBT file 148
> one?
>
> Thanks,
>
> Brian
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: What happened to GC26-1672 Batch Local Shared Resource(LSR) Documentation?

[allan winston]

Laurence,

   Rather than clogging up IBM-MAIN with a large number of back-and-forth
emails, I would suggest that we take this discussion offline and publish
the final results here when we are done.

   I have sent you a LinkedIn connection request to get us started.

 Allan

On Sat, Jul 15, 2023 at 11:18 PM Laurence Chiu  wrote:

> On Fri, Jul 7, 2023 at 5:35 PM allan winston  wrote:
>
> > I did a lot of work in this area 20 years ago.
> > [snip]
> >
> > CICS is an entirely different ballgame.  In the rare event that the VSAM
> > files in your shop are still using LSR instead of RLS, then there are
> > opportunities for performance improve by appropriate changes to the FILE
> > and LSRPOOL specifications using Resource Definition Online or,
> > equivalently, via the batch program DFHCSDUP.  Never let files with
> > significant activity default to pool 1.
> >
> >
> >
> >  Allan
> >
> >
> >
> Our shop is CICS and I am not sure we are even using LSR and certainly no
> RLS since there is no parallel sysplex.
>
> The primary master files are VSAM and we run a lot of batch using CICS EXCI
> in order (I am told) to facilitate sharing between online and batch and
> also to avoid reproducing of lot of the business logic already in the
> online transactions.
>
> Sounds like to me there could be opportunities to tune our batch which does
> run quite slowly, both during the daytime when the onlines are busy and
> during evening batch when the onlines have quite load transaction volumes.
>
> Where should I go looking?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: A question about IXGLOGR and RRS CPU usage

[allan winston]

Jason,

   You may wish to download the Redbook SG24-6898-01, Systems Programmer's
Guide to z/IS System Logger.
Even though it has not been updated since 2012, the information may still
be relevant.

   In particular, chapter 8 is performance and tuning.
That chapter mentions the IXGRPT1 report as well as a SORT job that may be
more readable.
That chapter also mentions several RMF reports of interest.

 Allan

On Wed, Jul 12, 2023 at 6:53 PM Jason Cai  wrote:

> Dear all,
>
> I have a question about IXGLOGR and RRS CPU usage that I hope you can help
> me with.
>
> Due to a large number of transactions that update DB2 and query DB2 (query
> transactions from DRDA), the IXGLOGR usage has increased significantly, and
> the RRS allocate logstream offline datasets have also increased
> significantly, but the RRS CPU usage is not high. Is this normal? I would
> like to know how to reduce the IXGLOGR CPU usage. Any suggestions are
> greatly appreciated.
>
> Thank you for your time and attention. I look forward to hearing from you
> soon.
>
> Sincerely,
>
> Jason Cai
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Invoke Java from Assembler

[allan winston]

Robert,

   This reminds me of a situation I ran into 25 years ago involving
assembler and COBOL.  Granted, COBOL and Java are different
environments, but there may be enough similarity in the issues to be
relevant.

We had an assembler main program that called a COBOL subroutine
repeatedly.  It was chugging along just fine until
LE maintenance showed a large spike in CPU time within LE library routines,
as shown by Strobe.
It seemed as though the LE environment was constantly being created and
torn down. I did look into solutions, such as using CEEPIPI, but this
program
was a major CPU consumer in this shop and we needed a quick solution.  The
solution I proposed and was implemented
was to create a new main program, written in COBOL, that called the former
assembler main program.  That way the new main program
established the LE environment that persisted until the program terminated.

   So, ALC calling COBOL changed to COBOL calling ALC calling COBOL.
In your case: Java calling COBOL changed to COBOL calling Java calling
COBOL.

   I have never used Java, so this is somewhat a shot in the dark.

   I should have created an ETR on IBMLINK about the increased CPU
overhead, but did not bother since we had a circumvention.

 Allan

On Tue, Jul 11, 2023 at 5:58 PM Crawford Robert C (Contractor) <
04e08f385650-dmarc-requ...@listserv.ua.edu> wrote:

> We're interested in invoking Java from assembler in batch.  Specifically,
> we'd like to create a persistent Java environment we can call repeatedly
> and terminate when we're through.
>
> Has anyone done this?  Is the LE pre-initialization module CEEPIPI worth
> exploring?
>
> Thanks.
>
> Robert Crawford
> Abstract Evolutions LLC
> (210) 913-3822
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: What happened to GC26-1672 Batch Local Shared Resource(LSR) Documentation?

[allan winston]

I did a lot of work in this area 20 years ago.


If you have MXG in your shop, the ANALBLSR will suggest jobs that can
benefit from Batch LSR, assuming the proper SMF types are being collected
and processed by MXG.  Documentation is in member ADOCBLSR.  It has been 18
years since I have had access to MXG, so the member names could have
changed.



If you happen to have the Data Optimizer component of the BMC Mainview
Batch Optimizer, then you can forgo the JCL changes by adding
specifications by various combinations of JOB and/or DDNAME and/or DSNAME
in that product’s parameter files.



Always use separate pools for the index and data components.  If the number
of index CI’s is manageable, consider choosing enough index buffers to make
the index component resident.

Memory was more constrained when I performed my tuning activities than
now.  The choice of how many buffers to assign to each CISIZE in each pool
is a case of not adding even more buffers when the benefit is diminishing.
For tuning purposes, I would refer you to ITSO manual SG24-2557-00,
“System/390 MVS Parallel Sysplex Batch Performance”.  I am pretty sure that
I downloaded it from the Redbooks site years ago, but it is no longer
there.  I have found it on the Wayback Machine at:

http://web.archive.org/web/20060107154104/http://www.redbooks.ibm.com:80/redbooks/pdfs/sg242557.pdf


This manual describes the use of the F61 (EID EF61) GTF trace records and
has a sample ICETOOL job to get a feel on how the keys (really CI numbers)
are distributed.  Note that VSAM was enhanced after publication of this
manual, so the field described in Appendix A at 33,4 is now the control
interval number rather than the RBA.

The manual also shows execution of the MKTTOOLS tool VLBPAA, which I
extensively used 20 years ago.

However, it seems that no one has been able to obtain VLBPAA from IBM in
recent years.  That RBA to CI number change in VSAM likely would make the
VLBPAA results slightly inaccurate, too.



CICS is an entirely different ballgame.  In the rare event that the VSAM
files in your shop are still using LSR instead of RLS, then there are
opportunities for performance improve by appropriate changes to the FILE
and LSRPOOL specifications using Resource Definition Online or,
equivalently, via the batch program DFHCSDUP.  Never let files with
significant activity default to pool 1.



 Allan



On Fri, Jul 7, 2023 at 12:38 AM Jim Mulder  wrote:

>   That is probably the most recent documentation.  I doubt that anything
> has been done since I posted this
> on IBM-MAIN on Sep 12, 2012:
>
> > Thanks! I'd already read the book and noted that Dynamic SSI came after
> > BLSR. And so the BLSR book might not have been updated.
>
> I am pretty sure that I submitted a request about 15 years ago
> to update the next edition of the Batch LSR manual to say that
> SETSSI can be used to active Batch LSR. But it would appear
> that there hasn't been a subsequent edition of that book.
> (So my request may still be pending somewhere).
>
> Jim Mulder Batch LSR Developer IBM Corp. Poughkeepsie, NY
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Pommier, Rex
> Sent: Thursday, July 6, 2023 3:23 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [EXTERNAL] Re: What happened to GC26-1672 Batch Local Shared
> Resource(LSR) Documentation?
>
> Ehhh, I just found my "current" BLSR documentation.  GC28-1469 that
> somebody already pointed out, MVS/ESA 5.1, June 1994.  Guess the old brain
> cells are getting foggier than I thought they were.
>
> Rex
>
> -Original Message-
> From: Pommier, Rex
> Sent: Thursday, July 6, 2023 2:19 PM
> To: 'IBM Mainframe Discussion List' 
> Subject: RE: [EXTERNAL] Re: What happened to GC26-1672 Batch Local Shared
> Resource(LSR) Documentation?
>
> I activated BLSR at *current job* a few years back.  I had used it very
> successfully at prior jobs but nobody here had heard of it.  I convinced a
> couple of the application teams to try it on some heavy hitters and they
> were astonished at the difference.  At the time I activated it I thought I
> had found a relatively current manual on it but for the life of me I can't
> find it now.  :-(
>
> Rex
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: [EXT] Re: z/OSMF

[allan winston]

For the classic game, CBT file 269 has a version of the source program that
is 3191 lines long and includes the associated data files.  There is a
reference to there being the corresponding load module in CBT file 135 with
the name "PROGRAM".

Somewhere along the way, I seem to have downloaded a newer version of the
source that is 4691 lines long.  The comments state that it is version 4.
However, I failed to download the associated data files and no longer have
access to that system.

 Allan

On Wed, Jul 5, 2023 at 11:07 AM Mike Schwab  wrote:

> https://www.cbttape.org/cbtdowns.htm
> 5 results for Game, including 38 Klingon, 269 Adventure, and 2 groups?
>
> On Wed, Jul 5, 2023 at 9:21 AM David Spiegel
> <0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > Hi Robert,
> > Is the source code available?
> > If yes, how does one get it?
> >
> > Thanks and regards,
> > David
> >
> > On 2023-07-05 09:17, Crawford Robert C (Contractor) wrote:
> > > In the early 80's we had an adventure game written in PL/1.  It was
> largely table driven so I added a room full of Texas Aggies.  To retrieve
> the "treasure," an Aggie Joke book, you had to find a bar of soap and throw
> it into the room at which point the Aggies would run out of the room
> enabling you to get the book.
> > >
> > > For the record, I am a Texas Aggie and I understand that the joke will
> be lost on 49/50ths of the US.
> > >
> > > Robert Crawford
> > > Abstract Evolutions LLC
> > > (210) 913-3822
> > >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List  On
> Behalf Of Pew, Curtis G
> > > Sent: Monday, July 3, 2023 1:43 PM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: [EXT] Re: z/OSMF
> > >
> > > On Jul 3, 2023, at 1:26 PM, Seymour J Metz  wrote:
> > >
> > > I was thinking of the old text Adventure written in FORTRAN.
> > >
> > >
> > > You’re talking about the same game. The full name was “Colossal Cave
> Adventure”, but the program file name was usually as many characters of
> “ADVENTURE” as the system supported.
> https://en.wikipedia.org/wiki/Colossal_Cave_Adventure
> > >
> > > Forty years ago I knew how to make it all the way through, but that
> knowledge is now lost in the mists of time for me.
> > >
> > > --
> > > Curtis Pew
> > > ITS Campus Solutions
> > > curtis@austin.utexas.edu
> > >
> > >
> > >
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
> --
> Mike A Schwab, Springfield IL USA
> Where do Forest Rangers go to get away from it all?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: RLSE - A question about releasing unused tracks in a DASD dataset

[allan winston]

Browsing the CBT documentation file (I may not have the latest version), I
found this (note that Nigel Morton had previously suggested the use of the
PARTREL macro):

//***FILE 959 is from Richard W. Pinion and contains a program  *   FILE
959

//*   to release excess space from a list of datasets (by   *
FILE 959

//*   name), without affecting the last-access date.*
FILE 959

//*   This program uses the PARTREL macro from SYS1.MACLIB. *
FILE 959

//* *
FILE 959

//*   email:  rpin...@firsthorizon.com  *
FILE 959

//* *
FILE 959

//*   The UCB lookup in this program uses the ULUT  *
FILE 959

//*   (UCB Lookup Table) method, from CBT File 873, that*
FILE 959

//*   was pioneered by Gilbert Saint-flour.  Please see *
FILE 959

//*   member $ULUNOTE for some background on this subject,  *
FILE 959

//*   which is not documented by IBM.  The easy-to-use  *
FILE 959

//*   UCB Lookup Table macros were written by Sam Golob.*
FILE 959

//* *
FILE 959

//*   PARTREL  - RELEASES EXCESS SPACE FROM DATASETS, EITHER*
FILE 959

//*  CATALOGED, OR UNCATALOGED (WITH VOLSER).   *
FILE 959

//* *
FILE 959

//*   Further documentation:*
FILE 959

//* *
FILE 959

//*   The PARTREL program takes input in the //INDD DD name *
FILE 959

//*   with the dataset name starting in column1, and optionally *
FILE 959

//*   the volser of the dataset, which is necessary if the  *
FILE 959

//*   dataset is uncataloged, starting (for 6 characters)   *
FILE 959

//*   in column 45. *
FILE 959

//* *
FILE 959

//*   Model JCL for the //INDD DD card is as follows:   *
FILE 959

//*   Please  make sure that the "ruler" comment card does not  *
FILE 959

//*   immediately follow the //INDD DD card, or a //SYSIN DD *  *
FILE 959

//*   card will be generated, nullifying the //INDD DD * card.  *
FILE 959

//* *
FILE 959

//*   //PARTR01  EXEC PGM=PARTREL   *
FILE 959

//*   //STEPLIB   DD  DSN=SYS1.W$$.LINKLIB,DISP=SHR *
FILE 959

//*   //SYSPRINT  DD  SYSOUT=*  *
FILE 959

//*   //*-+1+2+3+4volser*
FILE 959

//*   //INDD  DD  * *
FILE 959

//*   IBMUSER.TEST.PARTREL.PDS2   VPWRKD*
FILE 959

//*   IBMUSER.TEST.PARTREL.PDS  *
FILE 959

//*   /**
FILE 959

//*   //*
FILE 959

//* *
FILE 959

//*   member $ULUNOTE for some background on this subject,  *
FILE 959
//*   which is not documented by IBM.  The easy-to-use  *
FILE 959
//*   UCB Lookup Table macros were written by Sam Golob.*
FILE 959
//* *
FILE 959
//*   PARTREL  - RELEASES EXCESS SPACE FROM DATASETS, EITHER*
FILE 959
//*  CATALOGED, OR UNCATALOGED (WITH VOLSER).   *
FILE 959
//* *
FILE 959
//*   Further documentation:*
FILE 959
//* *
FILE 959
//*   The PARTREL program takes input in the //INDD DD name *
FILE 959
//*   with the dataset name starting in column1, and optionally *
FILE 959
//*   the volser of the dataset, which is necessary if the  *
FILE 959
//*   dataset is uncataloged, starting (for 6 characters)   *
FILE 959
//*   in column 45. *
FILE 959
//* *
FILE 959
//*   Model JCL for the //INDD DD card is as follows:   *
FILE 959
//*   Please  make sure that the "ruler" comment card does not  *
FILE 959
//*   immediately follow the //INDD DD card, or a //SYSIN DD *  *
FILE 959
//*   card will be generated, nullifying the //INDD DD * card.  *
FILE 959
//* *
FILE 959
//*   //PARTR01  EXEC PGM=PARTREL 

Re: MVS Update

[allan winston]

Paul,

   I recommend the newxmitmgr utility which can be obtained here:
https://xmit-manager.software.informer.com/download/

   Allan

On Tue, Oct 4, 2022 at 11:07 AM esst...@juno.com  wrote:

> .
> .
>  I was able to obtain CBT830.zip
>  I extracted it, and it creates a xmi file.
>  However I can't open it  CBT830.xmi
>  I tried changing the suffix to doc and docx and txt
>  Is there anything special to open this file ?
>
> Paul
> -- Original Message --
> From: Sri h Kolusu 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: MVS Update
> Date: Mon, 3 Oct 2022 02:59:02 +
>
> Paul,
>
> CBT Tape File 830 contains 926 articles (with their code, as an EBCDIC
> pds) from Xephon's MVS Update magazines, ranging from July 1987 thru
> December 1996.
>
>
> https://bit.listserv.ibm-main.narkive.com/q69XU7Zi/please-explore-cbt-tape-file-830-xephon-mvs-articles
>
> Here is the link to download File # 830 XEPHON MVS articles from 07/1987
> thru 12/1996 EBCDIC
>
> https://www.cbttape.org/ftp/cbt/CBT830.zip
>
> Checking CBT830 it has the following articles from October of 1987
>
> "B2D3A01C"-An on-line MVS/XA CSA monitor -October   1987
> "F863B8BD"-Determining VSAM buffer allocations   -October   1987
> "U75306DC"-Issuing operator commands through JCL -October   1987
> "TE2F0969"-IPOUPDTE  -October   1987
> "YFB389AC"-MVS authorisation -October   1987
> "XA332F6C"-Protecting catalogued tape files  -October   1987
> "Q0F37C0C"-TSO response time monitor -October   1987
> "C813F37C"-Verifying whether a job is currently active   -October   1987
> "C503910D"-Volume pooling using IGGPRE00 -October   1987
> "TD9355BC"-Writing a cross memory program-October   1987
>
> Thanks,
> Kolusu
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: MVS Update

[allan winston]

Paul,

   While you may have already been down this path


The CBT website has articles for 1988 to 2005:
https://www.cbttape.org/xephon/index.php?path=xephonm/
indexed here:
https://www.cbttape.org/xephon/xephonm/%24%24index.txt

   Since you are looking for a 1987 article, CBT files 814, 830 and 836
will be your best bet.

Allan

On Sun, Oct 2, 2022 at 10:11 AM esst...@juno.com  wrote:

> Sorry for the confusion
> I mean the Publication MVS UPDATE from October 1987
>
> .
> -- Original Message --
> From: Seymour J Metz 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: MVS Update
> Date: Sun, 2 Oct 2022 14:03:58 +
>
> I'm not sure what you mean by MVS Update. If you mean the
> IPOUPDTE/CPPUPDTE program, several files, e.g., 039, 244, 352, at
> cbttape.org contain modified versions.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of esst...@juno.com [esst...@juno.com]
> Sent: Sunday, October 2, 2022 9:40 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: MVS Update
>
> .
>  Hello
>
> Does anyone know the exact url for an old version of MVS Update
> I  have been unsuccessful in locating MVS Update, October 1987
> .
> Paul
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: SG24-2557 'System/390 MVS Parallel Sysplex Batch Performance' .pdf?

[allan winston]

Michael,

   Fortunately, I downloaded that redbook years ago, before it was
withdrawn from the redbook website.

   At one point, I supplied my copy to one of the authors!

It was my bible for tuning LSR buffer pools.

 I would be happy to send you a copy.

   Allan

On Thu, Jun 30, 2022 at 8:44 PM Michael Watkins <
032966e74d0f-dmarc-requ...@listserv.ua.edu> wrote:

> Does anyone have a .pdf of an old IBM redbook called 'System/390 MVS
> Parallel Sysplex Batch Performance' (SG24-2557) that they'd be willing to
> share?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: SLIP IF not working

[allan winston]

Robin,

   Since you said " I made a transaction that drove MOD1", this brings up
the question of whether or not this is a CICS region.

   I ran into this problem around 20 years ago.  Because CICS uses a
customized loader in order to maintain multithreading, PVTMOD did not work.
I forced the module into a fixed location in memory using the "CORE=LOAD"
function of INTERTEST, located the starting address, added the desired
offset, and then used the RANGE parameter instead of the PVTMOD parameter.

 Allan

On Tue, Jun 7, 2022 at 9:19 AM Robin Atwood  wrote:

> I wanted to get a dump of my server when the instruction at 001234 in
> module
> MOD1 gets executed, so I entered:
>
>
>
> SLIP SET,IF,J=SRV1,PVTMOD=(MOD1,001234),ID=SLP1,END
>
>
>
> I made a transaction that drove MOD1 but no dump was taken. So, OK, the
> offset maybe incorrect (there are lots of csects in MOD1) and I adjusted
> the
> offset, but to no avail. So just to see if the trap worked at all, I
> entered:
>
>
>
> SLIP SET,IF,J=SRV1,PVTMOD=(MOD1),ID=SLP1,END
>
>
>
> but still no dump. So I must be missing something basic; I was recently
> doing a lot of SLIP SA traps and didn't have this
>
> trouble. MOD1 is definitely in memory at the time the SLIP command is
> issued. Any advice much appreciated.
>
>
>
> Thanks
>
> Robin
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: IBM BLSR subsystem

[allan winston]

Building upon Mark and Peter's replies...

Having retired in 2005, I can’t be absolutely certain, but it is highly
likely that it is still supported, as I am finding reference to Batch LSR
when searching z/OS 2.5 manuals.



If you have MXG in your shop, potential candidates for batch LSR can be
found by running the ANALBLSR program, referring to the documentation in
member ADOCBLSR.  In effect, this will find candidate jobs where the VSAM
access is random instead of sequential.  You do not want to use LSR when
the VSAM file is accessed sequentially.



To some extent, it can be argued that Batch LSR has been superseded by
facilities within DFSMS.

System Managed Buffering(SMB) will implement LSR if all the DFSMS
constructs are in place and Direct Optimized has been chosen:

https://www.lascon.co.uk/VSAM-System-Buffers.php







For the non-DFSMS case, there are also 3rd party software products that can
be used to alter batch programs to use LSR instead of the default NSR
mode.  I was in a shop that used the Data Optimizer component of the BMC
Mainview Batch Optimizer for that purpose.  Going this route was simpler
than modifying a large number of catalogued procedures.



Note that in the rare case that you are using LSR, rather than the more
modern RLS, within CICS that you can choose specific buffer sizes for the
index and data buffer pools using Resource Definition Online.  Do not let
your heavily accessed files default to buffer pool 1, where an inferior
algorithm will be used to choose buffer assignments.



There is a very interesting GTF trace, F61,that can give you additional
insight into the random access pattern of your VSAM file accesses – both
batch and CICS.   There was a package from MKTTOOLS called VLBPAA, that was
based on the F61 GTF trace which I used extensively for gaining insight
into optimizing buffer assignments.  No one seems to have been able to
obtain this product from IBM for the past 20 years.  The results did become
slightly inaccurate with the introduction of extended format datasets which
modified the meaning of one of the fields within the GTF trace.



The use of VLBPAA and the layout of the F61 GTF trace was documented in a
1995 Redbook, SG24-2557 System/390 MVS Parallel Sysplex Batch Performance.
Additionally, that manual shows an ICETOOL job stream that can perform a
rudimentary analysis.  That book has been removed from the Redbooks web
site – fortunately I downloaded a copy before it was removed.  I can send
my copy to anyone who would like a copy.



A couple of recommendations from my experience:

(a)Always use separate pools for the data and index.  This becomes
especially important when the index and data components have the same CI
size. For that case, the data buffers are likely to wash out the index
buffers.

(b)   If it is practical to choose enough index buffers to hold the entire
index component, then do so.



 Allan


On Mon, May 16, 2022 at 10:36 AM Pommier, Rex 
wrote:

> Hi list,
>
> Is the BLSR subsystem (batch local shared resources) still a
> viable/valuable thing or has it been replaced by something
> bigger/better/faster?  I seem to be stuck in the  mid-90s because the most
> current documentation I can find on it is from MVS/ESA 5.1 dated 1994.  Is
> there more current documentation on how to use it and how it works?  Has it
> been replaced and deprecated?  I just had a developer use it last week and
> experienced a 40+ reduction in I/Os but I wanted to read up on its
> limitations - especially around using it on a shared VSAM dataset.  However
> I can't find anything newer than 25+ years old.   I did multiple internet
> searches which is where I found the ESA manual.  I checked the knowledge
> center and my own z/OS 2.2 and 2.4 collections all to no avail.
>
> Thanks,
>
> Rex
>
> --
> The information contained in this message is confidential, protected from
> disclosure and may be legally privileged. If the reader of this message is
> not the intended recipient or an employee or agent responsible for
> delivering this message to the intended recipient, you are hereby notified
> that any disclosure, distribution, copying, or any action taken or action
> omitted in reliance on it, is strictly prohibited and may be unlawful. If
> you have received this communication in error, please notify us immediately
> by replying to this message and destroy the material in its entirety,
> whether in electronic or hard copy format. Thank you.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: PL/I question

[allan winston]

>From 1970 to 1972, I was in a shop that made the transition from PL/I F to
the PL/I optimizing compiler. I would frequently use the LIST compiler
option to look at the machine code generated and found that the PL/I F
compiler generated quite poor code, frequently having to make a library
call just to implement the SUBSTR function. By contrast, the PL/I
optimizing compiler generated very good machine code.

A big difference between the PL/I optimizing compiler and the COBOL
compilers was that to execute PL/I  load modules required a license fee for
the PL/I  runtime (transient library). COBOL did not have a similar
requirement. I ran into this when I later worked in level 2 support for
CA-NETMAN, which was 80% written in PL/I. Our customers would need a
license for the transient library, but would only need a license for the
compiler if they additionally chose to write CA-NETMAN exits in the PL/I
language.

On Fri, Mar 25, 2022, 9:56 PM Jay Maynard  wrote:

> Oh, not at all. At least in the 80s, all of the nice things were separately
> charged program products, and the PL/I Optimizer was definitely in that
> category. You could use the PL/I F compiler from MVT if you wanted and
> could get your hands on a copy, though, at no charge.
>
> On Fri, Mar 25, 2022 at 8:32 PM Bob Bridges  wrote:
>
> > License fee?  I always assumed PL/I sort of came with the OS.  I didn't
> > think it'd be any extra.
> >
> > ---
> > Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
> >
> > /* You've never been lost until you've been lost at Mach 3.  -Paul F
> > Crickmore, test pilot */
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf
> > Of CM Poncelet
> > Sent: Friday, March 25, 2022 20:59
> >
> > AFAIK The reason PL/I was not 'more popular' was its high license fee.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
> --
> Jay Maynard
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: SMF data - Writing

[allan winston]

THE SMFSCRUB utility described here:
https://watsonwalker.com/software/free-tools/
looks like it will be very useful, as it goes into additional details
regarding subtypes.beyond what is reported during the offload program.

Later in the link there is also another program to report on SMF types, but
it has MXG as a prerequisite, which might not be installed in your shop.

 Allan

On Tue, Mar 15, 2022 at 12:24 PM Rich Smrcina 
wrote:

> Do you dump the files? The dump report will give you the record counts.
>
> Rich Smrcina
> Sr. Systems Engineer
>
> Velocity Software Inc.
> Main: (650) 964-8867
> Main: (877) 964-8867
> r...@velocitysoftware.com 
>
> > On Mar 15, 2022, at 11:16 AM, Peter  wrote:
> >
> > Hello
> >
> > In last few days our SMF man dataset is getting filled quickly and
> usually
> > our SMF man datasets (all three fills up) gets filled in 2-3 days.
> >
> > Is there a way to track who is writing the data frequently ?
> >
> > Peter
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: MVS PURGE command

[allan winston]

Looking at
http://www.bitsavers.org/pdf/ibm/370/OS_VS2/Release_3.7_1977/GC38-0229-1_OS_VS2_MVS_System_Commands_Rel_3.7_Jul78.pdf

pages 22 and 207 mention the PURGE command in the context of the 3850,
referencing an operator's manual for that device.

 Allan

On Thu, Feb 3, 2022 at 1:58 PM Charles Mills  wrote:

> FWIW I am looking at OS/360 Release 21 Operator's Reference from 1972 on
> BitSavers.
>
> http://bitsavers.informatik.uni-stuttgart.de/pdf/ibm/360/os/R21.0_Mar72/GC28-6691-3_OS_Operator_Reference_Release_21_Mar72.pdf
>
> There is no PURGE command listed.
>
> Charles
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Paul Gilmartin
> Sent: Thursday, February 3, 2022 9:17 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: MVS PURGE command
>
> On Thu, 3 Feb 2022 17:08:16 +0100, Radoslaw Skorupka wrote:
>
> >I just found found the following OPERCMDS profile: MVS.PURGE.MSS
> >Current manual says it is for PURGE command. However another current
> >manual does not document such command.
> >Note, it is not JES2 command.
> >
> >Q: what is it? Is it something related to IBM 3850 MSS?
> >
> Not to be confused with the "stoP" command which I have heard some
> operators pronounce "Purge".
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: SMF119 - Subtype 20 and Subtype 21

[allan winston]

A  few additional CBT contributions that may be useful:

File 600 formats types 118 and 119.  Note that it is written in C.

File 134 includes the REVIEW program which is a TSO command processor to
view sequential files.  When viewing SMF files, one uses the subcommand
'SMF ON" to trigger SMF formatting.  While it is unlikely to already
contain processing of type 119 records, it is written in ALC and you could
add the logic for type 119.

  Allan

On Tue, Dec 28, 2021 at 10:09 AM Joe Monk  wrote:

> Have a look at file 523 on the CBTTAPE. It is a generalized SMF record
> processor, that you could probably use to extract the records and then
> report on them.
>
> //* S  M  F  S  L  C  T *
>  FILE 523
> //* *
>  FILE 523
> //*   This program will read SMF data (from the MAN *
>  FILE 523
> //*  datasets or output from IFASMFDP), and will select *
>  FILE 523
> //*  records according to user specified criteria.  *
>  FILE 523
> //*  Records can be selected by date and time, by record*
>  FILE 523
> //*  type (and /or subtype), by Jobname, or by data at an   *
>  FILE 523
> //*  offset within the record. Records must meet date/time  *
>  FILE 523
> //*  and record type criteria before being eligible for *
>  FILE 523
> //*  selection, as determined by Jobname and/or data*
>  FILE 523
> //*  specifications.*
>  FILE 523
> //* *
>  FILE 523
> //*   By default, any records selected from the input   *
>  FILE 523
> //*  will be printed to SYSPRINT, unless 'PRINT=NO' is  *
>  FILE 523
> //*  specified in the SYSIN control cards. If SYSUT2 is *
>  FILE 523
> //*  present, the selected input records will also be   *
>  FILE 523
> //*  written to it. *
>  FILE 523
> //* *
>  FILE 523
> //*   Multiple output files with different selection*
>  FILE 523
> //*  criteria can be produced in one run of SMFSLCT. The*
>  FILE 523
> //*  output DDNames and selection criteria are specified*
>  FILE 523
> //*  in the control cards in SYSIN. *
>  FILE 523
> //* *
>  FILE 523
> //*   Two user-written exits can be used with SMFSLCT - *
>  FILE 523
> //*  the first is given control after an SMF record is  *
>  FILE 523
> //*  read, and the second after an SMF record has been  *
>  FILE 523
> //*  selected.  *
>  FILE 523
> //* *
>  FILE 523
> //*  Input: *
>  FILE 523
> //*  SYSUT1   - SMF dataset - either the output from*
>  FILE 523
> //* IFASMFDP or one of the SYS1.MAN *
>  FILE 523
> //* datasets. If this DDName is not *
>  FILE 523
> //* allocated, it will be dynamically   *
>  FILE 523
> //* allocated to the active SMF dataset.*
>  FILE 523
> //* *
>  FILE 523
> //*  SYSIN- Control cards (see below).  *
>  FILE 523
> //* *
>  FILE 523
> //*  Output:*
>  FILE 523
> //*  SYSPRINT - Error messages, selected SMF records.   *
>  FILE 523
> //*  SYSUT2   - optional, selected SMF records. *
>  FILE 523
> //* *
>  FILE 523
> //*  Attributes:*
>  FILE 523
> //*  Re-entrant, Reuseable, Refreshable, Not Authorized,*
>  FILE 523
> //*  AMODE(31), RMODE(ANY)  *
>  FILE 523
>
>
> Joe
>
> On Tue, Dec 28, 2021 at 12:16 AM Jake Anderson 
> wrote:
>
> > Hello
> >
> > Is there a freeware or any sample REXX which can produce a human readable
> > output to understand any IP tied up to a VTAM(LU) by reading the SMF
> > dataset. We don't have SAS or MXG in our shop.
> >
> > Any pointers would be appreciated.
> >
> > Jake
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> 

Re: IBM 6250 BPI tape drive

[allan winston]

I notice that there was also a discussion on this topic this past summer:

https://groups.google.com/g/bit.listserv.ibm-main/c/AOlRa0qxY60


On Sun, Dec 5, 2021 at 9:14 AM Mike Schwab  wrote:

> Try over at https://hercules-390.groups.io/g/group .
>
> On Sun, Dec 5, 2021 at 2:10 PM AbsKerneels
>  wrote:
> >
> > Hi,
> > >
> > > Has anybody have access to a 6250 BPI tape drive.
> > >
> > > I have an old tape with lots of user written mainframe source code
> > > that I want to get back into accessible digital form.
> > >
> > > https://www.youtube.com/watch?v=dR5GN2aPsyY
> > >
> > > Anton
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
> --
> Mike A Schwab, Springfield IL USA
> Where do Forest Rangers go to get away from it all?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: [EXTERNAL] Re: Mainframe Modernization

[allan winston]

Ed,

   I stand corrected.  Thanks for the link to https://ibmdocs.pocnet.net/,
which I was previously unaware of.

   About a week ago, I was looking for BatchPipes manuals and had only
found the main reference manual.  Now
I have added the other manuals to my collection.

  Allan

On Thu, Oct 21, 2021 at 12:35 PM Ed Jaffe 
wrote:

> On 10/21/2021 9:16 AM, allan winston wrote:
> > When I Google "TSO PIPE", I found that it is a command within Netview.
> > BatchPipes is a completely different program product.
>
> Google Schmoogle...
>
> The message id shown in my example (BPW00256I) is documented in Appendix
> C of IBM BatchPipes OS/390 V2R1 BatchPipeWorks Users Guide:
> https://ibmdocs.pocnet.net/SA22-7457-00.pdf
>
>   READY
> pipe
>   BPW00256I Enter a pipeline specification
>   READY
>
> --
> Phoenix Software International
> Edward E. Jaffe
> 831 Parkview Drive North
> El Segundo, CA 90245
> https://www.phoenixsoftware.com/
>
>
>
> 
> This e-mail message, including any attachments, appended messages and the
> information contained therein, is for the sole use of the intended
> recipient(s). If you are not an intended recipient or have otherwise
> received this email message in error, any use, dissemination, distribution,
> review, storage or copying of this e-mail message and the information
> contained therein is strictly prohibited. If you are not an intended
> recipient, please contact the sender by reply e-mail and destroy all copies
> of this email message and do not otherwise utilize or retain this email
> message or any or all of the information contained therein. Although this
> email message and any attachments or appended messages are believed to be
> free of any virus or other defect that might affect any computer system
> into
> which it is received and opened, it is the responsibility of the recipient
> to ensure that it is virus free and no responsibility is accepted by the
> sender for any loss or damage arising in any way from its opening or use.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: [EXTERNAL] Re: Mainframe Modernization

[allan winston]

When I Google "TSO PIPE", I found that it is a command within Netview.
BatchPipes is a completely different program product.

On Thu, Oct 21, 2021 at 11:59 AM Ed Jaffe 
wrote:

> On 10/21/2021 8:18 AM, Nash, Jonathan S. wrote:
> > ... I just tried TSO PIPE and it worked
>
>   READY
> pipe
>   BPW00256I Enter a pipeline specification
>   READY
>
> --
> Phoenix Software International
> Edward E. Jaffe
> 831 Parkview Drive North
> El Segundo, CA 90245
> https://www.phoenixsoftware.com/
>
>
>
> 
> This e-mail message, including any attachments, appended messages and the
> information contained therein, is for the sole use of the intended
> recipient(s). If you are not an intended recipient or have otherwise
> received this email message in error, any use, dissemination, distribution,
> review, storage or copying of this e-mail message and the information
> contained therein is strictly prohibited. If you are not an intended
> recipient, please contact the sender by reply e-mail and destroy all copies
> of this email message and do not otherwise utilize or retain this email
> message or any or all of the information contained therein. Although this
> email message and any attachments or appended messages are believed to be
> free of any virus or other defect that might affect any computer system
> into
> which it is received and opened, it is the responsibility of the recipient
> to ensure that it is virus free and no responsibility is accepted by the
> sender for any loss or damage arising in any way from its opening or use.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Vector examples?

[allan winston]

Checking over presentations I have previously downloaded, I found:

A 3-part tutorial beginning here:
http://z-assembler.blogspot.com/2019/10/vector-instructions-1.html

Share presentation 16897 in SHARE Seattle 2015  by Jonathan Bradbury and
Peter Relson
titled "z13 Vector Extension Facility (SIMD)".



On Mon, Oct 18, 2021 at 5:58 PM Phil Smith III  wrote:

> I'm doing some crude experimentation with some vector instructions. I
> haven't found any samples yet; this seems like it might should work:
>
>   VL1,WORK1
>
> where WORK1 is a doubleword-aligned value, but it program checks with a
> data
> exception. So obviously I'm confused. Anyone grok how these are supposed to
> work? I've looked at PofOp and it's probably there somewhere, but I didn't
> find it. Too many Vwhatever instructions!
>
>
>
> Thanks in advance for any pointers.
>
>
>
> ...phsiii
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: VSAM RLS False Contention

[allan winston]

While I never worked with RLS, I found this issue to be an interesting one
to research since I performed
quite a bit of CICS LSR tuning 20 years ago.

>From what I have found in the main z/OS manuals and Redbooks, the lock
structure needs to be enlarged.

Additionally, if the MAXSYSTEM parameter was set higher than it needed to
be, that can cause unnecessary doubling
of the size of the cache entries.  The doubling occurs when you exceed 7
and then when you exceed 23.

Since the lock table is used by all clusters participating in RLS, I would
not expect any SMF record to be attributing the false
contention to a specific cluster - it is just an expected side-effect of
hashing.

Conceivably, if there are bottlenecks in the CICS transactions such that
the locks are being held longer than in the past,
that could be contributing to the false contentions, as the hash table
entry is being released more slowly.

In the rare event that there are any VSAM clusters defined to RLS that are
not ever shared, you could consider changing
those clusters back to LSR and perform manual tuning of their pools,
thereby reducing the stress on the lock table.
However, there are application subtleties in doing so - record-level
locking in the RLS case versus control-interval locking in the LSR case.

Allan


On Tue, Oct 5, 2021 at 5:17 PM Crawford, Robert C. <
01feadb2c2d2-dmarc-requ...@listserv.ua.edu> wrote:

> Off and on we VSAM RLS false contention plateaus going over IBM's
> recommended .5% rate.  We don't see any kind of triggering behavior in CICS
> or the CICS application.
>
> I would like to at least see the datasets causing the false contention but
> all the false contention buckets in the RMF type 42 subtype 16 records are
> zero.  The true contention buckets have values.
>
> It's my understanding the subtype 16 are supposed to have dataset level
> information.  I specified several dataset name levels in RMF VSAMRLS
> options.  I also see the same dataset levels in SMS display MONDS commands.
>
> Is it possible I'm missing something that causes DFSSMS to write dataset
> level false contention data?  Am I looking in the wrong place?
>
> Thanks.
>
> Robert Crawford
> Mainframe Management
> United Services Automobile Association
> (210) 913-3822
>
> "Moy glaz! YA ne dolzhen dobavlyat' v nego puding!"
> - Tolstoy
> Please send requests to mainframe management through our front door at
> go/mfmfrontdoor
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Seymour J Metz
> Sent: Tuesday, October 5, 2021 3:33 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: EXTERNAL: Re: PL/I vs. JCL
>
> And before that MVS-OE., with MVS before Open.
>
>
> --
> Shmuel (Seymour J.) Metz
>
> https://urldefense.com/v3/__http://mason.gmu.edu/*smetz3__;fg!!GryZGb6B1VCs0SfC!TBwvJ8AO8e9VuDJE7lIsISBnAl6KAhctOQOxm3s7DJUmS0PMKUDPz75eQK5LMQqR2TA$
>
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of David Spiegel 
> Sent: Tuesday, October 5, 2021 1:37 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: PL/I vs. JCL
>
> Maybe they should've left it as "Open MVS"? (OS/390)
>
> On 2021-10-05 13:08, Tom Brennan wrote:
> > I always thought IBM's position on that was pretty silly.  If you make
> > up a new three word name, expect it to quickly be turned into an
> > acronym.  If they didn't want us to reuse an existing little-known
> > acronym they should have named it something else.
> >
> > On 10/5/2021 9:56 AM, Seymour J Metz wrote:
> >>>   USS has always meant Unix System Services.
> >>
> >>
> >> Not unless you have a time machine; Unformatted System Services dates
> >> to the 1970s. Further, the last post here from IBM on the issue said
> >> that USS was not an approved abbreviation for Unix System Services.
> >>
> >> --
> >> Shmuel (Seymour J.) Metz
> >> https://urldefense.com/v3/__https://na01.safelinks.protection.outlook
> >> .com/?url=http*3A*2F*2Fmason.gmu.edu*2F*smetz3data=04*7C01*7C*7C
> >> 66d0453903554718720608d98822bd8d*7C84df9e7fe9f640afb435*7
> >> C1*7C0*7C637690505140660718*7CUnknown*7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwM
> >> DAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0*3D*7C1000sdata=Lx
> >> w1EM03nZsemipAC1ktZCbgKrL*2BedD7*2BDDlG*2Fiwn*2B8*3Dreserved=0__
> >> ;JSUlJX4lJSUlJSUlJSUlJSUlJSUl!!GryZGb6B1VCs0SfC!TBwvJ8AO8e9VuDJE7lIsI
> >> SBnAl6KAhctOQOxm3s7DJUmS0PMKUDPz75eQK5LiSU-R24$
> >>
> >>
> >>
> >> 
> >> From: IBM Mainframe Discussion List  on
> >> behalf of Joe Monk 
> >> Sent: Monday, October 4, 2021 9:11 PM
> >> To: IBM-MAIN@LISTSERV.UA.EDU
> >> Subject: Re: PL/I vs. JCL
> >>
> >> USS is a VTAM term for Unformatted System Services.
> >>
> >> USS has always meant Unix System Services.
> >>
> >> Joe
> >>
> >> On Mon, Oct 4, 2021 at 7:30 PM Mike Schwab 
> >> wrote:
> >>
> >>> U.S.S.  Unformated System Services, until Unix System Services tried
> >>> to take it over.
> >>>
> >>> On Tue, Oct 5, 2021 at 1:24 AM Paul 

Re: Linkling an object from VSE to be used in z/OS

[allan winston]

Attila,

   I agree with you that there is almost no chance of a load module
generated from this object deck operating correctly.

   z/OS and VSE use SVCs differently.  For performing I/O, DCBs and DTFs
are radically different.  The VSE COBOL compiler may be
calling library routines that don't exist in the z/OS environment.

   If this critical software and you have the big bucks, you could license
DUO:
http://www.lookupmainframesoftware.com/soft_detail/dispsoft/546
if it is still marketed!  The above link is 9 years old.





On Thu, Oct 7, 2021 at 3:55 AM Attila Fogarasi  wrote:

> MVS format object decks always have x'02' in column 1 and not "W", so that
> would be a problem.  You would also need to link with an appropriate Cobol
> runtime library, and those would have been EOL circa 30 years ago.  Worst
> case you might have to disassemble and recreate this module, eliminating
> the VSE dependencies (some are usually unavoidable).
>
> On Thu, Oct 7, 2021 at 6:22 PM Gadi Ben-Avi  wrote:
>
> > Hi,
> > I was asked to attempt to link a object deck from VSE in z/OS.
> > The program is a COBOL2 program, but the source has been lost.
> >
> > The first few lines of the object deck are:
> > W PHASE JKHIVX52,S+X'00'
> > W MODE AMODE(31),RMODE(ANY)
> > W.ESD  ..  ..JKHIVX52.§.©..÷0
> >
> > After that there are many (A little over 12,000) lines that start with
> > W.TXT
> > Next there are lines that start with W.RLD and a final like that starts
> > with W.END.
> >
> > The JCL I used was
> > //LKED EXEC  PGM=IEWL,
> > // PARM='LIST,XREF,NOLET,MAP',
> > // REGION=2M
> > //SYSLIN   DD DSN=N623.PMKA.KPMAT.JKHIVX52,DISP=SHR
> > //SYSLMOD  DD  DSNAME=V110GAD.LOAD(JKHIVX52),DISP=SHR
> > //SYSUT1   DD  UNIT=3390,SPACE=(CYL,(1,1))
> > //SYSPRINT DD  SYSOUT=*
> > //SYSINDD  *
> >INCLUDE SYSLIN(JKHIVX52)
> >NAME JKHIVX52(R)
> >
> > I am doing something wrong?
> > Can this deck be linked into a usable z/OS load module?
> >
> > Thanks
> >
> > Gadi
> >
> >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN