Program Directory

2022-09-30 Thread Steve Thompson
Is there a way to get a program directory as a fill in the blanks 
copy?


Many years ago at IBM I had access to such at what was called STL.

I'm making suggestions to a client I have about a product they 
have.  And I think IBM's format and style would benefit them.


[I've gone solo doing consulting work]
--

Regards, Steve Thompson

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


Re: COBOL - z/OS 2.1 vs 2.4

2022-09-30 Thread Steve Thompson

Did someone move them from a PDS to a PDSE?

On 9/30/22 09:14, Crusty Old Guy wrote:

We have a client with loadmods that are ancient.  Some are very ancient.  All 
of those loadmods are currently running under z/OS 2.1.
Under z/OS 2.4, some of these loadmods are abending.  Others are creating 
incorrect output.

What could account for this behavior?  What has changed between 2.1 & 2.4?

Regards,
Crusty Old Guy

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


--
Regards,
Steve Thompson

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


Re: DFSORT / ICETOOL SPLICE function

2022-09-30 Thread Andreas von Imhof
Hi Sri,
It works! Thank you so much!

You made the statements very simple (eazy peazy). Any fool (just like me) can 
use it.

The saving:
2.09 million input records

REXX  - 9 minutes clock time, 6 minutes CPU (IBM Z15 8561-723)
DFSORT - 9 seconds clock time, 0.78 seconds CPU

Unbelievable!

Kind regards, Andreas

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


Re: DFSORT / ICETOOL SPLICE function

2022-09-30 Thread Sri h Kolusu
>> There are many occurrences of "CURRENT PLAN OPERATION", and I need a record 
>> for each. Could you please help with the last bit?

Andreas,

That is quite simple. Just remove the INCLUDE on OUTFIL.  Something like this ( 
I also missed setting the LRECL to 80 which I added now.

  OUTFIL REMOVECC,NODETAIL,BUILD=(80X),
  SECTIONS=(081,08,
  TRAILER3=(090,10,100,10,110,10))

Thanks,
Kolusu
DFSORT Development
IBM Corporation



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


Re: DFSORT / ICETOOL SPLICE function

2022-09-30 Thread Andreas von Imhof
Hi Sri
This is great! Thank you!
it's almost there. It only processes the 1st occurrence of "CURRENT PLAN 
OPERATION", and outputs 1 record correctly. 
There are many occurrences of "CURRENT PLAN OPERATION", and I need a record for 
each. Could you please help with the last bit?
Kind regards, Andreas

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


Re: SYSPLEX / SYSNAME / SMFID stability

2022-09-30 Thread Paul Gorlinsky
BTW you and GP were my best mentors of that time  Thanks

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


Re: SYSPLEX / SYSNAME / SMFID stability

2022-09-30 Thread Seymour J Metz
Every time my boss asked me if we were bringing too many FDRSAR tapes, I told 
him that he will never hear me say that there are too many, only that there are 
not enough. The ta he pulled were generally actual backup tapes. If our 
procedures for recovering from logs weren't documented well enough to use them 
during D/R, then we wanted to know before the balloon went up.

Yes, I'm still in Annandale.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gorlinsky [p...@atsmigrations.com]
Sent: Friday, September 30, 2022 10:17 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYSPLEX / SYSNAME / SMFID stability

You can not believe how many "TAPES" critical to the success of a DR test have 
been lost or forgotten. The major one, the standalone IPL utility tape.

BTW the business that I am in today is DR/BC and Virtual Tape Appliance. My 
z/Appliance device emulates FICON attached 3480, 3490 and 3590 tapes drives and 
has an integrate mirroring facility for up to 8 locations. Why eight? One 
in-house, cloud like dropbox, AWS, Azure, etc., duplicate company owned data 
center, or hosted services ( more than one if needed ). Check out 
https://nam11.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.atsmigrations.com%2Fdata=05%7C01%7Csmetz3%40gmu.edu%7C76d91da3083248e0513b08daa2ee91ea%7C9e857255df574c47a0c00546460380cb%7C0%7C0%7C638001442777804317%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7Csdata=yOM0NVRBqjmYA%2FupHPEae4qRnLb1itLetvxmDfAidxI%3Dreserved=0
 for more information.

Are you still in the DC area?

Take care,

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


Re: COBOL - z/OS 2.1 vs 2.4

2022-09-30 Thread Seymour J Metz
Why? Both the linkage editor and the binder accept input from a load module.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gorlinsky [p...@atsmigrations.com]
Sent: Friday, September 30, 2022 10:19 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: COBOL - z/OS 2.1 vs 2.4

I wonder if the Delink program on CBT-TAPE could be used to pull the code apart 
and rebind it?

--
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: DFSORT / ICETOOL SPLICE function

2022-09-30 Thread Sri h Kolusu
>> Desired output data: Built from APPLICATION ID / JOB NAME / WORKSTATION NAME

Andreas,

As Massimo mentioned, it is quite simple using WHEN=GROUP.  Here are Untested 
Control cards that will give you the desired results

//SYSINDD *
  OPTION COPY
  INREC IFTHEN=(WHEN=GROUP,
   BEGIN=(033,12,CH,EQ,C'CURRENT PLAN'),
PUSH=(081:ID=8)),
IFTHEN=(WHEN=(006,14,CH,EQ,C'APPLICATION ID'),
 OVERLAY=(090:40,10)),
IFTHEN=(WHEN=(006,08,CH,EQ,C'JOB NAME'),
 OVERLAY=(100:40,10)),
IFTHEN=(WHEN=(006,16,CH,EQ,C'WORKSTATION NAME'),
 OVERLAY=(110:40,10))

  OUTREC IFTHEN=(WHEN=GROUP,
   BEGIN=(090,10,CH,GT,C' '),
PUSH=(090:090,10)),
 IFTHEN=(WHEN=GROUP,
   BEGIN=(100,10,CH,GT,C' '),
PUSH=(100:100,10)),
 IFTHEN=(WHEN=GROUP,
   BEGIN=(110,10,CH,GT,C' '),
PUSH=(110:110,10))

  OUTFIL INCLUDE=(081,08,ZD,EQ,1),
  REMOVECC,NODETAIL,
  SECTIONS=(081,08,
  TRAILER3=(090,10,100,10,110,10))
/*

Thanks,
Kolusu
DFSORT Development
IBM Corporation



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


Re: COBOL - z/OS 2.1 vs 2.4

2022-09-30 Thread Paul Gorlinsky
I wonder if the Delink program on CBT-TAPE could be used to pull the code apart 
and rebind it?

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


Re: SYSPLEX / SYSNAME / SMFID stability

2022-09-30 Thread Paul Gorlinsky
You can not believe how many "TAPES" critical to the success of a DR test have 
been lost or forgotten. The major one, the standalone IPL utility tape. 

BTW the business that I am in today is DR/BC and Virtual Tape Appliance. My 
z/Appliance device emulates FICON attached 3480, 3490 and 3590 tapes drives and 
has an integrate mirroring facility for up to 8 locations. Why eight? One 
in-house, cloud like dropbox, AWS, Azure, etc., duplicate company owned data 
center, or hosted services ( more than one if needed ). Check out 
https://www.atsmigrations.com for more information.

Are you still in the DC area? 

Take care,

Paul

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


Re: COBOL - z/OS 2.1 vs 2.4

2022-09-30 Thread Seymour J Metz
Overlay? Scatter load? I thought that those were already dead, but still worth 
checking.

What are the ABEND details, including reason code and message?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Crusty Old Guy [devoutoccam...@gmail.com]
Sent: Friday, September 30, 2022 9:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: COBOL - z/OS 2.1 vs 2.4

We have a client with loadmods that are ancient.  Some are very ancient.  All 
of those loadmods are currently running under z/OS 2.1.
Under z/OS 2.4, some of these loadmods are abending.  Others are creating 
incorrect output.

What could account for this behavior?  What has changed between 2.1 & 2.4?

Regards,
Crusty Old Guy

--
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: SYSPLEX / SYSNAME / SMFID stability

2022-09-30 Thread Seymour J Metz
That would have been a decision way above my pay grade.. My manager and his 
government counterpart were there at the time, and my responsibilities were on 
the technical side. I asked SG to configure a virtual machine with our home 
CPUID and continued the test.

We certainly let the vendor know that it was unacceptable; if the government 
took legal action I was not informed (I would have celebrated.)

BTW, that was less effort than the tapes that our boss decreed lost and the 
personnel that our boss decreed dead, which I considered not only a fair part 
of the test but absolutely essential. In a real disaster, all bets are off, and 
if your recovery plan doesn't cover contingencies then you're SOL.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gorlinsky [p...@atsmigrations.com]
Sent: Friday, September 30, 2022 9:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYSPLEX / SYSNAME / SMFID stability

Hello Seymour,

The best thing to do is to turn this over to the lawyers. It is a breach of 
contract and the vendor needs to be held accountable.

I have done two DR tests in the past thirty days and several of the vendors 
DONT require and immediately Key change. However, one vendor does and the 
customer has several products from them.

Ask the real question... what would have happened in a LIVE situation? This is 
why the lawyers need to be aware of the potential damage they can do to your 
business. A DR test is also a test of the VENDORS ability to provide their 
contractual obligations.

--
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: DFSORT / ICETOOL SPLICE function

2022-09-30 Thread Andreas von Imhof
Hi Max

This was my miserable attempt (with various variations).
Just keep getting the very 1st and very last record merged in both //SPLCE and 
//OUT1 datasets.

* Top of Data **
+1+2+3+4+5+6+7+8
 REC RD VERSI N NUMBER  CURRENT PLAN OPERATION  0001
 Bottom of Data 

//S1EXEC  PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=* 
//IN1  DD DISP=SHR,DSN=IMHOFAV.B.SRT3
//OUT1  DD DISP=(NEW,CATLG),DSN=IMHOFAV.B.SRT3.FORMAT,   
//SPACE=(CYL,(10,10),RLSE),  
//DCB=(RECFM=FB,LRECL=80,BLKSIZE=27920)  
//SPLCEDD DISP=(NEW,CATLG),DSN=IMHOFAV.B.SRT3.SPLICE,
//SPACE=(CYL,(10,10),RLSE),  
//DCB=(RECFM=FB,LRECL=80,BLKSIZE=27920)  
//TOOLIN   DD*   
* REFORMAT THE IN1 RECORDS FOR SPLICING  
COPY FROM(IN1) TO(SPLCE) USING(CTL1) 
SPLICE FROM(SPLCE) TO(OUT1) ON(72,8,ZD) KEEPNODUPS WITHANY - 
  WITH(1,8) WITH(10,8) WITH(19,8) USING(CTL1)
/*   
//CTL1CNTL DD *  
  OPTION COPY
  INREC IFOUTLEN=80, 
IFTHEN=(WHEN=GROUP,BEGIN=(33,22,CH,EQ,C'CURRENT PLAN OPERATION'),
RECORDS=3,PUSH=(73:ID=8)),   
IFTHEN=(WHEN=(6,14,CH,EQ,C'APPLICATION ID'), 
   BUILD=(1:8,8)),   
IFTHEN=(WHEN=(6,14,CH,EQ,C'JOB NAME  '), 
   BUILD=(10:17,8)), 
IFTHEN=(WHEN=(6,17,CH,EQ,C'APPLIED RUN CYCLE'),  
   BUILD=(19:25,8))  
  OUTFIL FNAMES=SPLCE,BUILD=(1,80)   
/*

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


Re: DFSORT / ICETOOL SPLICE function

2022-09-30 Thread Massimo Biancucci
Andreas,

IFTHEN WHEN=GROUP is your best friend.
I think Sri will give you the solution in a while.
If he will not, at end of my workday I could try to provide a solution.

Best regards.
Max

Il giorno ven 30 set 2022 alle ore 15:10 Andreas von Imhof <
02ba5d449f94-dmarc-requ...@listserv.ua.edu> ha scritto:

> Hi
>
> I am trying to create 1 output record from multiple input records. Also
> the output record will be reformatted.
> I have been trying to get the ICETOOL SPLICE function to work, but alas to
> no avail.
> Please can someone help?
>
> Reason for wanting to use SORT/ICETOOL is to reduce CPU consumption
> (current REXX runs several times per day against input files with millions
> of records). Also the REXX is difficult to maintain.
> IF SORT can do this then it will be easy for the users to maintain.
>
> From the input record  I want to scan for "CURRENT PLAN OPERATION" and
> select the 1st occurrence of APPLICATION ID / JOB NAME / WORKSTATION NAME.
> The rest of the records are discarded till the next occurrence of "CURRENT
> PLAN OPERATION".
>
> Input data (output from TWS (old OPC):
> Copy and paste into a dataset (lrecl 80) will restore the alignment)
>
>
> +1+2+3+4+5+6+7+8
> 1   CURRENT PLAN OPERATION
>
> ___
>
>  APPLICATION ID   :ASC4D99A
>
>  INPUT ARRIVAL DATE   :220926
>
>  INPUT ARRIVAL TIME   :0645
>
>  OPERATION NUMBER :  10
>
>  AUTHORITY GROUP  :TEST
>
>  DESCRIPTIVE TEXT :Unl tablespacestats DBTZ
>
>  JOB NAME :C4D9910S
>
>  JOB ID   :JOB27971
>
>  WORKSTATION NAME :SONS
>
>  FORM NUMBER  :
>
>  PLANNED START DATE   :220926
>
>  PLANNED START TIME   :00064501
>
>  PLANNED END DATE :220926
>
>  PLANNED END TIME :00064502
>
>  OPERATION INPUT ARRIVAL DATE :
>
>  OPERATION INPUT ARRIVAL TIME :
>
>  OPERATION DEADLINE DATE/TIME :2209270644
>
>
>
> Desired output data:
> Built from APPLICATION ID / JOB NAME / WORKSTATION NAME
>
> ASC4D99A C4D9910S SONS
>
>
> If needed I can upload a larger version of the input file to Google drive
> (not sure I can add an attachment here).
>
> Thanks in advance and kind regards
> Andreas (aka the now useless z performance specialist)
>
> --
> 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: SYSPLEX / SYSNAME / SMFID stability

2022-09-30 Thread Paul Gorlinsky
Hello Seymour,

The best thing to do is to turn this over to the lawyers. It is a breach of 
contract and the vendor needs to be held accountable. 

I have done two DR tests in the past thirty days and several of the vendors 
DONT require and immediately Key change. However, one vendor does and the 
customer has several products from them. 

Ask the real question... what would have happened in a LIVE situation? This is 
why the lawyers need to be aware of the potential damage they can do to your 
business. A DR test is also a test of the VENDORS ability to provide their 
contractual obligations.

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


Re: COBOL - z/OS 2.1 vs 2.4

2022-09-30 Thread Paul Gorlinsky
Please be more specific. Are these BATCH or CICS? What version of COBOL or 
other compiler? There are some notes that the language environment is dropping 
off some prior versions of COBOL. CICS is another issue. IBM is requiring V6 
COBOL on the most current version of z/OS of which LE is a major component. The 
ABEND will tell all. S806? S878? S80A?

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


COBOL - z/OS 2.1 vs 2.4

2022-09-30 Thread Crusty Old Guy
We have a client with loadmods that are ancient.  Some are very ancient.  All 
of those loadmods are currently running under z/OS 2.1.
Under z/OS 2.4, some of these loadmods are abending.  Others are creating 
incorrect output.

What could account for this behavior?  What has changed between 2.1 & 2.4?

Regards,
Crusty Old Guy

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


Re: SYSPLEX / SYSNAME / SMFID stability

2022-09-30 Thread Seymour J Metz
What do you do when the key a software vendor gave you for a D/R test doesn't 
work and they don't give you a correct key within the contracted window?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Martin Packer [martin_pac...@uk.ibm.com]
Sent: Friday, September 30, 2022 4:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYSPLEX / SYSNAME / SMFID stability

“Customers do the darnedest things…” 

From: IBM Mainframe Discussion List  on behalf of Ed 
Jaffe 
Date: Thursday, 29 September 2022 at 22:57
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: [EXTERNAL] Re: SYSPLEX / SYSNAME / SMFID stability
On 9/29/2022 5:19 AM, Mark A. Brooks wrote:
> Right, I'm not aware of a UUID for a z/OS system.
> Every system in a given sysplex must have a unique name.  In that sense 
> SysplexName.SystemName might do the trick.  But ...
> Sysplex names are not necessarily unique -- test sysplex or DR site could be 
> using the same name.

In our case, the D/R sysplex *and* system names are all the same.

The only way we can tell them apart is by CPC Type/Serial.

We have a REXX call WHEREAMI that inspects CPC Type/Serial in the PCCA
and let's you know where you are.

Of course, serial numbers can faked under z/VM, but we don't do that...


--
Phoenix Software International
Edward E. Jaffe
831 Parkview Drive North
El Segundo, CA 90245
https://nam11.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.phoenixsoftware.com%2Fdata=05%7C01%7Csmetz3%40gmu.edu%7C74d183aacdb44615760308daa2bd633a%7C9e857255df574c47a0c00546460380cb%7C0%7C0%7C638001231574073756%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7Csdata=gYHsfajw%2BfhpEQ9Z6LbPDdmiJtkHEGJmNMU6asGH3y4%3Dreserved=0



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

Unless otherwise stated above:

IBM United Kingdom Limited
Registered in England and Wales with number 741598
Registered office: PO Box 41, North Harbour, Portsmouth, Hants. PO6 3AU


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


DFSORT / ICETOOL SPLICE function

2022-09-30 Thread Andreas von Imhof
Hi 

I am trying to create 1 output record from multiple input records. Also the 
output record will be reformatted.
I have been trying to get the ICETOOL SPLICE function to work, but alas to no 
avail.
Please can someone help?

Reason for wanting to use SORT/ICETOOL is to reduce CPU consumption (current 
REXX runs several times per day against input files with millions of records). 
Also the REXX is difficult to maintain.
IF SORT can do this then it will be easy for the users to maintain.

From the input record  I want to scan for "CURRENT PLAN OPERATION" and select 
the 1st occurrence of APPLICATION ID / JOB NAME / WORKSTATION NAME. 
The rest of the records are discarded till the next occurrence of "CURRENT PLAN 
OPERATION".

Input data (output from TWS (old OPC):
Copy and paste into a dataset (lrecl 80) will restore the alignment)

+1+2+3+4+5+6+7+8
1   CURRENT PLAN OPERATION  
___ 
 APPLICATION ID   :ASC4D99A 
 INPUT ARRIVAL DATE   :220926   
 INPUT ARRIVAL TIME   :0645 
 OPERATION NUMBER :  10 
 AUTHORITY GROUP  :TEST 
 DESCRIPTIVE TEXT :Unl tablespacestats DBTZ 
 JOB NAME :C4D9910S 
 JOB ID   :JOB27971 
 WORKSTATION NAME :SONS 
 FORM NUMBER  : 
 PLANNED START DATE   :220926   
 PLANNED START TIME   :00064501 
 PLANNED END DATE :220926   
 PLANNED END TIME :00064502 
 OPERATION INPUT ARRIVAL DATE : 
 OPERATION INPUT ARRIVAL TIME : 
 OPERATION DEADLINE DATE/TIME :2209270644   


Desired output data:
Built from APPLICATION ID / JOB NAME / WORKSTATION NAME

ASC4D99A C4D9910S SONS


If needed I can upload a larger version of the input file to Google drive (not 
sure I can add an attachment here).

Thanks in advance and kind regards
Andreas (aka the now useless z performance specialist)

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


Re: Enterprise Cobol 6.3.0, XML PARSE and zIIP usage.

2022-09-30 Thread Andrew Rowley

On 30/09/2022 7:24 pm, Massimo Biancucci wrote:

After increasing the size of XML up to 150MB then I saw a little of zIIP
usage.
Anyway, it would be interesting to know how IBM manages these thresholds.
Interesting question. It might be as simple as whether the program is 
processing XML when it is interrupted and redispatched.


The likelihood of being interrupted in XML code probably corresponds to 
the proportion of time spent processing XML, so dispatching on the zIIP 
would probably give you roughly the right amount of zIIP time even if 
you have some leakage of XML/non-XML code between zIIP and CP.


--
Andrew Rowley
Black Hill Software

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


Re: Enterprise Cobol 6.3.0, XML PARSE and zIIP usage.

2022-09-30 Thread Massimo Biancucci
Hi everybody,

you were right !

After increasing the size of XML up to 150MB then I saw a little of zIIP
usage.
Anyway, it would be interesting to know how IBM manages these thresholds.

Thanks a lot for your help.
Max

Il giorno ven 30 set 2022 alle ore 10:38 Andrew Rowley <
and...@blackhillsoftware.com> ha scritto:

> On 30/09/2022 6:15 pm, Massimo Biancucci wrote:
> > I don't know how "trivial" can be "trivial".
> > It's about 8K in bytes (lot of spaces as usual).
> > It comes from a sample I took on the web, four nesting levels eight
> fields.
> >
> > After your hint I increased the size up to 60K (more entries same style)
> > but nothing changed.
> > Is there any documentation on how big (or complicated) must be a XML to
> > fire zIIP usage ?
>
> I think we underestimate how much work can be done on modern processors.
>
> It wouldn't surprise me if the XML had to be multi-megabyte before the
> cost of switching processors was justified. it probably also depends on
> whether the CP is full speed - a slower CP probably makes it switch to a
> zIIP earlier.
>
> --
> Andrew Rowley
> Black Hill Software
>
> --
> 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: SYSPLEX / SYSNAME / SMFID stability

2022-09-30 Thread Mark A. Brooks
FYI, XCF does provide a "sysplex ID" that can be used to uniquely identify a 
sysplex for the life of the sysplex.  That could be used to distinguish between 
two different sysplexes with the same name.  A new sysplex ID is generated each 
time the sysplex starts fresh.

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


Re: Enterprise Cobol 6.3.0, XML PARSE and zIIP usage.

2022-09-30 Thread Andrew Rowley

On 30/09/2022 6:15 pm, Massimo Biancucci wrote:

I don't know how "trivial" can be "trivial".
It's about 8K in bytes (lot of spaces as usual).
It comes from a sample I took on the web, four nesting levels eight fields.

After your hint I increased the size up to 60K (more entries same style)
but nothing changed.
Is there any documentation on how big (or complicated) must be a XML to
fire zIIP usage ?


I think we underestimate how much work can be done on modern processors.

It wouldn't surprise me if the XML had to be multi-megabyte before the 
cost of switching processors was justified. it probably also depends on 
whether the CP is full speed - a slower CP probably makes it switch to a 
zIIP earlier.


--
Andrew Rowley
Black Hill Software

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


Re: SYSPLEX / SYSNAME / SMFID stability

2022-09-30 Thread Martin Packer
“Customers do the darnedest things…” 

From: IBM Mainframe Discussion List  on behalf of Ed 
Jaffe 
Date: Thursday, 29 September 2022 at 22:57
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: [EXTERNAL] Re: SYSPLEX / SYSNAME / SMFID stability
On 9/29/2022 5:19 AM, Mark A. Brooks wrote:
> Right, I'm not aware of a UUID for a z/OS system.
> Every system in a given sysplex must have a unique name.  In that sense 
> SysplexName.SystemName might do the trick.  But ...
> Sysplex names are not necessarily unique -- test sysplex or DR site could be 
> using the same name.

In our case, the D/R sysplex *and* system names are all the same.

The only way we can tell them apart is by CPC Type/Serial.

We have a REXX call WHEREAMI that inspects CPC Type/Serial in the PCCA
and let's you know where you are.

Of course, serial numbers can faked under z/VM, but we don't do that...


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

Unless otherwise stated above:

IBM United Kingdom Limited
Registered in England and Wales with number 741598
Registered office: PO Box 41, North Harbour, Portsmouth, Hants. PO6 3AU


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


Re: Enterprise Cobol 6.3.0, XML PARSE and zIIP usage.

2022-09-30 Thread Massimo Biancucci
Timothy,

I don't know how "trivial" can be "trivial".
It's about 8K in bytes (lot of spaces as usual).
It comes from a sample I took on the web, four nesting levels eight fields.

After your hint I increased the size up to 60K (more entries same style)
but nothing changed.
Is there any documentation on how big (or complicated) must be a XML to
fire zIIP usage ?

Max



Il giorno ven 30 set 2022 alle ore 07:16 Timothy Sipples 
ha scritto:

> Is the XML processing you're doing in your test program "trivial," thus
> z/OS correctly decided it wasn't worth even attempting a switch to dispatch
> the work to your zIIP engine?
>
> If my guess seems reasonable are you able to run the test with a bigger
> XML input file?
>
> — — — — —
> Timothy Sipples
> Senior Architect
> Digital Assets, Industry Solutions, and Cybersecurity
> IBM zSystems/LinuxONE, Asia-Pacific
> sipp...@sg.ibm.com
>
>
> --
> 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