Knowledge Center bugs getting creative

[Andrew Rowley]

Knowledge Center bugs are getting more creative. I found the whole TOC 
spinning today:


https://twitter.com/AndrewRowley10/status/910374514252484615

(Why CICS 3.1.0? Because that's what the Google link led to.)

--
Andrew Rowley
Black Hill Software
+61 413 302 386

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

Re: LPAR to LPAR access

[Timothy Sipples]

You can configure your CICS "File Owning Region" (FOR) in CICS TS in the
LPAR with DB2, then access that FOR from any interconnected CICS regions --
and from interconnected TXSeries, for that matter. The folks in the CICS-L
mailing list likely can provide more details if you need them. Basically,
just put the CICS programs that make DB2 calls in CICS in the DB2 LPAR,
then run whatever non-DB2 CICS programs (that call the DB2-related CICS
programs) you want in your other CICS LPAR(s). It's classic, tried and true
"TOR/AOR/FOR" separation. (As an aside, nowadays there are also "Rules
Owning Regions," "Channel Owning Regions," "Mobile Owning Regions," and
whatever other "owning" regions you want to have as architectural best
practices.)

For batch, CICS's EXCI (external call interface) works via the same path.
If you're using Java (or mixed Java) batch then you can use the JDBC Type 4
driver, to pick another example.

HiperSockets and SMC-D LPAR-to-LPAR connectivities are recommended, if you
can.

It's best if you do some careful analysis to determine whether avoiding
adding DB2 to this particular LPAR is the right approach. For "occasional"
DB2 access, it's probably OK. For more intensive DB2 access, DB2 data
sharing is likely going to perform better and be more cost efficient.


Timothy Sipples
IT Architect Executive, Industry Solutions, IBM z Systems, AP/GCG/MEA
E-Mail: 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

Eliminating duplicates (was: z/os 2.2 - help with sort/icetool)

[Peter Hunkeler]

>//TOOLCNTL DD  *
>OPTION NOEQUALS,DYNALLOC=(SYSDA,8)
>SORT FIELDS=(104,4088,A),FORMAT=CH
>SUM FIELDS=NONE
>//*


I always wondered why the function to simply eliminate duplicate records is 
hidden within the SUM function? This is awkward. Why isn't there a clear and 
straight forward keyword either on the OPTION or on the SORT statement, such as 
NODUPLICATES/DUPLICATES?


--
Peter Hunkeler




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

Re: LPAR to LPAR access

[Roger Lowe]

Judith/Jerry,
 BMC's product (Subsystem Optimizer for zEnterprise "Subzero") 
requires a BASIC or PARALLEL Sysplex environment. 

Roger

On Tue, 19 Sep 2017 23:30:13 +, Edgington, Jerry 
 wrote:

>Yes, Judith. That is correct. I missed that in your email.  However, I believe 
>the BMC tool allows you to connect CICS and maybe batch on one LPAR to DB2 on 
>another LPAR.
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>Behalf Of Nelson, Judith
>Sent: Tuesday, September 19, 2017 5:43 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: LPAR to LPAR access
>
>Hi Jerry,
>I have looked into the link to the remote database. As far as I understand 
>this is that requires a db2 instance on both LPAR's. :(
>
>Thank you,
>
>Judith Nelson
>
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>Behalf Of Nelson, Judith
>Sent: Tuesday, September 19, 2017 12:00 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: LPAR to LPAR access
>
>Thank you Jerry!
>
>Judith Nelson
>
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>Behalf Of Edgington, Jerry
>Sent: Tuesday, September 19, 2017 11:25 AM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: LPAR to LPAR access
>
>Sorry Judith,
>
>Our email system modifies the URL.
>
>I think this link should help with the setup of remote database from DB2 on 
>z/OS.
>www.ibm.com/support/knowledgecenter/en/SSEPEK_11.0.0/dshare/src/tpc/db2z_sysibmlocationsds.html,
>
>Here is the BMC tool
>www.bmc.com/it-solutions/subsystem-optimizer.html
>
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>Behalf Of Edgington, Jerry
>Sent: Tuesday, September 19, 2017 12:23 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: LPAR to LPAR access
>
>Judith,
>
>I think this link should help with the setup of remote database from DB2 on 
>z/OS.
>https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_support_knowledgecenter_en_SSEPEK-5F11.0.0_dshare_src_tpc_db2z-5Fsysibmlocationsds.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=sJBowoFLA-8ocnbEpqCKvSdFmT2s355DrFGS5qkZq7M=
>
>Here is the BMC tool
>https://urldefense.proofpoint.com/v2/url?u=http-3A__www.bmc.com_it-2Dsolutions_subsystem-2Doptimizer.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=8dcWbFRJZ5UFFIwGKMcoOv5gW9_-1ldLc-jEYbQmIgw=
>
>Jerry
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>Behalf Of Nelson, Judith
>Sent: Tuesday, September 19, 2017 11:53 AM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: LPAR to LPAR access
>
>Hi Jerry,
>You are correct with your assumption. :)
>
>If I set up the database as remote, wouldn't I still need some kind of a 
>client to connect to it?
>Could you let me know which product from BMC would do this?
>
>Thank you,
>
>Judith Nelson
>
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>Behalf Of Edgington, Jerry
>Sent: Tuesday, September 19, 2017 9:17 AM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: LPAR to LPAR access
>
>Judith,
>
>I know of a couple of ways to get batch and CICS to access a remote DB2, which 
>is what you are asking, I believe, because you don't want to setup a DB2 data 
>sharing.
>
>1) Within DB2, you can setup a database as a remote. DB2 admin should know how 
>to do this.
>2) BMC has a product that would allow CICS/Batch to connect to a remote DB2, 
>like it is locally attached
>
>
>Jerry
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>Behalf Of Nelson, Judith
>Sent: Tuesday, September 19, 2017 10:14 AM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: LPAR to LPAR access
>
>Hi,
>I am trying to find the best solution for the following problem.
>
>We have two LPARs, one of them has DB2 running, the other one hasn't. We do 
>not have a SYSPLEX.
>We now want to access DB2 data in batch and through CICS, from the LPAR that 
>doesn't have DB2 on it.
>
>For the batch side, I looked at ODBC, but I couldn't find anything how to set 
>this up from another z/OS.
>
>I have set up a simple IPIC connection to connect CICS - CICS across LPAR's. 
>The CICS's are talking. :)
>
>Does anyone have any ideas that could help me?
>
>Judith Nelson  | Senior Systems Programmer
>Sammons(r) Financial Group Member Companies One Sammons Plaza  | Sioux Falls, 
>SD 57193
>Phone: (605) 373-2321
>jnel...@sfgmembers.com
>
>
>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 

Re: z/os 2.2 - help with sort/icetool

[Sri h Kolusu]

Dave,

Thanks for prompt response.  It is always good to have your back.

Chris,

Here is an optimized JCL which will sort and also eliminate duplicate 
records in the same step. I removed your JCL sortwork datasets and chose 
Dynamic Allocation. I also the removed the unwanted DD statements.


//STEP45   EXEC PGM=ICETOOL,REGION=0M 
//TOOLMSG  DD  SYSOUT=X 
//DFSMSG   DD  SYSOUT=X 
//IN   DD  DISP=(OLD,DELETE),DSN=& 
//OUT  DD  SYSOUT=X 
//TOOLIN   DD  * 
  SORT FROM(IN) TO(OUT) USING(TOOL) 
//TOOLCNTL DD  * 
  OPTION NOEQUALS,DYNALLOC=(SYSDA,8) 
  SORT FIELDS=(104,4088,A),FORMAT=CH 
  SUM FIELDS=NONE 
//* 

Further if you have any questions please let me know

Thanks,
Kolusu
DFSORT Development
IBM Corporation

IBM Mainframe Discussion List  wrote on 
09/19/2017 04:23:08 PM:

> From: Chris Hoelscher 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/19/2017 04:23 PM
> Subject: Re: z/os 2.2 - help with sort/icetool
> Sent by: IBM Mainframe Discussion List 
> 
> My goal is to delete any dups - so getting this far was just the first 
step
> 
> Chris Hoelscher
> Technology Architect, Database Infrastructure Services
> Technology Solution Services
> 
> 123 East Main Street
> Louisville, KY 40202
> Humana.com
> (502) 476-2538 or 407-7266
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU
> ] On Behalf Of David Betten
> Sent: Tuesday, September 19, 2017 6:16 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool
> 
> Glad it worked.  Just to be clear, EQUALS is specified if you want 
> to maintain the original order of records with the same key.  With 
> NOEQUALS, records with the same key value may or may not end up in 
> the original order.  So be sure you are ok with that before going 
> with NOEQUALS.
> 
> 
> Have a nice day,
> Dave Betten
> z/OS Performance Specialist
> Cloud and Systems Performance
> IBM Corporation
> email:  bet...@us.ibm.com
> 
> 
> IBM Mainframe Discussion List  wrote on
> 09/19/2017 06:02:10 PM:
> 
> > From: Chris Hoelscher 
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Date: 09/19/2017 06:02 PM
> > Subject: Re: z/os 2.2 - help with sort/icetool Sent by: IBM Mainframe 
> > Discussion List 
> >
> > NOEQUALS made it work - thanks to all
> >
> > Chris Hoelscher
> > Technology Architect, Database Infrastructure Services Technology 
> > Solution Services
> >
> > 123 East Main Street
> > Louisville, KY 40202
> > Humana.com
> > (502) 476-2538 or 407-7266
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU ] 

> > On Behalf Of David Betten
> > Sent: Tuesday, September 19, 2017 5:40 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool
> >
> > Is it possible your installation default is EQUALS=YES?  This causes 
> > extra bytes to be added to the sort field internally.  Try adding 
> > OPTION NOEQUALS after your SORT statement.
> >
> >
> > Have a nice day,
> > Dave Betten
> > z/OS Performance Specialist
> > Cloud and Systems Performance
> > IBM Corporation
> > email:  bet...@us.ibm.com
> >
> >
> > IBM Mainframe Discussion List  wrote on
> > 09/19/2017 05:20:05 PM:
> >
> > > From: Chris Hoelscher 
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Date: 09/19/2017 05:20 PM
> > > Subject: Re: z/os 2.2 - help with sort/icetool Sent by: IBM 
> > > Mainframe Discussion List 
> > >
> > > the LRECL, RECFM, DSORG and BLCKSIZE of &UNIQSTOK?
> > >
> > > Here is where the ds was created
> > > //OFA  DD  DSN=&,
> > > // DISP=(NEW,PASS),
> > > // SPACE=(CYL,(010,010),RLSE),
> > > // UNIT=SYSDA,
> > > // BLKSIZE=25600,
> > > // LRECL=25600,
> > > // RECFM=FB
> > >
> > > You may need to ensure your input is really that long, 4088 chars at
> > least?
> > >
> > > Yes - the rows are space-filled before being populated - at least
> > > 25502 bytes have data
> > >
> > >
> > > Chris Hoelscher
> > > Technology Architect, Database Infrastructure Services Technology 
> > > Solution Services
> > >
> > > 123 East Main Street
> > > Louisville, KY 40202
> > > Humana.com
> > > (502) 476-2538 or 407-7266
> > >
> > >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU 

> > > ] On Behalf Of Elardus Engelbrecht
> > > Sent: Tuesday, September 19, 2017 5:03 PM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool
> > >
> > > Chris Hoelscher wrote:
> > >
> > > >//IN   DD  DSN=&UNIQSTOK,
> > > >// DISP=(OLD,DELETE)
> > > ...
> > > >  SORT FIELDS=(104,4088,A),FORMAT=CH
> > > ...
> > >
> > >
> > > > ICE201I A RECORD TYPE IS F - DATA STARTS IN 

Re: LPAR to LPAR access

[Edgington, Jerry]

Yes, Judith. That is correct. I missed that in your email.  However, I believe 
the BMC tool allows you to connect CICS and maybe batch on one LPAR to DB2 on 
another LPAR.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 5:43 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Hi Jerry,
I have looked into the link to the remote database. As far as I understand this 
is that requires a db2 instance on both LPAR's. :(

Thank you,

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 12:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Thank you Jerry!

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 11:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Sorry Judith,

Our email system modifies the URL.

I think this link should help with the setup of remote database from DB2 on 
z/OS.
www.ibm.com/support/knowledgecenter/en/SSEPEK_11.0.0/dshare/src/tpc/db2z_sysibmlocationsds.html,

Here is the BMC tool
www.bmc.com/it-solutions/subsystem-optimizer.html


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 12:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I think this link should help with the setup of remote database from DB2 on 
z/OS.
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_support_knowledgecenter_en_SSEPEK-5F11.0.0_dshare_src_tpc_db2z-5Fsysibmlocationsds.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=sJBowoFLA-8ocnbEpqCKvSdFmT2s355DrFGS5qkZq7M=

Here is the BMC tool
https://urldefense.proofpoint.com/v2/url?u=http-3A__www.bmc.com_it-2Dsolutions_subsystem-2Doptimizer.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=8dcWbFRJZ5UFFIwGKMcoOv5gW9_-1ldLc-jEYbQmIgw=

Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 11:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Hi Jerry,
You are correct with your assumption. :)

If I set up the database as remote, wouldn't I still need some kind of a client 
to connect to it?
Could you let me know which product from BMC would do this?

Thank you,

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 9:17 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I know of a couple of ways to get batch and CICS to access a remote DB2, which 
is what you are asking, I believe, because you don't want to setup a DB2 data 
sharing.

1) Within DB2, you can setup a database as a remote. DB2 admin should know how 
to do this.
2) BMC has a product that would allow CICS/Batch to connect to a remote DB2, 
like it is locally attached


Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 10:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: LPAR to LPAR access

Hi,
I am trying to find the best solution for the following problem.

We have two LPARs, one of them has DB2 running, the other one hasn't. We do not 
have a SYSPLEX.
We now want to access DB2 data in batch and through CICS, from the LPAR that 
doesn't have DB2 on it.

For the batch side, I looked at ODBC, but I couldn't find anything how to set 
this up from another z/OS.

I have set up a simple IPIC connection to connect CICS - CICS across LPAR's. 
The CICS's are talking. :)

Does anyone have any ideas that could help me?

Judith Nelson  | Senior Systems Programmer
Sammons(r) Financial Group Member Companies One Sammons Plaza  | Sioux Falls, 
SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com


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 

Re: z/os 2.2 - help with sort/icetool

[Chris Hoelscher]

My goal is to delete any dups - so getting this far was just the first step

Chris Hoelscher
Technology Architect, Database Infrastructure Services
Technology Solution Services

123 East Main Street
Louisville, KY 40202
Humana.com
(502) 476-2538 or 407-7266


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Betten
Sent: Tuesday, September 19, 2017 6:16 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool

Glad it worked.  Just to be clear, EQUALS is specified if you want to maintain 
the original order of records with the same key.  With NOEQUALS, records with 
the same key value may or may not end up in the original order.  So be sure you 
are ok with that before going with NOEQUALS.


Have a nice day,
Dave Betten
z/OS Performance Specialist
Cloud and Systems Performance
IBM Corporation
email:  bet...@us.ibm.com


IBM Mainframe Discussion List  wrote on
09/19/2017 06:02:10 PM:

> From: Chris Hoelscher 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/19/2017 06:02 PM
> Subject: Re: z/os 2.2 - help with sort/icetool Sent by: IBM Mainframe 
> Discussion List 
>
> NOEQUALS made it work - thanks to all
>
> Chris Hoelscher
> Technology Architect, Database Infrastructure Services Technology 
> Solution Services
>
> 123 East Main Street
> Louisville, KY 40202
> Humana.com
> (502) 476-2538 or 407-7266
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU ] 
> On Behalf Of David Betten
> Sent: Tuesday, September 19, 2017 5:40 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool
>
> Is it possible your installation default is EQUALS=YES?  This causes 
> extra bytes to be added to the sort field internally.  Try adding 
> OPTION NOEQUALS after your SORT statement.
>
>
> Have a nice day,
> Dave Betten
> z/OS Performance Specialist
> Cloud and Systems Performance
> IBM Corporation
> email:  bet...@us.ibm.com
>
>
> IBM Mainframe Discussion List  wrote on
> 09/19/2017 05:20:05 PM:
>
> > From: Chris Hoelscher 
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Date: 09/19/2017 05:20 PM
> > Subject: Re: z/os 2.2 - help with sort/icetool Sent by: IBM 
> > Mainframe Discussion List 
> >
> > the LRECL, RECFM, DSORG and BLCKSIZE of &UNIQSTOK?
> >
> > Here is where the ds was created
> > //OFA  DD  DSN=&,
> > // DISP=(NEW,PASS),
> > // SPACE=(CYL,(010,010),RLSE),
> > // UNIT=SYSDA,
> > // BLKSIZE=25600,
> > // LRECL=25600,
> > // RECFM=FB
> >
> > You may need to ensure your input is really that long, 4088 chars at
> least?
> >
> > Yes - the rows are space-filled before being populated - at least
> > 25502 bytes have data
> >
> >
> > Chris Hoelscher
> > Technology Architect, Database Infrastructure Services Technology 
> > Solution Services
> >
> > 123 East Main Street
> > Louisville, KY 40202
> > Humana.com
> > (502) 476-2538 or 407-7266
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU 
> > ] On Behalf Of Elardus Engelbrecht
> > Sent: Tuesday, September 19, 2017 5:03 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool
> >
> > Chris Hoelscher wrote:
> >
> > >//IN   DD  DSN=&UNIQSTOK,
> > >// DISP=(OLD,DELETE)
> > ...
> > >  SORT FIELDS=(104,4088,A),FORMAT=CH
> > ...
> >
> >
> > > ICE201I A RECORD TYPE IS F - DATA STARTS IN POSITION 1
>
> >
> > Is that RECFM correct?
> >
> > > ICE189A 0 BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS
> > 63
> > > ICE052I 3 END OF DFSORT
>
> > >63
> > >Too many control fields were specified or control fields were too
> > large.
> >
> > >I have only 1 control field and I *thought* 4088 was acceptable 
> > >Where have I gone wrong??
> >
> > Let us start at the beginning. What is the LRECL, RECFM, DSORG and 
> > BLCKSIZE of &UNIQSTOK?
> >
> > You may need to ensure your input is really that long, 4088 chars at
> least?
> >
> > Groete / Greetings
> > Elardus Engelbrecht
> >
> > 
> > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > send email to lists...@listserv.ua.edu with the message: INFO 
> > IBM-MAIN
> >
> > The information transmitted is intended only for the person or 
> > entity to which it is addressed and may contain CONFIDENTIAL 
> > material.  If you receive this material/information in error, please 
> > contact the sender and delete or destroy the material/information.
> >
> > Humana Inc. and its subsidiaries comply with applicable Federal 
> > civil rights laws and do not discriminate on the basis of race, 
> > color, national origin, age, disability or sex. Humana Inc. 

Re: z/os 2.2 - help with sort/icetool

[David Betten]

Glad it worked.  Just to be clear, EQUALS is specified if you want to
maintain the original order of records with the same key.  With NOEQUALS,
records with the same key value may or may not end up in the original
order.  So be sure you are ok with that before going with NOEQUALS.


Have a nice day,
Dave Betten
z/OS Performance Specialist
Cloud and Systems Performance
IBM Corporation
email:  bet...@us.ibm.com


IBM Mainframe Discussion List  wrote on
09/19/2017 06:02:10 PM:

> From: Chris Hoelscher 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/19/2017 06:02 PM
> Subject: Re: z/os 2.2 - help with sort/icetool
> Sent by: IBM Mainframe Discussion List 
>
> NOEQUALS made it work - thanks to all
>
> Chris Hoelscher
> Technology Architect, Database Infrastructure Services
> Technology Solution Services
>
> 123 East Main Street
> Louisville, KY 40202
> Humana.com
> (502) 476-2538 or 407-7266
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU
> ] On Behalf Of David Betten
> Sent: Tuesday, September 19, 2017 5:40 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool
>
> Is it possible your installation default is EQUALS=YES?  This causes
> extra bytes to be added to the sort field internally.  Try adding
> OPTION NOEQUALS after your SORT statement.
>
>
> Have a nice day,
> Dave Betten
> z/OS Performance Specialist
> Cloud and Systems Performance
> IBM Corporation
> email:  bet...@us.ibm.com
>
>
> IBM Mainframe Discussion List  wrote on
> 09/19/2017 05:20:05 PM:
>
> > From: Chris Hoelscher 
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Date: 09/19/2017 05:20 PM
> > Subject: Re: z/os 2.2 - help with sort/icetool Sent by: IBM Mainframe
> > Discussion List 
> >
> > the LRECL, RECFM, DSORG and BLCKSIZE of &UNIQSTOK?
> >
> > Here is where the ds was created
> > //OFA  DD  DSN=&,
> > // DISP=(NEW,PASS),
> > // SPACE=(CYL,(010,010),RLSE),
> > // UNIT=SYSDA,
> > // BLKSIZE=25600,
> > // LRECL=25600,
> > // RECFM=FB
> >
> > You may need to ensure your input is really that long, 4088 chars at
> least?
> >
> > Yes - the rows are space-filled before being populated - at least
> > 25502 bytes have data
> >
> >
> > Chris Hoelscher
> > Technology Architect, Database Infrastructure Services Technology
> > Solution Services
> >
> > 123 East Main Street
> > Louisville, KY 40202
> > Humana.com
> > (502) 476-2538 or 407-7266
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU ]
> > On Behalf Of Elardus Engelbrecht
> > Sent: Tuesday, September 19, 2017 5:03 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool
> >
> > Chris Hoelscher wrote:
> >
> > >//IN   DD  DSN=&UNIQSTOK,
> > >// DISP=(OLD,DELETE)
> > ...
> > >  SORT FIELDS=(104,4088,A),FORMAT=CH
> > ...
> >
> >
> > > ICE201I A RECORD TYPE IS F - DATA STARTS IN POSITION 1
>
> >
> > Is that RECFM correct?
> >
> > > ICE189A 0 BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS
> > 63
> > > ICE052I 3 END OF DFSORT
>
> > >63
> > >Too many control fields were specified or control fields were too
> > large.
> >
> > >I have only 1 control field and I *thought* 4088 was acceptable Where
> > >have I gone wrong??
> >
> > Let us start at the beginning. What is the LRECL, RECFM, DSORG and
> > BLCKSIZE of &UNIQSTOK?
> >
> > You may need to ensure your input is really that long, 4088 chars at
> least?
> >
> > Groete / Greetings
> > Elardus Engelbrecht
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > The information transmitted is intended only for the person or entity
> > to which it is addressed and may contain CONFIDENTIAL material.  If
> > you receive this material/information in error, please contact the
> > sender and delete or destroy the material/information.
> >
> > Humana Inc. and its subsidiaries comply with applicable Federal civil
> > rights laws and do not discriminate on the basis of race, color,
> > national origin, age, disability or sex. Humana Inc. and its
> > subsidiaries do not exclude people or treat them differently because
> > of race, color, national origin, age, disability or sex.
> >
> > English: ATTENTION: If you do not speak English, language assistance
> > services, free of charge, are available to you. Call 1‐877‐320‐1235
> > (TTY: 711).
> >
> > Español (Spanish): ATENCIÓN: Si habla español, tiene a su disposición
> > servicios gratuitos de asistencia lingüística. Llame al 1‐877‐320‐1235
> > (TTY: 711).
> >
> > 繁體中文(Chinese)：注意：如果您使用繁體中文，您可以免費獲得語言援助
> > 服務。請致電 

Re: LPAR to LPAR access

[Lizette Koehler]

There are also lists that are specific to CICS and DB2 that may be helpful
should you have more questions

To join, if you have not done, go to these URLs.


For DB2 - www.idug.org  

CICShttp://www.listserv.uga.edu/archives/cics-l.html



> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Nelson, Judith
> Sent: Tuesday, September 19, 2017 10:00 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: LPAR to LPAR access
> 
> Thank you Jerry!
> 
> Judith Nelson
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Edgington, Jerry
> Sent: Tuesday, September 19, 2017 11:25 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: LPAR to LPAR access
> 
> Sorry Judith,
> 
> Our email system modifies the URL.
> 
> I think this link should help with the setup of remote database from DB2 on
> z/OS.
> www.ibm.com/support/knowledgecenter/en/SSEPEK_11.0.0/dshare/src/tpc/db2z_sysi
> bmlocationsds.html,
> 
> Here is the BMC tool
> www.bmc.com/it-solutions/subsystem-optimizer.html
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Edgington, Jerry
> Sent: Tuesday, September 19, 2017 12:23 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: LPAR to LPAR access
> 
> Judith,
> 
> I think this link should help with the setup of remote database from DB2 on
> z/OS.
> https://urldefense.proofpoint.com/v2/url?u=https-
> 3A__www.ibm.com_support_knowledgecenter_en_SSEPEK-
> 5F11.0.0_dshare_src_tpc_db2z-
> 5Fsysibmlocationsds.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7yd
> PE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-
> yX2v319f6i9cuTloWg-wjmsE=sJBowoFLA-8ocnbEpqCKvSdFmT2s355DrFGS5qkZq7M=
> 
> Here is the BMC tool
> https://urldefense.proofpoint.com/v2/url?u=http-3A__www.bmc.com_it-
> 2Dsolutions_subsystem-
> 2Doptimizer.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY
> -_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-
> yX2v319f6i9cuTloWg-wjmsE=8dcWbFRJZ5UFFIwGKMcoOv5gW9_-1ldLc-jEYbQmIgw=
> 
> Jerry
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Nelson, Judith
> Sent: Tuesday, September 19, 2017 11:53 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: LPAR to LPAR access
> 
> Hi Jerry,
> You are correct with your assumption. :)
> 
> If I set up the database as remote, wouldn't I still need some kind of a
> client to connect to it?
> Could you let me know which product from BMC would do this?
> 
> Thank you,
> 
> Judith Nelson
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Edgington, Jerry
> Sent: Tuesday, September 19, 2017 9:17 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: LPAR to LPAR access
> 
> Judith,
> 
> I know of a couple of ways to get batch and CICS to access a remote DB2,
> which is what you are asking, I believe, because you don't want to setup a
> DB2 data sharing.
> 
> 1) Within DB2, you can setup a database as a remote. DB2 admin should know
> how to do this.
> 2) BMC has a product that would allow CICS/Batch to connect to a remote DB2,
> like it is locally attached
> 
> 
> Jerry
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Nelson, Judith
> Sent: Tuesday, September 19, 2017 10:14 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: LPAR to LPAR access
> 
> Hi,
> I am trying to find the best solution for the following problem.
> 
> We have two LPARs, one of them has DB2 running, the other one hasn't. We do
> not have a SYSPLEX.
> We now want to access DB2 data in batch and through CICS, from the LPAR that
> doesn't have DB2 on it.
> 
> For the batch side, I looked at ODBC, but I couldn't find anything how to set
> this up from another z/OS.
> 
> I have set up a simple IPIC connection to connect CICS - CICS across LPAR's.
> The CICS's are talking. :)
> 
> Does anyone have any ideas that could help me?
> 
> Judith Nelson  | Senior Systems Programmer
> Sammons(r) Financial Group Member Companies One Sammons Plaza  | Sioux Falls,
> SD 57193
> Phone: (605) 373-2321
> jnel...@sfgmembers.com
> 
> 
> 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 

Re: z/os 2.2 - help with sort/icetool

[Chris Hoelscher]

NOEQUALS made it work - thanks to all

Chris Hoelscher
Technology Architect, Database Infrastructure Services
Technology Solution Services

123 East Main Street
Louisville, KY 40202
Humana.com
(502) 476-2538 or 407-7266


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Betten
Sent: Tuesday, September 19, 2017 5:40 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool

Is it possible your installation default is EQUALS=YES?  This causes extra 
bytes to be added to the sort field internally.  Try adding OPTION NOEQUALS 
after your SORT statement.


Have a nice day,
Dave Betten
z/OS Performance Specialist
Cloud and Systems Performance
IBM Corporation
email:  bet...@us.ibm.com


IBM Mainframe Discussion List  wrote on
09/19/2017 05:20:05 PM:

> From: Chris Hoelscher 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/19/2017 05:20 PM
> Subject: Re: z/os 2.2 - help with sort/icetool Sent by: IBM Mainframe 
> Discussion List 
>
> the LRECL, RECFM, DSORG and BLCKSIZE of &UNIQSTOK?
>
> Here is where the ds was created
> //OFA  DD  DSN=&,
> // DISP=(NEW,PASS),
> // SPACE=(CYL,(010,010),RLSE),
> // UNIT=SYSDA,
> // BLKSIZE=25600,
> // LRECL=25600,
> // RECFM=FB
>
> You may need to ensure your input is really that long, 4088 chars at
least?
>
> Yes - the rows are space-filled before being populated - at least
> 25502 bytes have data
>
>
> Chris Hoelscher
> Technology Architect, Database Infrastructure Services Technology 
> Solution Services
>
> 123 East Main Street
> Louisville, KY 40202
> Humana.com
> (502) 476-2538 or 407-7266
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU ] 
> On Behalf Of Elardus Engelbrecht
> Sent: Tuesday, September 19, 2017 5:03 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool
>
> Chris Hoelscher wrote:
>
> >//IN   DD  DSN=&UNIQSTOK,
> >// DISP=(OLD,DELETE)
> ...
> >  SORT FIELDS=(104,4088,A),FORMAT=CH
> ...
>
>
> > ICE201I A RECORD TYPE IS F - DATA STARTS IN POSITION 1

>
> Is that RECFM correct?
>
> > ICE189A 0 BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS
> 63
> > ICE052I 3 END OF DFSORT

> >63
> >Too many control fields were specified or control fields were too
> large.
>
> >I have only 1 control field and I *thought* 4088 was acceptable Where 
> >have I gone wrong??
>
> Let us start at the beginning. What is the LRECL, RECFM, DSORG and 
> BLCKSIZE of &UNIQSTOK?
>
> You may need to ensure your input is really that long, 4088 chars at
least?
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> The information transmitted is intended only for the person or entity 
> to which it is addressed and may contain CONFIDENTIAL material.  If 
> you receive this material/information in error, please contact the 
> sender and delete or destroy the material/information.
>
> Humana Inc. and its subsidiaries comply with applicable Federal civil 
> rights laws and do not discriminate on the basis of race, color, 
> national origin, age, disability or sex. Humana Inc. and its 
> subsidiaries do not exclude people or treat them differently because 
> of race, color, national origin, age, disability or sex.
>
> English: ATTENTION: If you do not speak English, language assistance 
> services, free of charge, are available to you. Call 1‐877‐320‐1235 
> (TTY: 711).
>
> Español (Spanish): ATENCIÓN: Si habla español, tiene a su disposición 
> servicios gratuitos de asistencia lingüística. Llame al 1‐877‐320‐1235 
> (TTY: 711).
>
> 繁體中文(Chinese)：注意：如果您使用繁體中文，您可以免費獲得語言援助
> 服務。請致電 1‐877‐320‐1235 (TTY: 711)。
>
> Kreyòl Ayisyen (Haitian Creole): ATANSION: Si w pale Kreyòl Ayisyen, 
> gen sèvis èd pou lang ki disponib gratis pou ou. Rele 1‐877‐320‐1235 
> (TTY: 711).
>
> Polski (Polish): UWAGA: Jeżeli mówisz po polsku, możesz skorzystać
zbezpłatnej
> pomocy językowej. Zadzwoń pod numer 1‐877‐320‐1235 (TTY: 711).
>
> 한국어 (Korean): 주의: 한국어를 사용하시는 경우, 언어 지원 서비스를 무료
로
> 이용하실 수 있습니다. 1‐877‐320‐1235 (TTY: 711)번으로 전화해 주십시오.
>
>
> --
> 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

The information transmitted is intended only for the person or entity to which 
it is addressed
and may 

Re: LPAR to LPAR access

[Nelson, Judith]

Hi Jerry, 
I have looked into the link to the remote database. As far as I understand this 
is that requires a db2 instance on both LPAR's. :( 

Thank you, 

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 12:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Thank you Jerry! 

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 11:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Sorry Judith,

Our email system modifies the URL.

I think this link should help with the setup of remote database from DB2 on 
z/OS.
www.ibm.com/support/knowledgecenter/en/SSEPEK_11.0.0/dshare/src/tpc/db2z_sysibmlocationsds.html,

Here is the BMC tool
www.bmc.com/it-solutions/subsystem-optimizer.html


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 12:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I think this link should help with the setup of remote database from DB2 on 
z/OS.
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_support_knowledgecenter_en_SSEPEK-5F11.0.0_dshare_src_tpc_db2z-5Fsysibmlocationsds.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=sJBowoFLA-8ocnbEpqCKvSdFmT2s355DrFGS5qkZq7M=

Here is the BMC tool
https://urldefense.proofpoint.com/v2/url?u=http-3A__www.bmc.com_it-2Dsolutions_subsystem-2Doptimizer.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=8dcWbFRJZ5UFFIwGKMcoOv5gW9_-1ldLc-jEYbQmIgw=

Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 11:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Hi Jerry,
You are correct with your assumption. :)

If I set up the database as remote, wouldn't I still need some kind of a client 
to connect to it?
Could you let me know which product from BMC would do this?

Thank you,

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 9:17 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I know of a couple of ways to get batch and CICS to access a remote DB2, which 
is what you are asking, I believe, because you don't want to setup a DB2 data 
sharing.

1) Within DB2, you can setup a database as a remote. DB2 admin should know how 
to do this.
2) BMC has a product that would allow CICS/Batch to connect to a remote DB2, 
like it is locally attached


Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 10:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: LPAR to LPAR access

Hi,
I am trying to find the best solution for the following problem.

We have two LPARs, one of them has DB2 running, the other one hasn't. We do not 
have a SYSPLEX.
We now want to access DB2 data in batch and through CICS, from the LPAR that 
doesn't have DB2 on it.

For the batch side, I looked at ODBC, but I couldn't find anything how to set 
this up from another z/OS.

I have set up a simple IPIC connection to connect CICS - CICS across LPAR's. 
The CICS's are talking. :)

Does anyone have any ideas that could help me?

Judith Nelson  | Senior Systems Programmer
Sammons(r) Financial Group Member Companies One Sammons Plaza  | Sioux Falls, 
SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com


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



This e-mail message, including any attachments, is for the sole use of the 
intended 

Re: z/os 2.2 - help with sort/icetool

[David Betten]

Is it possible your installation default is EQUALS=YES?  This causes extra
bytes to be added to the sort field internally.  Try adding OPTION NOEQUALS
after your SORT statement.


Have a nice day,
Dave Betten
z/OS Performance Specialist
Cloud and Systems Performance
IBM Corporation
email:  bet...@us.ibm.com


IBM Mainframe Discussion List  wrote on
09/19/2017 05:20:05 PM:

> From: Chris Hoelscher 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/19/2017 05:20 PM
> Subject: Re: z/os 2.2 - help with sort/icetool
> Sent by: IBM Mainframe Discussion List 
>
> the LRECL, RECFM, DSORG and BLCKSIZE of &UNIQSTOK?
>
> Here is where the ds was created
> //OFA  DD  DSN=&,
> // DISP=(NEW,PASS),
> // SPACE=(CYL,(010,010),RLSE),
> // UNIT=SYSDA,
> // BLKSIZE=25600,
> // LRECL=25600,
> // RECFM=FB
>
> You may need to ensure your input is really that long, 4088 chars at
least?
>
> Yes - the rows are space-filled before being populated - at least
> 25502 bytes have data
>
>
> Chris Hoelscher
> Technology Architect, Database Infrastructure Services
> Technology Solution Services
>
> 123 East Main Street
> Louisville, KY 40202
> Humana.com
> (502) 476-2538 or 407-7266
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU
> ] On Behalf Of Elardus Engelbrecht
> Sent: Tuesday, September 19, 2017 5:03 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool
>
> Chris Hoelscher wrote:
>
> >//IN   DD  DSN=&UNIQSTOK,
> >// DISP=(OLD,DELETE)
> ...
> >  SORT FIELDS=(104,4088,A),FORMAT=CH
> ...
>
>
> > ICE201I A RECORD TYPE IS F - DATA STARTS IN POSITION 1

>
> Is that RECFM correct?
>
> > ICE189A 0 BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS
> 63
> > ICE052I 3 END OF DFSORT

> >63
> >Too many control fields were specified or control fields were too
> large.
>
> >I have only 1 control field and I *thought* 4088 was acceptable Where
> >have I gone wrong??
>
> Let us start at the beginning. What is the LRECL, RECFM, DSORG and
> BLCKSIZE of &UNIQSTOK?
>
> You may need to ensure your input is really that long, 4088 chars at
least?
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> The information transmitted is intended only for the person or
> entity to which it is addressed
> and may contain CONFIDENTIAL material.  If you receive this
> material/information in error,
> please contact the sender and delete or destroy the material/information.
>
> Humana Inc. and its subsidiaries comply with applicable Federal
> civil rights laws and
> do not discriminate on the basis of race, color, national origin,
> age, disability or
> sex. Humana Inc. and its subsidiaries do not exclude people or treat
> them differently
> because of race, color, national origin, age, disability or sex.
>
> English: ATTENTION: If you do not speak English, language assistance
> services, free
> of charge, are available to you. Call 1‐877‐320‐1235 (TTY: 711).
>
> Español (Spanish): ATENCIÓN: Si habla español, tiene a su
> disposición servicios
> gratuitos de asistencia lingüística. Llame al 1‐877‐320‐1235 (TTY: 711).
>
> 繁體中文(Chinese)：注意：如果您使用繁體中文，您可以免費獲得語言援助
> 服務。請致電 1‐877‐320‐1235 (TTY: 711)。
>
> Kreyòl Ayisyen (Haitian Creole): ATANSION: Si w pale Kreyòl Ayisyen,
> gen sèvis èd
> pou lang ki disponib gratis pou ou. Rele 1‐877‐320‐1235 (TTY: 711).
>
> Polski (Polish): UWAGA: Jeżeli mówisz po polsku, możesz skorzystać
zbezpłatnej
> pomocy językowej. Zadzwoń pod numer 1‐877‐320‐1235 (TTY: 711).
>
> 한국어 (Korean): 주의: 한국어를 사용하시는 경우, 언어 지원 서비스를 무료
로
> 이용하실 수 있습니다. 1‐877‐320‐1235 (TTY: 711)번으로 전화해 주십시오.
>
>
> --
> 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: z/os 2.2 - help with sort/icetool

[Chris Hoelscher]

the LRECL, RECFM, DSORG and BLCKSIZE of &UNIQSTOK?

Here is where the ds was created
//OFA  DD  DSN=&, 
// DISP=(NEW,PASS),
// SPACE=(CYL,(010,010),RLSE), 
// UNIT=SYSDA, 
// BLKSIZE=25600,  
// LRECL=25600,
// RECFM=FB

You may need to ensure your input is really that long, 4088 chars at least? 

Yes - the rows are space-filled before being populated - at least 25502 bytes 
have data


Chris Hoelscher
Technology Architect, Database Infrastructure Services
Technology Solution Services

123 East Main Street
Louisville, KY 40202
Humana.com
(502) 476-2538 or 407-7266


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Tuesday, September 19, 2017 5:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [IBM-MAIN] z/os 2.2 - help with sort/icetool

Chris Hoelscher wrote:

>//IN   DD  DSN=&UNIQSTOK,   
>// DISP=(OLD,DELETE)
...
>  SORT FIELDS=(104,4088,A),FORMAT=CH 
...


> ICE201I A RECORD TYPE IS F - DATA STARTS IN POSITION 1
>  

Is that RECFM correct?

> ICE189A 0 BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS 63 
>  
> ICE052I 3 END OF DFSORT   
>  
>63  
>Too many control fields were specified or control fields were too large.   
>   

>I have only 1 control field and I *thought* 4088 was acceptable Where 
>have I gone wrong??

Let us start at the beginning. What is the LRECL, RECFM, DSORG and BLCKSIZE of 
&UNIQSTOK?

You may need to ensure your input is really that long, 4088 chars at least? 

Groete / Greetings
Elardus Engelbrecht

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

The information transmitted is intended only for the person or entity to which 
it is addressed
and may contain CONFIDENTIAL material.  If you receive this 
material/information in error,
please contact the sender and delete or destroy the material/information.

Humana Inc. and its subsidiaries comply with applicable Federal civil rights 
laws and
do not discriminate on the basis of race, color, national origin, age, 
disability or
sex. Humana Inc. and its subsidiaries do not exclude people or treat them 
differently
because of race, color, national origin, age, disability or sex.

English: ATTENTION: If you do not speak English, language assistance services, 
free
of charge, are available to you. Call 1‐877‐320‐1235 (TTY: 711).

Español (Spanish): ATENCIÓN: Si habla español, tiene a su disposición servicios
gratuitos de asistencia lingüística. Llame al 1‐877‐320‐1235 (TTY: 711).

繁體中文(Chinese)：注意：如果您使用繁體中文，您可以免費獲得語言援助
服務。請致電 1‐877‐320‐1235 (TTY: 711)。

Kreyòl Ayisyen (Haitian Creole): ATANSION: Si w pale Kreyòl Ayisyen, gen sèvis 
èd
pou lang ki disponib gratis pou ou. Rele 1‐877‐320‐1235 (TTY: 711).

Polski (Polish): UWAGA: Jeżeli mówisz po polsku, możesz skorzystać z bezpłatnej
pomocy językowej. Zadzwoń pod numer 1‐877‐320‐1235 (TTY: 711).

한국어 (Korean): 주의: 한국어를 사용하시는 경우, 언어 지원 서비스를 무료로
이용하실 수 있습니다. 1‐877‐320‐1235 (TTY: 711)번으로 전화해 주십시오.


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

Re: z/os 2.2 - help with sort/icetool

[Elardus Engelbrecht]

Chris Hoelscher wrote:

>//IN   DD  DSN=&UNIQSTOK,   
>// DISP=(OLD,DELETE)
...
>  SORT FIELDS=(104,4088,A),FORMAT=CH 
...


> ICE201I A RECORD TYPE IS F - DATA STARTS IN POSITION 1
>  

Is that RECFM correct?

> ICE189A 0 BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS 63 
>  
> ICE052I 3 END OF DFSORT   
>  
>63  
>Too many control fields were specified or control fields were too large.   
>   

>I have only 1 control field and I *thought* 4088 was acceptable
>Where have I gone wrong??

Let us start at the beginning. What is the LRECL, RECFM, DSORG and BLCKSIZE of 
&UNIQSTOK?

You may need to ensure your input is really that long, 4088 chars at least? 

Groete / Greetings
Elardus Engelbrecht

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

z/os 2.2 - help with sort/icetool

[Chris Hoelscher]

I *have* read the manual, but am apparently still clueless

The jcl

//STEP45   EXEC PGM=ICETOOL,REGION=0M
//IN   DD  DSN=&,   
// DISP=(OLD,DELETE) 
//OUT  DD  SYSOUT=X,LRECL=25600  
//TOOLIN   DD  * 
  SORT FROM(IN) TO(OUT) USING(TOOL)  
//TOOLCNTL DD  * 
  SORT FIELDS=(104,4088,A),FORMAT=CH 
  END
//TOOLMSG  DD  SYSOUT=X  
//DFSMSG   DD  SYSOUT=X  
//SYSOUT   DD  SYSOUT=X  
//SYSPRINT DD  SYSOUT=X  
//SORTWK01 DD  SPACE=(CYL,(60)), 
// UNIT=SYSDA
//SORTWK02 DD  SPACE=(CYL,(60)), 
// UNIT=SYSDA
//SORTWK03 DD  SPACE=(CYL,(60)), 
// UNIT=SYSDA
//SORTWK04 DD  SPACE=(CYL,(60)), 
// UNIT=SYSDA
//SORTWK05 DD  SPACE=(CYL,(60)), 
// UNIT=SYSDA

The results

1ICE200I 0 IDENTIFIER FROM CALLING PROGRAM IS 0001  
 ICE201I A RECORD TYPE IS F - DATA STARTS IN POSITION 1 
 ICE751I 0 C5-I40658 C6-I35397 C7-I35397 C8-I40658 E9-I40658 E7-I40658  
0ICE805I 0 JOBNAME: CMH5342E , STEPNAME: STEP10 
 ICE802I 0 BLOCKSET TECHNIQUE IN CONTROL
 ICE143I 0 BLOCKSET SORT  TECHNIQUE SELECTED
 ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES A
 ICE000I 0 - CONTROL STATEMENTS FOR 5650-ZOS, Z/OS DFSORT V2R2  - 15:23 ON TUE S
0SORT FIELDS=(104,4088,A),FORMAT=CH 
 ICE146I 0 END OF STATEMENTS FROM TOOLCNTL - PARAMETER LIST STATEMENTS FOLLOW   
   DEBUG NOABEND,ESTAE  
   OPTION 
MSGDDN=DFSMSG,LIST,MSGPRT=ALL,RESINV=0,SORTDD=TOOL,SORTIN=IN,SOR*
  TOUT=OUT,DYNALLOC 
 ICE189A 0 BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS 63  
 ICE052I 3 END OF DFSORT
63  
Too many control fields were specified or control fields were too   
large.  

I have only 1 control field and I *thought* 4088 was acceptable
Where have I gone wrong??

thanks

Chris Hoelscher
Technology Architect, Database Infrastructure Services
Technology Solution Services

123 East Main Street
Louisville, KY 40202
Humana.com
(502) 476-2538 or 407-7266
 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: Extended format system ZFS files

[Shaffer, Terri]

So without getting into a philosophical discussion here, it is 100 times easier 
for cloning and manipulation of ZFS (SYSTEM ONLY) files, when nothing currently 
exists in SMS routines, besides some HLQ's.  Yes I can set this up in SMS and 
build ACS routines and init volumes as SMS, ETC, as I am the storage admin, 
RACF, and sysprog, so everything is doable.  For now, I am going to take the 
path of least resistance for now and just init my secondary RES volume as SMS 
and add to my storage group.

When I install z/OS 2.3, I will fix this and make it non-sms then.

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jesse 1 Robinson
Sent: Tuesday, September 19, 2017 2:53 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Extended format system ZFS files

This question has overtones (undertones?) reminiscent of avoiding PDSE. Just 
isn't necessary. Our HFS/ZFS files have been SMS managed for many years with no 
problems. I'm pretty sure that no particular task is required to open an 
existing file. If DFSMS is broken in some catastrophic way, you have a lot of 
other problems to occupy your attention.

SMS can help a lot for allocating new ZFS to a specific DASD pool and keeping 
out interlopers who shouldn't be there. Not to mention the advantages of EAV.

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jousma, David
Sent: Tuesday, September 19, 2017 12:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Extended format system ZFS files

If it were me, I'd use DFDSS to copy with rename the filesystems.   If 
applicable, IPL onto the new ones, before deleting the old ones.  I use DFDSS 
to clone filesystems as a regular part of maintenance.   If they are mounted 
READ only, then the DFDSS job can be run anywhere.  If mounted RDWR, you need 
to either unmount, or expect DFDSS to temporarily quiesce the filesystem from 
updates while running.

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H p 616.653.8429 f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shaffer, Terri
Sent: Tuesday, September 19, 2017 2:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Extended format system ZFS files

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

So I have a question.

Is it possible to convert my z/OS system ZFS files from SMS Extended to Non-SMS 
datasets?

What would be the process?  Repro out and back?  Is there a simpler way?

I know technically this works fine, but I don’t like my system datasets being 
SMS managed and the previous person here set this up.

Thanks

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​


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

 [https://www.aciworldwide.com/-/media/aci-footer] 
This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

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

Re: Extended format system ZFS files

[Paul Gilmartin]

On 2017-09-19, at 12:55, Allan Staller wrote:
>  
> The short answer is delete/define and copy with pax (or copytree).
>  
I might do that in a different order.

-- gil

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

Re: Extended format system ZFS files

[Matthew Stitt]

Does you SMS Storage Class list have one which can be specified to make a 
dataset non SMS managed?  And does your SMS ACS routines test for that non SMS 
storage class and obey your wishes?  If so, then add the STORCLAS parameter to 
your DFDSS copy job along with the destination volume.

Also your storage administrator could set up a Data Class routine to capture 
your new ZFS dataset name and assign it to a non extended data class.  Define 
your new ZFS, then use the Replace parameter on the DFDSS copy.

Hope this helps.

Matthew

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

AW: Re: Extended format system ZFS files

[Peter Hunkeler]

>Depends on the size. Repro would be a *VERY BAD* idea. IBM has multiple 
>caveats on how to handle ZFS files.
>IIRC REPRO is specifically forbidden.


This is not true! Read the z/OS Distributed File Service zFS Administration 
guide, and search for REPRO. It is a described way for certain file system 
activities.


--
Peter Hunkeler



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

Re: Extended format system ZFS files

[Jesse 1 Robinson]

This question has overtones (undertones?) reminiscent of avoiding PDSE. Just 
isn't necessary. Our HFS/ZFS files have been SMS managed for many years with no 
problems. I'm pretty sure that no particular task is required to open an 
existing file. If DFSMS is broken in some catastrophic way, you have a lot of 
other problems to occupy your attention. 

SMS can help a lot for allocating new ZFS to a specific DASD pool and keeping 
out interlopers who shouldn't be there. Not to mention the advantages of EAV. 

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jousma, David
Sent: Tuesday, September 19, 2017 12:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Extended format system ZFS files

If it were me, I'd use DFDSS to copy with rename the filesystems.   If 
applicable, IPL onto the new ones, before deleting the old ones.  I use DFDSS 
to clone filesystems as a regular part of maintenance.   If they are mounted 
READ only, then the DFDSS job can be run anywhere.  If mounted RDWR, you need 
to either unmount, or expect DFDSS to temporarily quiesce the filesystem from 
updates while running.

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H p 616.653.8429 f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shaffer, Terri
Sent: Tuesday, September 19, 2017 2:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Extended format system ZFS files

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

So I have a question.

Is it possible to convert my z/OS system ZFS files from SMS Extended to Non-SMS 
datasets?

What would be the process?  Repro out and back?  Is there a simpler way?

I know technically this works fine, but I don’t like my system datasets being 
SMS managed and the previous person here set this up.

Thanks

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​


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

Re: Extended format system ZFS files

[Jousma, David]

Terri, sorry to lead you astray.  I guess my brain wasn’t in gear this 
afternoon.  The suggestion Allan gave you is probably the best.   If it were my 
decision, it wouldn’t be worth the effort to convert, but next upgrade 
Serverpack, I would make the change.

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President
david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
p 616.653.8429
f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shaffer, Terri
Sent: Tuesday, September 19, 2017 3:07 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Extended format system ZFS files

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

Tried that, or to copy and got, I didn’t try to backup/restore.

ADR971E (001)-ALLOC(01), LOGICAL COPY FOR CLUSTER OMVS.RES213.SCFZHFS2 IN 
CATALOG USERCAT.GSD FAILED, 2

Which basically states, only can copy EF to EF format.

And no, they are not using any EF features.  IE, not compressed or >4G in size.

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jousma, David
Sent: Tuesday, September 19, 2017 2:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Extended format system ZFS files

If it were me, I'd use DFDSS to copy with rename the filesystems.   If 
applicable, IPL onto the new ones, before deleting the old ones.  I use DFDSS 
to clone filesystems as a regular part of maintenance.   If they are mounted 
READ only, then the DFDSS job can be run anywhere.  If mounted RDWR, you need 
to either unmount, or expect DFDSS to temporarily quiesce the filesystem from 
updates while running.

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H p 616.653.8429 f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shaffer, Terri
Sent: Tuesday, September 19, 2017 2:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Extended format system ZFS files

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

So I have a question.

Is it possible to convert my z/OS system ZFS files from SMS Extended to Non-SMS 
datasets?

What would be the process?  Repro out and back?  Is there a simpler way?

I know technically this works fine, but I don’t like my system datasets being 
SMS managed and the previous person here set this up.

Thanks

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​


[https://www.aciworldwide.com/-/media/aci-footer]
This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN 
  
[https://www.aciworldwide.com/-/media/aci-footer]  
This email message and any attachments may contain 

Re: Extended format system ZFS files

[Shaffer, Terri]

Tried that, or to copy and got, I didn’t try to backup/restore.

ADR971E (001)-ALLOC(01), LOGICAL COPY FOR CLUSTER OMVS.RES213.SCFZHFS2 IN 
CATALOG USERCAT.GSD FAILED, 2

Which basically states, only can copy EF to EF format.

And no, they are not using any EF features.  IE, not compressed or >4G in size.

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jousma, David
Sent: Tuesday, September 19, 2017 2:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Extended format system ZFS files

If it were me, I'd use DFDSS to copy with rename the filesystems.   If 
applicable, IPL onto the new ones, before deleting the old ones.  I use DFDSS 
to clone filesystems as a regular part of maintenance.   If they are mounted 
READ only, then the DFDSS job can be run anywhere.  If mounted RDWR, you need 
to either unmount, or expect DFDSS to temporarily quiesce the filesystem from 
updates while running.

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H p 616.653.8429 f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shaffer, Terri
Sent: Tuesday, September 19, 2017 2:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Extended format system ZFS files

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

So I have a question.

Is it possible to convert my z/OS system ZFS files from SMS Extended to Non-SMS 
datasets?

What would be the process?  Repro out and back?  Is there a simpler way?

I know technically this works fine, but I don’t like my system datasets being 
SMS managed and the previous person here set this up.

Thanks

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​


[https://www.aciworldwide.com/-/media/aci-footer]
This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


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

 [https://www.aciworldwide.com/-/media/aci-footer] 
This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

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

Re: Extended format system ZFS files

[Jousma, David]

BTW, this assumes that none of the ones you want to actually copy, are not 
using extended format features (like size).   My IBM supplied, z/OS filesystems 
are all non-SMS, and live on my sysres volume.

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President
david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
p 616.653.8429
f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jousma, David
Sent: Tuesday, September 19, 2017 3:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Extended format system ZFS files

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

If it were me, I'd use DFDSS to copy with rename the filesystems.   If 
applicable, IPL onto the new ones, before deleting the old ones.  I use DFDSS 
to clone filesystems as a regular part of maintenance.   If they are mounted 
READ only, then the DFDSS job can be run anywhere.  If mounted RDWR, you need 
to either unmount, or expect DFDSS to temporarily quiesce the filesystem from 
updates while running.

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H p 616.653.8429 f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shaffer, Terri
Sent: Tuesday, September 19, 2017 2:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Extended format system ZFS files

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

So I have a question.

Is it possible to convert my z/OS system ZFS files from SMS Extended to Non-SMS 
datasets?

What would be the process?  Repro out and back?  Is there a simpler way?

I know technically this works fine, but I don’t like my system datasets being 
SMS managed and the previous person here set this up.

Thanks

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​


[https://www.aciworldwide.com/-/media/aci-footer]
This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


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

Re: Extended format system ZFS files

[Jousma, David]

If it were me, I'd use DFDSS to copy with rename the filesystems.   If 
applicable, IPL onto the new ones, before deleting the old ones.  I use DFDSS 
to clone filesystems as a regular part of maintenance.   If they are mounted 
READ only, then the DFDSS job can be run anywhere.  If mounted RDWR, you need 
to either unmount, or expect DFDSS to temporarily quiesce the filesystem from 
updates while running.

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President
david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
p 616.653.8429
f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shaffer, Terri
Sent: Tuesday, September 19, 2017 2:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Extended format system ZFS files

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

So I have a question.

Is it possible to convert my z/OS system ZFS files from SMS Extended to Non-SMS 
datasets?

What would be the process?  Repro out and back?  Is there a simpler way?

I know technically this works fine, but I don’t like my system datasets being 
SMS managed and the previous person here set this up.

Thanks

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​


[https://www.aciworldwide.com/-/media/aci-footer]
This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


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

Re: Extended format system ZFS files

[Doug Fuerst]

 I'd back them up and restore to a different name. But if it ain't 
broke


Doug Fuerst
Principal Consultant
BK Associates
718.921.2620 (O)
917.572.7364 (C)
d...@bkassociates.net



-- Original Message --
From: "Shaffer, Terri" <017d5f778222-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@listserv.ua.edu
Sent: 19-Sep-17 2:11:06 PM
Subject: Extended format system ZFS files


So I have a question.

Is it possible to convert my z/OS system ZFS files from SMS Extended to 
Non-SMS datasets?


What would be the process? Repro out and back? Is there a simpler way?

I know technically this works fine, but I don’t like my system datasets 
being SMS managed and the previous person here set this up.


Thanks

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​


[https://www.aciworldwide.com/-/media/aci-footer]
This email message and any attachments may contain confidential, 
proprietary or non-public information. The information is intended 
solely for the designated recipient(s). If an addressing or 
transmission error has misdirected this email, please notify the sender 
immediately and destroy this email. Any review, dissemination, use or 
reliance upon this information by unintended recipients is prohibited. 
Any opinions expressed in this email are those of the author 
personally.


--
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: Extended format system ZFS files

[Allan Staller]

Depends on the size. Repro would be a *VERY BAD* idea. IBM has multiple caveats 
on how to handle ZFS files. 
IIRC REPRO is specifically forbidden.

The short answer is delete/define and copy with pax (or copytree).

There is no painless was to get from here to there.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shaffer, Terri
Sent: Tuesday, September 19, 2017 1:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Extended format system ZFS files

So I have a question.

Is it possible to convert my z/OS system ZFS files from SMS Extended to Non-SMS 
datasets?

What would be the process?  Repro out and back?  Is there a simpler way?

I know technically this works fine, but I don’t like my system datasets being 
SMS managed and the previous person here set this up.

Thanks

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​


[https://www.aciworldwide.com/-/media/aci-footer]
This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

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


::DISCLAIMER::


The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only.
E-mail transmission is not guaranteed to be secure or error-free as information 
could be intercepted, corrupted,
lost, destroyed, arrive late or incomplete, or may contain viruses in 
transmission. The e mail and its contents
(with or without referred errors) shall therefore not attach any liability on 
the originator or HCL or its affiliates.
Views or opinions, if any, presented in this email are solely those of the 
author and may not necessarily reflect the
views or opinions of HCL or its affiliates. Any form of reproduction, 
dissemination, copying, disclosure, modification,
distribution and / or publication of this message without the prior written 
consent of authorized representative of
HCL is strictly prohibited. If you have received this email in error please 
delete it and notify the sender immediately.
Before opening any email and/or attachments, please check them for viruses and 
other defects.




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

Extended format system ZFS files

[Shaffer, Terri]

So I have a question.

Is it possible to convert my z/OS system ZFS files from SMS Extended to Non-SMS 
datasets?

What would be the process?  Repro out and back?  Is there a simpler way?

I know technically this works fine, but I don’t like my system datasets being 
SMS managed and the previous person here set this up.

Thanks

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com​


[https://www.aciworldwide.com/-/media/aci-footer]
This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

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

Re: LPAR to LPAR access

[Nelson, Judith]

Thank you Jerry! 

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 11:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Sorry Judith,

Our email system modifies the URL.

I think this link should help with the setup of remote database from DB2 on 
z/OS.
www.ibm.com/support/knowledgecenter/en/SSEPEK_11.0.0/dshare/src/tpc/db2z_sysibmlocationsds.html,

Here is the BMC tool
www.bmc.com/it-solutions/subsystem-optimizer.html


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 12:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I think this link should help with the setup of remote database from DB2 on 
z/OS.
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_support_knowledgecenter_en_SSEPEK-5F11.0.0_dshare_src_tpc_db2z-5Fsysibmlocationsds.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=sJBowoFLA-8ocnbEpqCKvSdFmT2s355DrFGS5qkZq7M=

Here is the BMC tool
https://urldefense.proofpoint.com/v2/url?u=http-3A__www.bmc.com_it-2Dsolutions_subsystem-2Doptimizer.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=8dcWbFRJZ5UFFIwGKMcoOv5gW9_-1ldLc-jEYbQmIgw=

Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 11:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Hi Jerry,
You are correct with your assumption. :)

If I set up the database as remote, wouldn't I still need some kind of a client 
to connect to it?
Could you let me know which product from BMC would do this?

Thank you,

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 9:17 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I know of a couple of ways to get batch and CICS to access a remote DB2, which 
is what you are asking, I believe, because you don't want to setup a DB2 data 
sharing.

1) Within DB2, you can setup a database as a remote. DB2 admin should know how 
to do this.
2) BMC has a product that would allow CICS/Batch to connect to a remote DB2, 
like it is locally attached


Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 10:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: LPAR to LPAR access

Hi,
I am trying to find the best solution for the following problem.

We have two LPARs, one of them has DB2 running, the other one hasn't. We do not 
have a SYSPLEX.
We now want to access DB2 data in batch and through CICS, from the LPAR that 
doesn't have DB2 on it.

For the batch side, I looked at ODBC, but I couldn't find anything how to set 
this up from another z/OS.

I have set up a simple IPIC connection to connect CICS - CICS across LPAR's. 
The CICS's are talking. :)

Does anyone have any ideas that could help me?

Judith Nelson  | Senior Systems Programmer
Sammons(r) Financial Group Member Companies One Sammons Plaza  | Sioux Falls, 
SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com


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



This e-mail message, including any attachments, is for the sole use of the 
intended recipient(s) and may contain information that is confidential and 
protected by law from unauthorized disclosure. Any unauthorized review, use, 
disclosure or distribution is prohibited. If you are not the intended 
recipient, please contact the sender by reply e-mail and destroy all copies of 
the original message.

--
For IBM-MAIN 

Re: LPAR to LPAR access

[Edgington, Jerry]

Sorry Judith,

Our email system modifies the URL.

I think this link should help with the setup of remote database from DB2 on 
z/OS.
www.ibm.com/support/knowledgecenter/en/SSEPEK_11.0.0/dshare/src/tpc/db2z_sysibmlocationsds.html,

Here is the BMC tool
www.bmc.com/it-solutions/subsystem-optimizer.html


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 12:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I think this link should help with the setup of remote database from DB2 on 
z/OS.
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_support_knowledgecenter_en_SSEPEK-5F11.0.0_dshare_src_tpc_db2z-5Fsysibmlocationsds.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=sJBowoFLA-8ocnbEpqCKvSdFmT2s355DrFGS5qkZq7M=

Here is the BMC tool
https://urldefense.proofpoint.com/v2/url?u=http-3A__www.bmc.com_it-2Dsolutions_subsystem-2Doptimizer.html=DwIFAg=WUZzGzAb7_N4DvMsVhUlFrsw4WYzLoMP5bgx2U7ydPE=gEY-_N3_t4QXFrS5e-OgAibMMWGnLPFFfmDVHG_3lz4=Q2qvjC85EobRWAgHVl-yX2v319f6i9cuTloWg-wjmsE=8dcWbFRJZ5UFFIwGKMcoOv5gW9_-1ldLc-jEYbQmIgw=

Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 11:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Hi Jerry,
You are correct with your assumption. :)

If I set up the database as remote, wouldn't I still need some kind of a client 
to connect to it?
Could you let me know which product from BMC would do this?

Thank you,

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 9:17 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I know of a couple of ways to get batch and CICS to access a remote DB2, which 
is what you are asking, I believe, because you don't want to setup a DB2 data 
sharing.

1) Within DB2, you can setup a database as a remote. DB2 admin should know how 
to do this.
2) BMC has a product that would allow CICS/Batch to connect to a remote DB2, 
like it is locally attached


Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 10:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: LPAR to LPAR access

Hi,
I am trying to find the best solution for the following problem.

We have two LPARs, one of them has DB2 running, the other one hasn't. We do not 
have a SYSPLEX.
We now want to access DB2 data in batch and through CICS, from the LPAR that 
doesn't have DB2 on it.

For the batch side, I looked at ODBC, but I couldn't find anything how to set 
this up from another z/OS.

I have set up a simple IPIC connection to connect CICS - CICS across LPAR's. 
The CICS's are talking. :)

Does anyone have any ideas that could help me?

Judith Nelson  | Senior Systems Programmer
Sammons(r) Financial Group Member Companies One Sammons Plaza  | Sioux Falls, 
SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com


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



This e-mail message, including any attachments, is for the sole use of the 
intended recipient(s) and may contain information that is confidential and 
protected by law from unauthorized disclosure. Any unauthorized review, use, 
disclosure or distribution is prohibited. If you are not the intended 
recipient, please contact the sender by reply e-mail and destroy all copies of 
the original message.

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this 

Re: LPAR to LPAR access

[Edgington, Jerry]

Judith,

I think this link should help with the setup of remote database from DB2 on 
z/OS.
https://www.ibm.com/support/knowledgecenter/en/SSEPEK_11.0.0/dshare/src/tpc/db2z_sysibmlocationsds.html

Here is the BMC tool
http://www.bmc.com/it-solutions/subsystem-optimizer.html

Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 11:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Hi Jerry,
You are correct with your assumption. :)

If I set up the database as remote, wouldn't I still need some kind of a client 
to connect to it?
Could you let me know which product from BMC would do this?

Thank you,

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 9:17 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I know of a couple of ways to get batch and CICS to access a remote DB2, which 
is what you are asking, I believe, because you don't want to setup a DB2 data 
sharing.

1) Within DB2, you can setup a database as a remote. DB2 admin should know how 
to do this.
2) BMC has a product that would allow CICS/Batch to connect to a remote DB2, 
like it is locally attached


Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 10:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: LPAR to LPAR access

Hi,
I am trying to find the best solution for the following problem.

We have two LPARs, one of them has DB2 running, the other one hasn't. We do not 
have a SYSPLEX.
We now want to access DB2 data in batch and through CICS, from the LPAR that 
doesn't have DB2 on it.

For the batch side, I looked at ODBC, but I couldn't find anything how to set 
this up from another z/OS.

I have set up a simple IPIC connection to connect CICS - CICS across LPAR's. 
The CICS's are talking. :)

Does anyone have any ideas that could help me?

Judith Nelson  | Senior Systems Programmer
Sammons(r) Financial Group Member Companies One Sammons Plaza  | Sioux Falls, 
SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com


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



This e-mail message, including any attachments, is for the sole use of the 
intended recipient(s) and may contain information that is confidential and 
protected by law from unauthorized disclosure. Any unauthorized review, use, 
disclosure or distribution is prohibited. If you are not the intended 
recipient, please contact the sender by reply e-mail and destroy all copies of 
the original message.

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


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



This e-mail message, including any attachments, is for the sole use of the 
intended recipient(s) and may contain information that is confidential and 
protected by law from unauthorized disclosure. Any unauthorized review, use, 
disclosure or distribution 

Re: IBM Doc Buddy V2 fix release available

[Jesse 1 Robinson]

I never experienced the back button problem but read the posts. I just tried 
Doc Buddy now and it worked as expected.

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jialei Ma
Sent: Tuesday, September 19, 2017 12:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):IBM Doc Buddy V2 fix release available

Greetings,

We'd like to notify you that the fix release for IBM Doc Buddy mobile app V2 is 
available. We listened to your earlier feedback about the back arrow behavior 
and has delivered the fixes. 

Do you look up IBM Z error messages to resolve technical issues? Would you like 
to receive IBM Z product updates and connect with IBM mainframe experts? Get 
the best of both worlds with our new features. The app is available in Apple 
App Store and Google Play. 

* For more information, check out the IBM Doc Buddy home page 
https://ibmdocbuddy.mybluemix.net/
* Send any feedback to our support mail account spt...@cn.ibm.com

Thank you!

IBM Doc Buddy team


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

Re: LPAR to LPAR access

[Nelson, Judith]

Hi Jerry, 
You are correct with your assumption. :)

If I set up the database as remote, wouldn't I still need some kind of a client 
to connect to it? 
Could you let me know which product from BMC would do this? 

Thank you,

Judith Nelson


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edgington, Jerry
Sent: Tuesday, September 19, 2017 9:17 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: LPAR to LPAR access

Judith,

I know of a couple of ways to get batch and CICS to access a remote DB2, which 
is what you are asking, I believe, because you don't want to setup a DB2 data 
sharing.

1) Within DB2, you can setup a database as a remote. DB2 admin should know how 
to do this.
2) BMC has a product that would allow CICS/Batch to connect to a remote DB2, 
like it is locally attached


Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 10:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: LPAR to LPAR access

Hi,
I am trying to find the best solution for the following problem.

We have two LPARs, one of them has DB2 running, the other one hasn't. We do not 
have a SYSPLEX.
We now want to access DB2 data in batch and through CICS, from the LPAR that 
doesn't have DB2 on it.

For the batch side, I looked at ODBC, but I couldn't find anything how to set 
this up from another z/OS.

I have set up a simple IPIC connection to connect CICS - CICS across LPAR's. 
The CICS's are talking. :)

Does anyone have any ideas that could help me?

Judith Nelson  | Senior Systems Programmer
Sammons(r) Financial Group Member Companies One Sammons Plaza  | Sioux Falls, 
SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com


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



This e-mail message, including any attachments, is for the sole use of the 
intended recipient(s) and may contain information that is confidential and 
protected by law from unauthorized disclosure. Any unauthorized review, use, 
disclosure or distribution is prohibited. If you are not the intended 
recipient, please contact the sender by reply e-mail and destroy all copies of 
the original message.

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


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

Re: REXX performance

[Martin Packer]

Excellent!

Sounds like almost all the pathlength was in REXX statements, not external 
programs.

Cheers, Martin

Martin Packer,
zChampion, Principal Systems Investigator,
Worldwide Cloud & Systems Performance, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: 
https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker

Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/or 
  
https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id1127943573?mt=2



From:   Jean Bernard 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   19/09/2017 14:22
Subject:Re: REXX performance
Sent by:IBM Mainframe Discussion List 



Many thanks for the replies, who gave us some ideas. We tried the time 
function and see that input file was heavy manipulated.
i compiled the program and see a reduction of 88% in CPU with exact same 
output result ! so here the Rexx compiler do the job. 

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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU

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

Re: JCL and PassPhrases?

[Paul Gilmartin]

On Tue, 19 Sep 2017 14:19:20 +, Dyck, Lionel B. (TRA) wrote:

>We are investigating converting users from passwords to passphrases and I was 
>told that both JES2 and JES3 will generate a JCL error if the password in JCL 
>exceeded 8 characters.
>
>How do shops get around this to use passphrases?
> 
The JCL Ref. AFAICT, mentions "password phrase" only in connection with the
JOB statement and the JOBGROUP statement.

Where else were you trying to use a passphrase?

Like too many z/OS enhancements, the implementation of password phrases is
spotty; half-baked.  They're supported in a minuscule minority of contexts;
unsupported in the vast majority.

-- gil

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

Re: GETMSG null with out ADABAS command

[Jousma, David]

Jorge,

I've posted this before, but maybe you might try this exec for issuing console 
commands, and this JCL to execute it:

//OPERCMD   EXEC PGM=IKJEFT1B,PARM='%OPERCMDB',REGION=32M 
//SYSEXEC   DD   DSN=your.SYSEXEC.dataset,DISP=SHR
//SYSIN DD   *
F CACEPS71,CMD,CACDS,"REPORT"
/*
//SYSTSIN  DD   DUMMY 
//SYSTSPRT DD   DUMMY 

/* REXX */   
/* this REXX exec will issue operator commands via SDSF REXX interface   
   security is based on the person using the command.  this exec is to be
   used for batch only   */  
'EXECIO * DISKR SYSIN (STEM mycmd. FINIS'
if rc > 0 then do
   say 'Return code from OPEN was' rc
   say 'Aborting...' 
   exit  
   end   
 
/* Allocate results output file  */  
Call BPXWDYN "alloc rtddn(ddnm) sysout"  
 
/* Process all input commands*/  
Do c=1 to mycmd.0
 oper_command.0 = 1  
 oper_command.1 = mycmd.c
 Call Main_process   
End  
 
/* Free results output file  */  
Call BPXWDYN "free fi(ddnm)"
Return 0

Main_process:   
/* process all data from SYSIN   */ 
rc=isfcalls('ON')   
Address SDSF ISFSLASH "("oper_command.") (WAIT)"
l_cnt = 0   
If datatype(isfulog.0) = "NUM" Then Do  
 If isfulog.0 <> 0 Then Do  
  l_cnt = l_cnt + 1 
  l.l_cnt = substr(isfulog.1,1,43)  
  Do ix=1 to isfulog.0  
   ll = length(isfulog.ix)  
   if ll <> 0 Then  
qdata = substr(isfulog.ix,44,ll-43) 
   else 
qdata = isfulog.ix  
   l_cnt = l_cnt + 1
   l.l_cnt = qdata  
  End   
 End
 Else Do
  l_cnt = l_cnt + 1
  l.l_cnt = "No command response available"
 End   
End
Else Do
 l_cnt = l_cnt + 1 
 l.l_cnt = "Error in command reponse"  
End
rc=isfcalls("OFF") 
If (l_cnt = 0) Then Do 
 l_cnt = l_cnt + 1 
 l.l_cnt = ' /* no data produced */'   
End
l.0 = l_cnt
Address MVS "ExecIO "l_cnt" DiskW "ddnm" (Finis Stem l.)"  
l_cnt = 0  
Return 

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President
david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
p 616.653.8429
f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 

JCL and PassPhrases?

[Dyck, Lionel B. (TRA)]

We are investigating converting users from passwords to passphrases and I was 
told that both JES2 and JES3 will generate a JCL error if the password in JCL 
exceeded 8 characters.

How do shops get around this to use passphrases?

Thanks in advance.

--
Lionel B. Dyck
Mainframe Systems Programmer - TRA


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

Re: LPAR to LPAR access

[Edgington, Jerry]

Judith,

I know of a couple of ways to get batch and CICS to access a remote DB2, which 
is what you are asking, I believe, because you don't want to setup a DB2 data 
sharing.

1) Within DB2, you can setup a database as a remote. DB2 admin should know how 
to do this.
2) BMC has a product that would allow CICS/Batch to connect to a remote DB2, 
like it is locally attached


Jerry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nelson, Judith
Sent: Tuesday, September 19, 2017 10:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: LPAR to LPAR access

Hi,
I am trying to find the best solution for the following problem.

We have two LPARs, one of them has DB2 running, the other one hasn't. We do not 
have a SYSPLEX.
We now want to access DB2 data in batch and through CICS, from the LPAR that 
doesn't have DB2 on it.

For the batch side, I looked at ODBC, but I couldn't find anything how to set 
this up from another z/OS.

I have set up a simple IPIC connection to connect CICS - CICS across LPAR's. 
The CICS's are talking. :)

Does anyone have any ideas that could help me?

Judith Nelson  | Senior Systems Programmer
Sammons(r) Financial Group Member Companies One Sammons Plaza  | Sioux Falls, 
SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com


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



This e-mail message, including any attachments, is for the sole use of the 
intended recipient(s) and may contain information that is confidential and 
protected by law from unauthorized disclosure. Any unauthorized review, use, 
disclosure or distribution is prohibited. If you are not the intended 
recipient, please contact the sender by reply e-mail and destroy all copies of 
the original message.

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

LPAR to LPAR access

[Nelson, Judith]

Hi,
I am trying to find the best solution for the following problem.

We have two LPARs, one of them has DB2 running, the other one hasn't. We do not 
have a SYSPLEX.
We now want to access DB2 data in batch and through CICS, from the LPAR that 
doesn't have DB2 on it.

For the batch side, I looked at ODBC, but I couldn't find anything how to set 
this up from another z/OS.

I have set up a simple IPIC connection to connect CICS - CICS across LPAR's. 
The CICS's are talking. :)

Does anyone have any ideas that could help me?

Judith Nelson  | Senior Systems Programmer
Sammons(r) Financial Group Member Companies
One Sammons Plaza  | Sioux Falls, SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com


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

Re: GETMSG null with out ADABAS command

[Dale R. Smith]

On Tue, 19 Sep 2017 02:39:55 -0500, Jorge Garcia  wrote:

>*  getcode = GETMSG('salida.','SOL',CARTEVEP,,10)   
>   >L>"salida."  
>   >L>"SOL"  
>   >L>"CARTEVEP" 
>   >L>"" 
>   >L>"10"   

Jorge, I noticed that the stem name you are passing to GETMSG is in quotes, 
therfore a literal, but it's in lower case.  Try making it upper case as most 
REXX functions use the Symbolic interface instead of the Direct interface.  
REXX variables can be specified in a case, but names of variables passed to 
functions must be uppercase.  Using quotes around a name is also a good idea, 
but then you must enter it as upper case.

-- 
Dale R. Smith

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

Re: GETMSG null with out ADABAS command

[Richards, Robert B.]

Just in case we are getting hung up on quotes, please put the command in a 
variable:

con_input = 'F CACEPS71,CMD,CACDS,"REPORT") '

Then reference it like this:

pass_arg. = "CONSOLE SYSCMD("con_input") CART(CARTREVP)"

then after the console activation just this:

pass_arg.

The next statement should be the getcode = 0

Let me know if this makes a difference.

Bob

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jorge Garcia
Sent: Tuesday, September 19, 2017 9:40 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: GETMSG null with out ADABAS command

Excuse me Bob. I post the REXX code

/* REXX */ 
TRACE I
"CONSOLE DEACTIVATE"   
"CONSPROF SOLDISP(NO) SOLNUM(400)" 
"CONSOLE ACTIVATE NAME("USERID()")"
if rc <> 0 then
do 
 say "CONSOLE Activation problem - " rc
end
"CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,"REPORT") CART(CARTEVEP)" 
/*ADDRESS CONSOLE "F CACEPS71,CMD,CACDS,"REPORT"" */   
getcode = 0
Do while getcode = 0/* get console message  */ 
  getcode = GETMSG('salida.','SOL',CARTEVEP,,10)   
  If getcode = 0 then  
Do 
  Do i = 1 to salida.0 
 k = i + j 
  wto.k = salida.i
   End
  j = j + salida.0
 End  
 End  
 Do ii = 1 to wto.0   
Say wto.ii
ii = ii + 1   
  End 

Thanks

--
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: GETMSG null with out ADABAS command

[Jorge Garcia]

Excuse me Bob. I post the REXX code

/* REXX */ 
TRACE I
"CONSOLE DEACTIVATE"   
"CONSPROF SOLDISP(NO) SOLNUM(400)" 
"CONSOLE ACTIVATE NAME("USERID()")"
if rc <> 0 then
do 
 say "CONSOLE Activation problem - " rc
end
"CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,"REPORT") CART(CARTEVEP)" 
/*ADDRESS CONSOLE "F CACEPS71,CMD,CACDS,"REPORT"" */   
getcode = 0
Do while getcode = 0/* get console message  */ 
  getcode = GETMSG('salida.','SOL',CARTEVEP,,10)   
  If getcode = 0 then  
Do 
  Do i = 1 to salida.0 
 k = i + j 
  wto.k = salida.i
   End
  j = j + salida.0
 End  
 End  
 Do ii = 1 to wto.0   
Say wto.ii
ii = ii + 1   
  End 

Thanks

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

Re: REXX performance

[Jean Bernard]

Many thanks for the replies, who gave us some ideas. We tried the time function 
and see that input file was heavy manipulated.
i compiled the program and see a reduction of 88% in CPU with exact same output 
result ! so here the Rexx compiler do the job.

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

simple rexx sort

[Dyck, Lionel B. (TRA)]

I needed a simple sort for the words in a string and came up with this - hope 
it helps others.  There are probably better ways to do this so feel free to 
share:

/* -- rexx  *
| Simple bubble sort for words in a string (array) |
*  */
  string = '10 0 1 9 6 2 4 3'
  do imx = 1 to words(string)-1
do im = 1 to words(string)
  w1 = word(string,im)
  w2 = word(string,im+1)
  if w1 > w2 then do
if im > 1
then  lm = subword(string,1,im-1)
else lm = ''
rm = subword(string,im+2)
string = lm w2 w1 rm
  end
end
  end
  say string


--
Lionel B. Dyck
Mainframe Systems Programmer - TRA


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

Re: STC - APF - confusion

[Walt Farrell]

On Sun, 17 Sep 2017 22:35:23 +, scott Ford  wrote:
>We are using all functions, since we function as what is now being called a
>central site administrator.

If you are indeed using _all_ the functions of r_admin (which I suppose is 
possible, though it seems unlikely to me) then you will need to be able to run 
in supervisor state as required for some of the functions. Therefore, I believe 
that APF-authorization will be important to you, and attempting to have all 
your modules linked as AC(0) will not work. You will need at least the initial 
module linked AC(1), and run from an authorized library, so you can switch to 
supervisor state before invoking those functions.

Alternatively, I suppose you could run without APF-authorization if you have 
your initial program listed in the PPT as requiring a system key, as running in 
a system key will also allow you to switch to supervisor state. On the whole, 
though, running APF-authorized is probably simpler and may be safer.

-- 
Walt

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

Re: GETMSG null with out ADABAS command

[Richards, Robert B.]

Jorge,

Please post the current state of the code *without* the trace version.

Bob 
(not Richard...Richards is my last name)

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jorge Garcia
Sent: Tuesday, September 19, 2017 3:40 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: GETMSG null with out ADABAS command

Hi Richard, Elardus,

 Below last execution with the updates -->

<"CONSOLE ACTIVATE NAME("USERID()")" 

I don't see any results of that CONSOL ACTIVATE command in your posted TRACE.

Can you retry your REXX with the below statements I posted earlier?

"CONSOLE ACTIVATE NAME("USERID()")" 
if rc <> 0 then
do 
 say "CONSOLE Activation problem - " rc
end 
ADDRESS CONSOLE  etc ... >>

5 *-* "CONSOLE ACTIVATE NAME("USERID()")"  
  >L>   "CONSOLE ACTIVATE NAME("   
  >F>   "JGARCI1"  
  >O>   "CONSOLE ACTIVATE NAME(JGARCI1"
  >L>   ")"
  >O>   "CONSOLE ACTIVATE NAME(JGARCI1)"   
6 *-* if rc <> 0   
  >V>   "0"
  >L>   "0"
  >O>   "0"

<>

Done

10 *-* "CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,"REPORT") CART(CARTEVEP)"
   >L>   "CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,"  
   >L>   "REPORT"
   >O>   "CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,REPORT"
   >L>   ") CART(CARTEVEP)"  
   >O>   "CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,REPORT) CART(CARTEVEP)"
11 *-* /**/  
12 *-* getcode = 0   
   >L>   "0" 
13 *-* Do while getcode = 0/**/  
   >V>   "0" 
   >L>   "0" 
   >O>   "1" 
14 *-*  getcode = GETMSG('salida.','SOL',CARTEVEP,,10)   
   >L>"salida."  
   >L>"SOL"  
   >L>"CARTEVEP" 
   >L>"" 
   >L>"10"   
   >F>"4"
15 *-*  If getcode = 0   
   >V>"4"
   >L>"0"
   >O>"0"
23 *-* End   
13 *-* Do while getcode = 0/**/  
   >V>   "4" 
   >L>   "0" 
   >O>   "0" 
24 *-* Do ii = 1 to wto.0
   >L>   "1" 
   >L>   "WTO.0" 
24 +++  Do ii = 1 to wto.0   
IRX0041I Error running COMANDO4, line 24: Bad arithmetic conversion  
READY
END  

Regards


5 *-* "CONSOLE ACTIVATE NAME("USERID()")"  
  >L>   "CONSOLE ACTIVATE NAME("   
  >F>   "JGARCI1"  
  >O>   "CONSOLE ACTIVATE NAME(JGARCI1"
  >L>   ")"
  >O>   "CONSOLE ACTIVATE NAME(JGARCI1)"   
6 *-* if rc <> 0   
  >V>   "0"
  >L>   "0"
  >O>   "0"

--
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: REXX and SDSF question

[Peter Ten Eyck]

Yes, that API does sound nice. This is the technique documented in the Redbook 
for REXX and SDSF, which was the starting point for my REXX script. Thanks for 
the tip.

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

Re: REXX performance

[Jeremy Nicoll]

On Tue, 19 Sep 2017, at 10:20, Martin Packer wrote:

> On the first question I generally just use a say with the time function - 
> but that just gives me ELAPSED time. Might be a good approach to
> searching 
> for the culprit.

Or store a succession of short descriptive texts and elapsed times in a 
stem array, and as the exec is ending, write all of that to a dataset.

I used to have production code that did that sort of thing (for
debugging)
and then TSO TRANSMITted the 'trace' dataset back to my team.  We had 
automation in place that spotted incoming files, automatically received 
them placing them in files with a high level qualifier we 'owned' and
then 
sent us messages saying another file had arrived so we could examine
them.


-- 
Jeremy Nicoll - my opinions are my own.

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

Re: REXX performance

[Martin Packer]

There are two questions embedded in this:

How to work out where the CPU time is going.
Whether compiled REXX will go faster.

On the first question I generally just use a say with the time function - 
but that just gives me ELAPSED time. Might be a good approach to searching 
for the culprit.

On the second question, it really depends on how much time is spent in 
REXX code and how much time in the things it calls. In our case most of 
the time is in the things it's orchestrating so compiling never made much 
sense/difference.

Cheers, Martin

Martin Packer,
zChampion, Principal Systems Investigator,
Worldwide Cloud & Systems Performance, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: 
https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker

Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/or 
  
https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id1127943573?mt=2



From:   Jean Bernard 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   19/09/2017 09:47
Subject:REXX performance
Sent by:IBM Mainframe Discussion List 



Hello. I'm looking for a software (like STROBE, or IBM APA for Cobol or 
Db2 program) that can explain us where interpreted REXX CPU consumption 
is. We tried APA but it says IRX modules and i cannot map with source 
code. We tried EXECUTIL but it list the sequence of instruction, not the 
CPU part of it. Does it exist suche a software ? will it be better if i 
use Compiled Rexx ?
Thank's

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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU

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

REXX performance

[Jean Bernard]

Hello. I'm looking for a software (like STROBE, or IBM APA for Cobol or Db2 
program) that can explain us where interpreted REXX CPU consumption is. We 
tried APA but it says IRX modules and i cannot map with source code. We tried 
EXECUTIL but it list the sequence of instruction, not the CPU part of it. Does 
it exist suche a software ? will it be better if i use Compiled Rexx ?
Thank's

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

Re: GETMSG null with out ADABAS command

[Jorge Garcia]

Hi Richard, Elardus,

 Below last execution with the updates -->

<"CONSOLE ACTIVATE NAME("USERID()")" 

I don't see any results of that CONSOL ACTIVATE command in your posted TRACE.

Can you retry your REXX with the below statements I posted earlier?

"CONSOLE ACTIVATE NAME("USERID()")" 
if rc <> 0 then
do 
 say "CONSOLE Activation problem - " rc
end 
ADDRESS CONSOLE  etc ... >>

5 *-* "CONSOLE ACTIVATE NAME("USERID()")"  
  >L>   "CONSOLE ACTIVATE NAME("   
  >F>   "JGARCI1"  
  >O>   "CONSOLE ACTIVATE NAME(JGARCI1"
  >L>   ")"
  >O>   "CONSOLE ACTIVATE NAME(JGARCI1)"   
6 *-* if rc <> 0   
  >V>   "0"
  >L>   "0"
  >O>   "0"

<>

Done

10 *-* "CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,"REPORT") CART(CARTEVEP)"
   >L>   "CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,"  
   >L>   "REPORT"
   >O>   "CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,REPORT"
   >L>   ") CART(CARTEVEP)"  
   >O>   "CONSOLE SYSCMD(F CACEPS71,CMD,CACDS,REPORT) CART(CARTEVEP)"
11 *-* /**/  
12 *-* getcode = 0   
   >L>   "0" 
13 *-* Do while getcode = 0/**/  
   >V>   "0" 
   >L>   "0" 
   >O>   "1" 
14 *-*  getcode = GETMSG('salida.','SOL',CARTEVEP,,10)   
   >L>"salida."  
   >L>"SOL"  
   >L>"CARTEVEP" 
   >L>"" 
   >L>"10"   
   >F>"4"
15 *-*  If getcode = 0   
   >V>"4"
   >L>"0"
   >O>"0"
23 *-* End   
13 *-* Do while getcode = 0/**/  
   >V>   "4" 
   >L>   "0" 
   >O>   "0" 
24 *-* Do ii = 1 to wto.0
   >L>   "1" 
   >L>   "WTO.0" 
24 +++  Do ii = 1 to wto.0   
IRX0041I Error running COMANDO4, line 24: Bad arithmetic conversion  
READY
END  

Regards


5 *-* "CONSOLE ACTIVATE NAME("USERID()")"  
  >L>   "CONSOLE ACTIVATE NAME("   
  >F>   "JGARCI1"  
  >O>   "CONSOLE ACTIVATE NAME(JGARCI1"
  >L>   ")"
  >O>   "CONSOLE ACTIVATE NAME(JGARCI1)"   
6 *-* if rc <> 0   
  >V>   "0"
  >L>   "0"
  >O>   "0"

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

IBM Doc Buddy V2 fix release available

[Jialei Ma]

Greetings,

We'd like to notify you that the fix release for IBM Doc Buddy mobile app V2 is 
available. We listened to your earlier feedback about the back arrow behavior 
and has delivered the fixes. 

Do you look up IBM Z error messages to resolve technical issues? Would you like 
to receive IBM Z product updates and connect with IBM mainframe experts? Get 
the best of both worlds with our new features. The app is available in Apple 
App Store and Google Play. 

* For more information, check out the IBM Doc Buddy home page 
https://ibmdocbuddy.mybluemix.net/ 
* Send any feedback to our support mail account spt...@cn.ibm.com

Thank you!

IBM Doc Buddy team

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