Re: Seasons Greeting

2016-12-22 Thread Edward Finnell
And all the gifts you ordered! https://www.youtube.com/watch?v=WCGBNj-aSwA Everyone take care and hopefully we'll see you back on the other side...next year. In a message dated 12/22/2016 4:40:45 P.M. Central Standard Time, steve.hor...@gmail.com writes: And the same to you! ---

Re: Do the Name/Token Pair callable services need R13 to point to save area?

2016-12-22 Thread Frank Swarbrick
Do you really need this assembler routine in order for COBOL to call the IEANTCR callable routine? I call it directly from COBOL: CALL 'IEANTCR' USING NTA-LEVEL NTA-NAME NTA-TOKEN NTA-NOPERSIST NTA-RC. with the following working storage: 05 NTA-LEVEL COMP-5

Problem with "RECEIVE" of z/OS 2.2 upgrade

2016-12-22 Thread McCabe, Ron
Hello List, I know that everyone is either off or about to be off to enjoy the holidays but I thought I would throw this question out anyway so hopefully I will be that much closer to resolving my problem. I have downloaded z/OS 2.2 upgrade and the first step in the dialog is to "receive" the

Re: Seasons Greeting

2016-12-22 Thread Steve Horein
And the same to you! On Thu, Dec 22, 2016 at 12:37 PM, scott Ford wrote: > To All you who celebrate: > > Happy Holidays to all ...with best wishes for > the upcoming year. > > Regards, > Scott > -- For IBM-MAIN subscribe / sign

AW: Re: Using the Binder to hook into an LE runtime module.

2016-12-22 Thread Peter Hunkeler
>A likely place that this is set is in the ESPIE service routine because that PIC was one of the interrupts for which ESPIE management was requested. Peter, I'm not sure I understand what you want to tell me. In a pure Cobol environment, the decimal overflow mask is not set, because Cobol does

Re: Using the Binder to hook into an LE runtime module.

2016-12-22 Thread Peter Hunkeler
For those interested: I have some working code. The code uses a Name/Token pair to a) understand whether called the first time or not, and b) to keep the address of a (wrap around) trace table (obtained upon first call). It then writes some information including the program mask obtained via IPM

Re: Do the Name/Token Pair callable services need R13 to point to save area?

2016-12-22 Thread Peter Hunkeler
> Heres what we do we call it from Cobol.. >We pass in the address of where storage begins and where we want to place the token I have to "sneak in", so I cannot pass some storage. In the meantime I have it working without problems. -- Peter Hunkeler

AW: Re: Do the Name/Token Pair callable services need R13 to point to save area?

2016-12-22 Thread Peter Hunkeler
Thanks, Greg -- Peter Hunkeler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

AW: Re: Using the Binder to hook into an LE runtime module.

2016-12-22 Thread Peter Hunkeler
>The issue Peter is facing is that a certain amount of confusion ensues when a >particular piece of software notices the 00A coming from a COBOL program, >because the overflow bit has become set on and has somehow avoided means to >turn it off before a C/C++ program returns to COBOL. Reduced

AW: Re: Using the Binder to hook into an LE runtime module.

2016-12-22 Thread Peter Hunkeler
>z/OS Language Environment Programming Reference SA38-0683-0CEEHDLR registers a user-written condition handler for the current stack frame. Oh, I see. Now I understand what you meant. I know about the CEEHDLR, but I do not need a contition handler. What I need is kind of a "trace of the PSWs p

Re: Job portal for mainframe

2016-12-22 Thread Lizette Koehler
Also indeed.com Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Burrell, Todd > Sent: Thursday, December 22, 2016 11:14 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Job portal for mainframe > > There are quite a few

Re: AW: Re: Using Extended Format as default

2016-12-22 Thread R.S.
[...] PDS/PDSE and SORTWK(?) have some known restrictions. PDS/PDSE *cannot be extended format*. That's strict restriction, but very clear IMHO. EF is for PS and VSAM (KSDS, ESDS, LDS, RRDS, vRRDS). SORWK - the best idea is to NOT USE SORTWK ddnames, leave sort work datasets allocation to you

AW: Re: Using Extended Format as default

2016-12-22 Thread Peter Hunkeler
> PDS/PDSE and SORTWK(?) have some known restrictions. I seem to remember that programs using NOTE & POINT have (or had?) dependencies, but can't remember the details right now. --Peter Hunkeler -- For IBM-MAIN subscribe

Seasons Greeting

2016-12-22 Thread scott Ford
To All you who celebrate: Happy Holidays to all ...with best wishes for the upcoming year. Regards, Scott -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message

Re: Rexx/CICS format file pool - return code -4

2016-12-22 Thread Wayne Bickerdike
The out of the box ADCD CICS does not have external security configured. Therefore the CESN transaction has no effect. Enable security in the startup options with SEC=YES then come back with more questions. :) On Thu, Dec 22, 2016 at 4:36 PM, Bruce Hewson wrote: > Hello Mike, > > "L CICS" from

Re: Job portal for mainframe

2016-12-22 Thread Burrell, Todd
There are quite a few places to look: www.monster.com www.dice.com http://www.computerjobs.com/us/en/IT-Jobs/ www.spci.net You can also look some on LinkedIn. You can also go directly to a company's website and search their job listings if you know of companies in your area. A lot of them w

Job portal for mainframe

2016-12-22 Thread Kumar
Hi, Can somebody name few of the good job portals for Mainframe Systems programming jobs in the USA please ? Regards, Kumar -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.ed

Re: How to mount ZFS from another system

2016-12-22 Thread R.S.
W dniu 2016-12-22 o 17:41, John McKown pisze: On Thu, Dec 22, 2016 at 10:40 AM, John McKown wrote: On Thu, Dec 22, 2016 at 10:29 AM, R.S. wrote: I want to temporarily mount ZFS from another system. Scenario: OMVS.MVSB.BLAH is cataloged in master catalog on system MVSB. I want to mount it

Re: Old MVS/SP

2016-12-22 Thread Mike Beer
You might want to look here: http://hercules-390.github.io/html/ Am 22.12.2016 um 17:14 schrieb W Mainframe: blockquote, div.yahoo_quoted { margin-left: 0 !important; border-left:1px #715FFA solid !important; padding-left:1ex !important; background-color:white !important; } Guys, Anyone is

Re: How to mount ZFS from another system

2016-12-22 Thread John McKown
On Thu, Dec 22, 2016 at 10:40 AM, John McKown wrote: > On Thu, Dec 22, 2016 at 10:29 AM, R.S. > wrote: > >> I want to temporarily mount ZFS from another system. >> >> Scenario: >> OMVS.MVSB.BLAH is cataloged in master catalog on system MVSB. >> >> I want to mount it on system MVSA in some direct

Re: How to mount ZFS from another system

2016-12-22 Thread John McKown
On Thu, Dec 22, 2016 at 10:29 AM, R.S. wrote: > I want to temporarily mount ZFS from another system. > > Scenario: > OMVS.MVSB.BLAH is cataloged in master catalog on system MVSB. > > I want to mount it on system MVSA in some directory, i.e. /mytemp. > However on MVSA there are also OMVS.** datase

Re: Zfs root filesystem

2016-12-22 Thread Steve Smith
OK, point taken. Your plan sounds like a good one. sas On Thu, Dec 22, 2016 at 2:02 AM, Peter Hunkeler wrote: > > >On 2016-12-21 15:39, Steve Smith wrote: > > Or leave off the -r. > > > The subject sais "root file system" not "root directoy", so I assume the > OP wants to compare everything, i

How to mount ZFS from another system

2016-12-22 Thread R.S.
I want to temporarily mount ZFS from another system. Scenario: OMVS.MVSB.BLAH is cataloged in master catalog on system MVSB. I want to mount it on system MVSA in some directory, i.e. /mytemp. However on MVSA there are also OMVS.** datasets cataloged in master catalog (of MVSA) MCAT names are

Re: Using the Binder to hook into an LE runtime module.

2016-12-22 Thread Bill Woodger
The problem with attempting to use an LE Handler from a COBOL program, as was covered in the previous topic, is that LE knows that COBOL doesn't "respect" the 00A, so LE just spends some time ignoring it, rather than presenting it to a registered handler. So for inter-language communication to

Re: Old MVS/SP

2016-12-22 Thread John McKown
On Thu, Dec 22, 2016 at 10:14 AM, W Mainframe < 01304632a58d-dmarc-requ...@listserv.ua.edu> wrote: > Guys, > Anyone is running a MVS/SP in some kind of emulator? > Dan > > ​ If so, IBM legal would like your contact information. Doing that would, most likely, be a violation of the license. I kn

Old MVS/SP

2016-12-22 Thread W Mainframe
blockquote, div.yahoo_quoted { margin-left: 0 !important; border-left:1px #715FFA solid !important; padding-left:1ex !important; background-color:white !important; } Guys, Anyone is running a MVS/SP in some kind of emulator?  Dan Sent from Yahoo Mail for iPhone ---

Re: Do the Name/Token Pair callable services need R13 to point to save area?

2016-12-22 Thread scott Ford
Peter: Heres what we do we call it from Cobol.. We pass in the address of where storage begins and where we want to place the token SAVE (14,12),,SETTOKEN LRR12,R15R12 IS BASE REG USING SETTOKEN,R12 L R4,0(R1) 1ST PARM = WORK AREA

Re: Do the Name/Token Pair callable services need R13 to point to save area?

2016-12-22 Thread scott Ford
Peter, We use tokens all the time, I will look Scott On Thu, Dec 22, 2016 at 9:58 AM, Greg Dyck wrote: > On 12/22/2016 1:47 AM, Peter Hunkeler wrote: > >> When I get control, R13 points to a save area, which my code will use, >> but I do not yet have storage for another save area before callin

Re: Addressing Question

2016-12-22 Thread scott Ford
Peter: The reason I asked was that we have been running this STC for a long time in Cobol with AMODE(31), RMODE(ANY) and it was performing calls to Assembler modules, these modules are AMODE(24),RMODE(24) and were performing I/O to QSAM files apparently with no issues. But in all our cases nothin

Re: Do the Name/Token Pair callable services need R13 to point to save area?

2016-12-22 Thread Greg Dyck
On 12/22/2016 1:47 AM, Peter Hunkeler wrote: When I get control, R13 points to a save area, which my code will use, but I do not yet have storage for another save area before calling IEANTRT, so I cannot change R13. The Name Token Retrieve service uses BAKR to save and restore the caller's r

Re: Show dataset list in dump full volume adrdssu

2016-12-22 Thread Burrell, Todd
Another runtime PARM I have used occasionally for DFDSS is UTILMSG - it shows a lot of underlying detail as to what DFDSS is really doing: UTILMSG=YES|NO|ERROR This parameter controls the output of messages from auxiliary programs invoked by DFSMSdss (including ICKDSF, IDCAMS, IEBCOPY, IEBISAM,

Re: Using the Binder to hook into an LE runtime module.

2016-12-22 Thread Lizette Koehler
Check out z/OS Language Environment Programming Reference SA38-0683-0CEEHDLR registers a user-written condition handler for the current stack frame. The user condition handler is invoked when: It is registered for the current stack frame by CEEHDLR, and The Language Environment condition

Re: COBOL inline CPU timer

2016-12-22 Thread Charles Mills
Thanks. FWIW, that is our floor architecture level. I'm not sure if we have any customers on a z9 but I know we have customers on a z10. And yes, I remember S/360 architecture. I still marvel every time I write an ICM. Charles -Original Message- From: IBM Mainframe Discussion List [mai

Re: Do the Name/Token Pair callable services need R13 to point to save area?

2016-12-22 Thread Charles Mills
I believe it has been the intention of the MVS team over the past several years to make all of the basic assembler macro-invoked services independent of the caller's R13. I recall that once upon a time most of them required a save area off R13, and were so documented. I think now that most or all o

Re: Addressing Question

2016-12-22 Thread Peter Relson
I think i am right in saying that RMODE(ANY) sees the program with RMODE(24) and its ok to execute and the I/O buffers are they 24bit or 31 It seems unlikely that the calling program pays any attention to the RMODE of anything that it calls. It is up to the caller to meet the requirements

Re: Using the Binder to hook into an LE runtime module.

2016-12-22 Thread Peter Relson
I'm back to the quest for the code that sets the decimal overflow mask bit in the PSW causing S0CA abends later on (see "How to Identify modules as C/C++ or Cobol, or ASM from dump (SYSMDUMP)" thread started late November). A likely place that this is set is in the ESPIE service routine beca

Re: Show dataset list in dump full volume adrdssu

2016-12-22 Thread Klan, Rob (RET-DAY)
Add to exec statementPARM='TYPRUN=NORUN' while processing an existing DFSMSDSS file Ex: //DUMPIT EXEC PGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN' -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of retired mainframer Sent: Th

Re: Show dataset list in dump full volume adrdssu

2016-12-22 Thread retired mainframer
It sure would be nice to know what worked. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Jorge Garcia Sent: Thursday, December 22, 2016 1:25 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Show dataset list in dump full volume adrdssu

Re: Show dataset list in dump full volume adrdssu

2016-12-22 Thread Jorge Garcia
Great!. It's Works fine. Regards -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Do the Name/Token Pair callable services need R13 to point to save area?

2016-12-22 Thread Itschak Mugzach
I looked into my code, and it look like you are right. no special regs to set. IStchak ITschak Mugzach Z/OS, ISV Products and Application Security & Risk Assessments Professional On Thu, Dec 22, 2016 at 9:47 AM, Peter Hunkeler wrote: > I'm thinking of using a Name/Token pair to keep the addres