Re: Spool Data Set Browse with secondary JES2

2020-01-06 Thread Ed Jaffe

On 1/2/2020 6:04 PM, John Szura wrote:

I have a SDSB that works when JES2 is the primary subsystem but gets an
S99ERROR=X'0478' when JES2 is the secondary and JES3 is the primary.  In
both instances I have a DALUASSR text unit pointing to the appropriate
JES2 name (which is JES2 in both cases).  I have not been able to figure
out what the difference may be.  Both instances are on R2.3.  Any
ideas?  Thanks.



Do you have an SSIB pointing to the secondary JES2? Or are you depending 
on the life-of-job SSIB implicitly provided by JES3?



--
Phoenix Software International
Edward E. Jaffe
831 Parkview Drive North
El Segundo, CA 90245
https://www.phoenixsoftware.com/



This e-mail message, including any attachments, appended messages and the
information contained therein, is for the sole use of the intended
recipient(s). If you are not an intended recipient or have otherwise
received this email message in error, any use, dissemination, distribution,
review, storage or copying of this e-mail message and the information
contained therein is strictly prohibited. If you are not an intended
recipient, please contact the sender by reply e-mail and destroy all copies
of this email message and do not otherwise utilize or retain this email
message or any or all of the information contained therein. Although this
email message and any attachments or appended messages are believed to be
free of any virus or other defect that might affect any computer system into
which it is received and opened, it is the responsibility of the recipient
to ensure that it is virus free and no responsibility is accepted by the
sender for any loss or damage arising in any way from its opening or use.

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


Re: Spool Data Set Browse with secondary JES2

2020-01-06 Thread Rob Scott
Grab the contents of S99INFO and call IBM support.

On 3 Jan 2020 11:21 pm, Kirk Wolf  wrote:
EXTERNAL EMAIL





Need more information as to exactly what you have in in your S99 plist.
What verb? what flags? which TUs?

On Thu, Jan 2, 2020 at 8:05 PM John Szura  wrote:

> I have a SDSB that works when JES2 is the primary subsystem but gets an
> S99ERROR=X'0478' when JES2 is the secondary and JES3 is the primary.  In
> both instances I have a DALUASSR text unit pointing to the appropriate
> JES2 name (which is JES2 in both cases).  I have not been able to figure
> out what the difference may be.  Both instances are on R2.3.  Any
> ideas?  Thanks.
>
> j
>
>
> --
> John Szura
> Lead Mainframe Product Developer
> Tone Software Corp.
> +1(714)507-2354
>
>   IMPORTANT NOTICE:
>
> This is a private message. The information in this email (including any
> attachments) is confidential and proprietary to Tone Software
> Corporation, and is provided solely for the use of the individual or
> entity to which it is addressed. Any review, reliance upon, printing,
> distribution, or forwarding without express permission of its sender is
> strictly prohibited. If you are not its intended recipient, please
> immediately delete this email without copying and kindly advise me by
> email of the mistaken delivery.
>
>
>
>
> --
> 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


Rocket Software, Inc. and subsidiaries ? 77 Fourth Avenue, Waltham MA 02451 ? 
Main Office Toll Free Number: +1 855.577.4323
Contact Customer Support: 
https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy


This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

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


Re: Enterprise COBOL 6.3 and IBM Programmer Tools

2020-01-06 Thread Don Poitras
In article 

 you wrote:
> >So what can you do *today* if you have an immediate requirement for an AMODE 
> >64 COBOL program per Tom Savor's comment, a program that must run both in 
> >CICS >Transaction Server for z/OS and in non-CICS batch mode? Tom Marchant 
> >provides one answer that works today and is fully IBM supported:
> >compile both AMODE 31 and AMODE 64 versions of the same COBOL program from 
> >the same source code. Invoke the former within CICS TS, and invoke the 
> >latter in (non->CICS) batch, assuming the program can otherwise run both 
> >inside and outside CICS TS. Before you dismiss this idea out of hand, let's 
> >recognize that many software vendors >already do this and have for many 
> >years, for example when they compile and distribute "performance tuned" and 
> >"compatible" releases of their software products, each using >different 
> >compiler parameters (ARCH, TUNE, etc., as applicable). Also, "debug" and 
> >"non-debug" versions, and "ABO'ed" and "non-ABO'ed." Importantly, it's not 
> >two versions >of source code; it's only two versions post-compilation.

> For us, the programs that run in Batch and Online are DB2 i/o programs.  So 
> your solution wont work for us as SQL and LP(64) are in-compatible.
>  

> Thanks,

> Tom Savor

There is a painful work-around. Use an assembler stub to call the DB2
API in amode 31. Allocate all storage that will be written to or read
from DB2 in storage allocated below the bar. I've done this in C, so
I have to think it's possible to do in COBOL. I see there is an 
ALLOCATE statement that can be used to get dynamic storage below the
bar. In C, we use __malloc31().

Of course, it would be much better if DB2 would provide a 64-bit API.
Now that C, COBOL and PL1 are able to run amode=64, I think there's
a good argument to be made that this should be a priority.

-- 
Don Poitras - SAS Development  -  SAS Institute Inc. - SAS Campus Drive
sas...@sas.com   (919) 531-5637Cary, NC 27513

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


Re: Enterprise COBOL 6.3 and IBM Programmer Tools

2020-01-06 Thread Savor, Thomas (Alpharetta)
>So what can you do *today* if you have an immediate requirement for an AMODE 
>64 COBOL program per Tom Savor's comment, a program that must run both in CICS 
>>Transaction Server for z/OS and in non-CICS batch mode? Tom Marchant provides 
>one answer that works today and is fully IBM supported:
>compile both AMODE 31 and AMODE 64 versions of the same COBOL program from the 
>same source code. Invoke the former within CICS TS, and invoke the latter in 
>(non->CICS) batch, assuming the program can otherwise run both inside and 
>outside CICS TS. Before you dismiss this idea out of hand, let's recognize 
>that many software vendors >already do this and have for many years, for 
>example when they compile and distribute "performance tuned" and "compatible" 
>releases of their software products, each using >different compiler parameters 
>(ARCH, TUNE, etc., as applicable). Also, "debug" and "non-debug" versions, and 
>"ABO'ed" and "non-ABO'ed." Importantly, it's not two versions >of source code; 
>it's only two versions post-compilation.

For us, the programs that run in Batch and Online are DB2 i/o programs.  So 
your solution wont work for us as SQL and LP(64) are in-compatible.
 

Thanks,

Tom Savor

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


Re: ZOWE Open Editor - baby's first steps questions

2020-01-06 Thread Seymour J Metz
> Well, then, make one up.

I don't have to; IBM already did, lo these many years ago. WPS is even in wiki.

> "Eu" as the Greek prefix meaning "good"?

See the post from Curtis and follow the link.

> The problem with the shebang is that not all standard executables
> reside in the same directory. 

True, although there are often links in standard directories.

> What's the magic formula for Assembler source? 

An extended attribute of filetype=asm

No, that wasn't in Multics either.

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



From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Sunday, January 5, 2020 6:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ZOWE Open Editor - baby's first steps questions

On 2020-01-05, at 14:24:01, Seymour J Metz wrote:
>
>> WPS?
>
> https://secure-web.cisco.com/175ptt1Kz9pGdV298nz4QhXdfY5aH7x8MD1myITUHSOIFCfpchmkblSObuT53BGJmEVivoh9Bd3SyP7BQ3usz2dl3b8hW8GXiy2fTrSBZ0AcStB24YxVv5_aC4VjUJI4t430Lx-rcX6IC3QxMFZ-OVk5Ow6Hz4vQlZLdoUsYWwSsWj8_7lUQ8q92O6ZJYqAd09LMuMcurzuIp5Wny1T4tIFCRhuRx54siWfs8htdHCwU5jfNVJ7A7gkpCaFqz7T3o05uRuBNePaqrua4NB1EMWr1NT__Jqjc_CKxGizsHMhvxyZwUBnuyTXwJZ8Zu1w5qlUCLBDe4kEa4K0-v3L649D4Yd_YTTUwNFzz6ThiMpATK9HGkZC44oNP3EhA1dZ6r/https%3A%2F%2Fen.wikipedia.org%2Fwiki%2FWorkplace_Shell
>
>> Pick one:
>
> Why? None of them is relevant.
>
Well, then, make one up.

>> ISPF has long treated the LLQ of the DSN as a file type.
>
> TSO used the LLQ before ISPF did, but it's just a hint, not a file type. It's 
> still part of the name.
>
>> o MacOS has long had an elaborate system of metadata.
>
> That's the good news.
>
>> Alas,   it's not portable, and vanishing beneath the tide of Windows
>> conventions.  MacOS support of MIME types seems to be likewise
>> eroding.
>
> And that's the bad news.
>
>> o UNIX magic numbers are widely despised among partisans of
>> other OSes.
>
> Do they also despise the shebang? While I spell it Eunix, that's one of the 
> good things about it.
>
"Eu" as the Greek prefix meaning "good"?

The problem with the shebang is that not all standard executables
reside in the same directory.  A problem with POSIX is tnat it
permits this.

And embedding the type in the file body is about as bad as in the
name.  What's the magic formula for Assembler source?  CSECT?
DSECT?  MACRO?  START?  ...

-- gil

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


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


Re: ZOWE Open Editor - baby's first steps questions

2020-01-06 Thread Seymour J Metz
Link saved. Thanks.


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



From: IBM Mainframe Discussion List  on behalf of 
Pew, Curtis G 
Sent: Monday, January 6, 2020 8:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ZOWE Open Editor - baby's first steps questions

On Jan 5, 2020, at 5:23 PM, Paul Gilmartin 
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
>> Do they also despise the shebang? While I spell it Eunix, that's one of the 
>> good things about it.
>>
> "Eu" as the Greek prefix meaning "good"?

I suspect it’s like “eunuchs”. 
https://secure-web.cisco.com/1mbHb-aazPjKyd0jc7PVAjuqt0tuY5-CCjyGY4InS5QsaylVATpyEAs7jSmdV1zRRZVlWxXSw60tL2YvRzznt0mWjzjR5YBDrcbGDdby0Ro5h3ZcPmq-KTZl197DRkC_Q4ajk5x5L6WFOGPApqajMKnm4-mIedv1QHxB0HcO7K6xNKUT1Lrv5Mqx8TS6SXaebiSaYIAK37oGda8PpjMdMSUkZuNI0dHeg2vt2m9klHggBGNUsEVa9LxzRr3M4LijMaDDT0Jv7nHfNAJ_TqFTDjXCgJ17pUAX2JbmAzwpiJjQGWhnJrA3avamTDs7mu2ZHV0jLaHiLcDZzXDG4aWwvgBO3iDir6LCCYyRgEOBCwdiksb_sFt5OEb5N3f0wHHe5ykQ8sYg32hDeS8fvI1FSNAdFy-zTXc4r8SDZY5nlIlxjt1JcM0b82TO5ZpaXLA6P/https%3A%2F%2Fdilbert.com%2Fstrip%2F1993-11-09


--
Pew, Curtis G
curtis@austin.utexas.edu






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

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


Re: zOSMF

2020-01-06 Thread scott Ford
Attila:

I wasnt sure if ICSF was a hard requirement for zOSMF. It looks like 'yes'.
Thats all I needed to know. This was a management question.

Scott

On Sat, Jan 4, 2020 at 6:38 PM Attila Fogarasi  wrote:

> If ICSF is active then zOSMF requires configuration to permit it to the
> RACF resource classes for ICSF (this is in the zOSMF config).  Older
> systems can run without ICSF, but starting with z/OS 2.3 it is mandatory to
> run ICSF as it is needed to meet NIST certification for PKI.  So in z/OS
> 2.3 it is true zOSMF requires ICSF;  most older systems will also due to
> cascading dependencies, such as Db2 version function.  I don't know of a
> way to turn off ICSF in z/OS 2.3 but then I have never attempted to do that
> (why would you disable such great function?).
>
> On Sun, Jan 5, 2020 at 8:44 AM scott Ford  wrote:
>
> > All:
> >
> > I am new to zOSMF, does zOSMF require CSF and ICSF ?
> > It appears it does ...
> >
> > Scott
> >
> > --
> >
> >
> >
> > *IDMWORKS *
> >
> > Scott Ford
> >
> > z/OS Dev.
> >
> >
> >
> >
> > “By elevating a friend or Collegue you elevate yourself, by demeaning a
> > friend or collegue you demean yourself”
> >
> >
> >
> > www.idmworks.com
> >
> > scott.f...@idmworks.com
> >
> > Blog: www.idmworks.com/blog
> >
> >
> >
> >
> >
> > *The information contained in this email message and any attachment may
> be
> > privileged, confidential, proprietary or otherwise protected from
> > disclosure. If the reader of this message is not the intended recipient,
> > you are hereby notified that any dissemination, distribution, copying or
> > use of this message and any attachment is strictly prohibited. If you
> have
> > received this message in error, please notify us immediately by replying
> to
> > the message and permanently delete it from your computer and destroy any
> > printout thereof.*
> >
> > --
> > 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
>


-- 



*IDMWORKS *

Scott Ford

z/OS Dev.




“By elevating a friend or Collegue you elevate yourself, by demeaning a
friend or collegue you demean yourself”



www.idmworks.com

scott.f...@idmworks.com

Blog: www.idmworks.com/blog





*The information contained in this email message and any attachment may be
privileged, confidential, proprietary or otherwise protected from
disclosure. If the reader of this message is not the intended recipient,
you are hereby notified that any dissemination, distribution, copying or
use of this message and any attachment is strictly prohibited. If you have
received this message in error, please notify us immediately by replying to
the message and permanently delete it from your computer and destroy any
printout thereof.*

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


Re: [External] Ftp batch accessing desktop

2020-01-06 Thread Pommier, Rex
Peter, 

You mean something like this?

//FTPSTEP  EXEC PGM=FTP,REGION=4M 
//SYSPRINT DD SYSOUT=*
//OUTPUT   DD SYSOUT=*
//INPUTDD *   
  ip-address-of-workstation   
  userid  
  password
  LOCSITE FWFRIENDLY ; may not need 
  BINARY  
  GET workstation-name  MAINFRAME.NAME (REPLACE   
  quit
/*

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Peter
Sent: Monday, January 6, 2020 7:44 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Ftp batch accessing desktop

Hi

Does anyone have a sample JCL to connect desktop ftp server and get files and 
replace on preallocated Mainframe dataset ?

Basically I would like to achieve it via batch JCL.

Peter

--
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: ZOWE Open Editor - baby's first steps questions

2020-01-06 Thread Pew, Curtis G
On Jan 5, 2020, at 5:23 PM, Paul Gilmartin 
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> 
>> Do they also despise the shebang? While I spell it Eunix, that's one of the 
>> good things about it.
>> 
> "Eu" as the Greek prefix meaning "good"?

I suspect it’s like “eunuchs”. https://dilbert.com/strip/1993-11-09


-- 
Pew, Curtis G
curtis@austin.utexas.edu






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


Ftp batch accessing desktop

2020-01-06 Thread Peter
Hi

Does anyone have a sample JCL to connect desktop ftp server and get files
and replace on preallocated Mainframe dataset ?

Basically I would like to achieve it via batch JCL.

Peter

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


Re: ZOWE Open Editor - baby's first steps questions

2020-01-06 Thread Support, DUNNIT SYSTEMS LTD.
OK, I have an error somewhere.

I asked how I can save a PDS member back to z/OS. Went here:

https://marketplace.visualstudio.com/items?itemName=Zowe.vscode-extension-for-zowe#data-sets

The GIF under section "Download, edit, and upload existing PDS members" shows 
an example of pulling MEMBER1 from z/OS, editing and saving it. It's pulled by 
clicking on the download cloud icon next to MEMBER1 in the ZOWE explorer 
window. To save back to z/OS, you're supposed to click on the upload cloud icon.

My problem is that I have no upload cloud icon at all. Why? I have full access 
to the PDS I want to edit on the z/OS end. What's giving me read access but not 
update access here?

My VS Code and ZOWE extensions are fully updated. Running z/OS 2.3. Help 
appreciated. Thanks as always.

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


Re: Enterprise COBOL 6.3 and IBM Programmer Tools

2020-01-06 Thread Timothy Sipples
Tom Savor wrote:
>If I read the Manual correctly, only Batch is 64-bit supported.
>CICS is not 64-bit supported. I have many DB2 programs that run
>Batch and Online, so I guess they will have to be forced to run
>as 31-bit.

Tom Marchant wrote:
>The bottom line is that you can't use 64-bit Cobol unless
>your entire application is compiled as a 64-bit application.
>That includes any common routines that you might normally call.
>And if you convert those common routines to 64-bit Cobol, you
>cannot call them from 31-bit Cobol, so you need to maintain two
>versions.

Tom Marchant and Frank Swarbrick provided a lot of good information in
reply, but I'd like to add a few comments.

The major value of AMODE 64 is how it helps programs deal straightforwardly
with ever larger data sizes. Enterprise COBOL 6.3 introduces support for
AMODE 64 batch programs, which is (of course) quite important. The
introduction and expansion of AMODE 64 support is a multi-step journey,
with many steps taken and some more steps to come. AMODE 31 was also a
multi-step journey, still in some respects an ongoing "mopping up"
operation I suppose. The Enterprise COBOL 6.3 announcement letter (219-404)
lists the various current AMODE 64-related restrictions, and yes, there are
some. Perhaps the release number is a purely coincidentally ironic one. :-)

CICS Transaction Server Version 5.5 for z/OS supports AMODE 64 non-Language
Environment Assembler programs as Frank Swarbrick pointed out. See IBM's
CICS documentation references to EXEC CICS GETMAIN64, for example. CICS TS
5.5 also *only* supports the 64-bit Java SDK on z/OS, which naturally
includes the Java programming language but also various JVM-based
programming languages (NetREXX, Haskell, Scala, Clojure, Groovy, Jython,
JRuby, etc.) IBM discontinued support for the 31-bit Java SDK in CICS TS
several CICS releases ago.

So what can you do *today* if you have an immediate requirement for an
AMODE 64 COBOL program per Tom Savor's comment, a program that must run
both in CICS Transaction Server for z/OS and in non-CICS batch mode? Tom
Marchant provides one answer that works today and is fully IBM supported:
compile both AMODE 31 and AMODE 64 versions of the same COBOL program from
the same source code. Invoke the former within CICS TS, and invoke the
latter in (non-CICS) batch, assuming the program can otherwise run both
inside and outside CICS TS. Before you dismiss this idea out of hand, let's
recognize that many software vendors already do this and have for many
years, for example when they compile and distribute "performance tuned" and
"compatible" releases of their software products, each using different
compiler parameters (ARCH, TUNE, etc., as applicable). Also, "debug" and
"non-debug" versions, and "ABO'ed" and "non-ABO'ed." Importantly, it's not
two versions of source code; it's only two versions post-compilation.

There might be some more "clever" point-in-time options, but I'll need to
do some more thinking and research. Maybe somebody else will beat me to the
punch. For example, "thinking out loud" (frequently dangerous :-)), could
you create a common Java "wrapper" that runs within CICS TS (i.e. in 64-bit
Java) that then uses JNI to invoke an AMODE 64 LE COBOL program -- and with
the same COBOL program also able to run in non-CICS batch? I've never tried
it, and I haven't dug into it, so I don't know.


Timothy Sipples
IT Architect Executive, Digital Asset & Other Industry Solutions, IBM Z &
LinuxONE


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


Re: Looking for tn3270 emulator that can run on macOS 10.15.2 (Catalina)

2020-01-06 Thread Timothy Sipples
Matt Hogstrom wrote:
>I use IBM HOD on Mac and it works fine
>I’ve never tried graphics so I don’t know about that option.

Host Graphics (GDDM, etc.) work with Host On-Demand on macOS, too.


Timothy Sipples
IT Architect Executive, Industry Solutions, IBM Z & LinuxONE


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