Re: System symbols in batch JCL

Well some of us old timers wrote CLISTs to put in symbols and submit to intrdr. Then in 80's we got File Tailoring with ISPF. In a message dated 7/22/2016 12:32:46 A.M. Central Daylight Time, edja...@phoenixsoftware.com writes: Prior to that, it was available to started tasks only.

Re: System symbols in batch JCL

On 7/21/2016 10:05 PM, Ed Jaffe wrote: I gotta ask, how on earth have you guys survived all these years without system symbols support enabled in JES? Never mind. I answered my own question. It's been only three years since this support became generally available in JES2. Prior to that,

AW: Re: System symbols in batch JCL

>I gotta ask, how on earth have you guys survived all these years >without system symbols support enabled in JES? For production jobs, I guess the schedulers jumped in. They long (always?) supported symbols that will be resolver at submit time. A couple of date/time symbols and even better

Re: System symbols in batch JCL

On 7/21/2016 5:27 PM, Jesse 1 Robinson wrote: In my successful tests, however, it's not clear what class I was running in because of WLM. I enabled only CLASS A for SYSSYM. ICH70001I TSOSKIP LAST ACCESS AT 17:13:07 ON THURSDAY, JULY 21, 2016 $HASP373 TIMETEST STARTED - WLM INIT - SRVCLASS

Re: System symbols in batch JCL

I would guess the CI accepted it as CLASS=A and did the requisite substitution and wrote it to SPOOL to be executed. From there WLM and Exits provided a CLASS to run. In a message dated 7/21/2016 7:28:40 P.M. Central Daylight Time, jesse1.robin...@sce.com writes: In fact, there is an

Good use of COBOL EXIT SECTION?

A good idea, but why impose the extra paragraph-name per SECTION? procedure division. main section. mainline. perform one perform two goback . one section. [...do something...] exit section . two section. [...do

Re: System symbols in batch JCL

Thanks to everyone. I indicated in my original post that I had turned on SYSSYM for Class A, but I was using obsolete system symbols. Duh. It was simple after all. In my successful tests, however, it's not clear what class I was running in because of WLM. I enabled only CLASS A for SYSSYM.

Re: System symbols in batch JCL

On 2016-07-21 15:20, Cieri, Anthony wrote: > > Try $D JOBCLASS(*),SYSSYM > Thanks. That shows me that all job classes at my site have DISALLOW. But that works only because I have operator privilege. Let me ask the question on behalf of a hypothetical programmer who hasn't such

Re: DEVTYPE INFO=DASD

I think the possibility should be considered that the OP may have mistakenly been looking at the 16 bytes at AREA+2, not AREA. If that happened, and the missing bytes are hex , the results would be correct for a device with 65520 cylinders. Bill On Thu, 21 Jul 2016 14:30:41 -0500, Mike

Re: System symbols in batch JCL

Skip, The following jcl should do the trick - //ZZZSKIP JOB (ZZZ,1234),'TEST', // MSGCLASS=2,CLASS=M,NOTIFY=, // MSGLEVEL=(1,1),TIME=1440, // REGION=0M

Good use of COBOL EXIT SECTION?

I'm also going to post this in the IBM COBOL Cafe, but I'm not sure how many people actually use that site... So as you might know, I'm interested/excited about the new "EXIT" statements in Enterprise COBOL. I just had a thought on a good use of EXIT SECTION. We too often run in to issues

Re: Real purpose of hipersocket

W dniu 2016-07-21 o 16:54, Tim Hare pisze: [...] You can test the difference in speed - find a large dataset (or create one), and FTP it using the OSA network and the other system's non-hipersocket IP address, then FTP the same file using the hipersocket IP address. Actually I did it.

Re: IBM Z/os Explorer and CICS Explorer

You didn't have to accept the licensing agreement. If I remember correctly it said something after the trial period they would consider it an IPLA product. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Barkow, Eileen Sent:

Re: System symbols in batch JCL

Try $D JOBCLASS(*),SYSSYM -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John McKown Sent: Thursday, July 21, 2016 4:59 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: System symbols in batch JCL On Thu, Jul 21, 2016 at

Re: System symbols in batch JCL

On Thu, Jul 21, 2016 at 3:52 PM, Paul Gilmartin < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Thu, 21 Jul 2016 19:53:44 +, Jesse 1 Robinson wrote: > > >I'm trying to use system symbols in batch JCL under z/OS 2.1. > Specifically, I'd like to create a DSN like this: > > >

Re: System symbols in batch JCL

Table 1 describes the dynamic system symbols and the releases for which they are valid. The names of the following system symbols are changed from previous releases of MVST: New symbol Old symbol >From the z/OS V2.2 manual

AW: System symbols in batch JCL

>3 // SET D= Without verifying exactly with the manual, I seem to remember that it talks about old and new date and time symbols. is an old one and this does not work (I don't know if this is documented somewhere). is a new symbol and this one is working with batch JCL. Try using and (I

Re: System symbols in batch JCL

On 7/21/2016 12:53 PM, Jesse 1 Robinson wrote: I'm trying to use system symbols in batch JCL under z/OS 2.1. Specifically, I'd like to create a DSN like this: TSOSKIP.REPORT.D-local-date.T-local-time I've perused KC but still cannot get to work. Now maybe DSN simply does not allow

RES: EXTERNAL: System symbols in batch JCL

Look if your jobclass is defined as SYSSYM=ALLOW Atenciosamente / Regards / Saludos BANCO BRADESCO S.A. 4250 / DPCD Engenharia de Software Sistemas Operacionais Mainframes Ituriel do Nascimento Neto Tel: +55 11 3684-9602 R: 49602 3-1404 Fax: +55 11 3684-4427 Banco Bradesco. Patrocinador

Re: EXTERNAL: System symbols in batch JCL

Skip - try closing the symbolic with a dot DSN= TSOSKIP.REPORT.D Jerry Whitteridge Manager Mainframe Systems & Storage Albertsons - Safeway Inc. 925 738 9443 Corporate Tieline - 89443 If you feel in control you just aren't going fast enough. -Original Message- From: IBM Mainframe

System symbols in batch JCL

I'm trying to use system symbols in batch JCL under z/OS 2.1. Specifically, I'd like to create a DSN like this: TSOSKIP.REPORT.D-local-date.T-local-time I've perused KC but still cannot get to work. Now maybe DSN simply does not allow embedded symbolics, but I did not see that prohibition.

Re: DEVTYPE INFO=DASD

> Volume Data > Tracks . : 982,800 / 15 = 65,520 = X'FFF0' On Thu, Jul 21, 2016 at 2:17 PM, Campbell Jay wrote: > Agree with John. > Doc should say first halfword of bytes 0 - 3 & 4 - 7. > > MJI2 e . : IM404A > Command ===> > > Unit . . : 3390 > > Volume Data

Re: IBM Z/os Explorer and CICS Explorer

by the way, if you do get either EXPLORER installed, there is a major problem when trying to connect to z/os. It turned out that even though IBM supplies a copy of the JRE in the EXPLORER directories, it contains some security options which yield some cryptic RSA key error. This happened with

Re: S0C4 since z/OS 2.1

Thanks Elardus, all valid thoughts. I am backlevel on Natural, Adabas and EntireX from SAG. Moving back to upgrading EntireX as it also broke under z/OS 2.1 > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] > On Behalf Of Elardus Engelbrecht

Re: DEVTYPE INFO=DASD

Agree with John. Doc should say first halfword of bytes 0 - 3 & 4 - 7. MJI2 e . : IM404A Command ===>

Re: IBM Z/os Explorer and CICS Explorer

I just installed the latest AQUA verion of both explorers and could not get anywhere with installation manager. just download the zip file. There was nothing about having to purchase anything. The real fun was trying to install the features into it. the HELP 'INSTALL NEW SOFTWARE' option

Re: S0C4 since z/OS 2.1

I think Darrell is on the right track. The value at 001CD468 is 4074. I think possible (Sag code does it frequently) that the intent was to cause an 0C1, but with z/OS 2.1 the target isn’t valid for code and thus an 0C4 occurred. In any case, by my earlier note, I have things working for now.

Re: DEVTYPE INFO=DASD

I just got word from Jay Campbell that the device capability is 17,974 cyls I am getting back X'FFF0' or 65,520, Since he is in touch with IBM I would suggest you contact him Thanks Joe Reichman Joe Reichman   IT Specialist Master Files Division New Carrollton Federal Building, B7-182

IBM Z/os Explorer and CICS Explorer

I wonder if someone from IBM that's monitoring this list can help. I thought if you had a licensed copy of z/OS and CICS you could use the z/OS explorer and the CICS explorer. After using the installation manager to install the products it seems to indicate that you have a trial period and then

Re: DEVTYPE INFO=DASD

Well, yes, but we should get the book right. So do you mind telling me what the actual volume size is, just to confirm? Reichman Joseph wrote: It is the first half word of each has to be Joe Reichman Joe Reichman IT Specialist Master Files Division New Carrollton Federal Building, B7-182

Re: DEVTYPE INFO=DASD

It is the first half word of each has to be Joe Reichman Joe Reichman   IT Specialist Master Files Division New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350 Cell (917) 748-9693 TOD M - F  7:30 am - 4:00 pm

Re: DFSORT and zIIP

One more thing - The license from IBM, at least ours, prevents a program running on a ZIIP from executing, or causing to be executed, user code on the z/IIP. Chris Blaicher Technical Architect Mainframe Development Syncsort Incorporated 50 Tice Boulevard, Woodcliff Lake, NJ 07677 P:

Re: DEVTYPE INFO=DASD

I think I understand your confusion. I'm not sure why you're using the z/OS V1.10 level of the book. But in any event, the current (V2.2) level of the book says this returns, for INFO=DASD: Returns 16 bytes as follows: Bytes 0-3 - Number of cylinders on the device, excluding alternates.

Re: DEVTYPE INFO=DASD

http://publibz.boulder.ibm.com/epubs/pdf/dgt3s310.pdf z/OS 2.2 version, layout on page 281 (302 of 532). Looks like significant changes with z/OS 1.10 for CYL>64K. On Thu, Jul 21, 2016 at 12:58 PM, Reichman Joseph wrote: > 7.2.15 Marked DEVTYPE- info form from

Re: Resource Group Limits as a cost containment method?

> On Jul 21, 2016, at 12:25 PM, Elardus Engelbrecht > wrote: > > Tim Hare wrote: > >> Because of scheduling dumbness (another story) they have several gaps in >> their batch window where nothing runs, giving some leeway for jobs to >> increase their elapsed

Re: Kind of COND in a CLIST

Indeed there are many ways to skin a cat. With ISPF edit there are many ways to insert clist commands to imbed them into the list almost automatically. IOW there is no best way to do this. Use your imagination and have a got at it. Ed

Re: DEVTYPE INFO=DASD

7.2.15 Marked DEVTYPE- info form from DFSMSdfp "Advanced Services" z/os V1R10.0 Joe Reichman Joe Reichman   IT Specialist Master Files Division New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350 Cell (917) 748-9693

Re: DFSORT and zIIP

On 7/21/2016 10:07 AM, Elardus Engelbrecht wrote: Ed Jaffe wrote: They probably don't want to call E15/E35 exits in SRB mode, ... Excellent catch! Running an exit while sitting on zIIP is an interesting scenario. H, very very interesting, what will happens when you try out that little

Re: Resource Group Limits as a cost containment method?

Tim Hare wrote: >Because of scheduling dumbness (another story) they have several gaps in their >batch window where nothing runs, giving some leeway for jobs to increase their >elapsed time - not the usual thing you want to do, but bear with us. What are the other STCs doing? Were they also

Re: AW: Re: Setting dump options for SVC dumps taken by StarTool DA-Batch?

> Yes, from the display one would assume TRT is active for SVC dumps. > However, viewing the flags withing the dump does *not* show TRT as > part of the options selected. This is what lets me think that > StarTool DA is specifying its own SDATA options when requesting the dump. If they

Re: Kind of COND in a CLIST

Radoslaw Skorupka wrote: >I'm going to submit huge command list in a batch (IKJEFT01). The commands are >unrelated (no loops, etc.) however I want to stop the script after command >failure, that means RC<>0. >Example: >RDEF class PROFILE1.** ... >RDEF class PROFILE2.** ... >RDEF class

Re: DFSORT and zIIP

Ed Jaffe wrote: >They probably don't want to call E15/E35 exits in SRB mode, ... Excellent catch! Running an exit while sitting on zIIP is an interesting scenario. H, very very interesting, what will happens when you try out that little trick? And if you're sitting in a micro code while

AW: Re: Setting dump options for SVC dumps taken by StarTool DA-Batch?

>> Does anyone know how I can change that? System DUMP options for >> SYSABEND, SYSMDUMP, and SDUMP have the SDATA(...TRT...). Only >> SYSUDUMP has Just SDATA=(SUM), but that should not apply in our case. > >What is displayed by the D D,O command on your system? The above paragraph is a

AW: Resource Group Limits as a cost containment method?

>Would it be worth investigating setting a resource group limit for the batch >service class(es) to hold the total 4HRA down as a cost-saving measure, or are >resource group limits going to cause more trouble than they are worth? At month ends, we were hitting the Group Capacity Limits

Re: DEVTYPE INFO=DASD

The BDW / RDW length field for V files is a 4 byte length field with the first 2 bytes binary length. On Thu, Jul 21, 2016 at 11:51 AM, Elardus Engelbrecht wrote: > Reichman Joseph wrote: > >>The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and bytes 4

Re: DEVTYPE INFO=DASD

Reichman Joseph wrote: >The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and bytes 4 - 7 >000FF000 is tracks per cyl ? am I misreading misunderstanding the >documentation What docs? Could you be kind to give us the URL of that source of above info and docs? > I was looking

Re: Setting dump options for SVC dumps taken by StarTool DA-Batch?

> We're using both SmartRestart as well as StarTool DA. As far as I > understand, SmartRestart asks StarTool DA , The former recognizes > the ABEND (0C4 in this case) and it recognizes that StarTool DA is > also present. Since there is a //SYSUDUMP DD card in the jobstep, it > sks StarTool to

Re: Kind of COND in a CLIST

On Thu, 21 Jul 2016 09:00:52 -0700, Lizette Koehler wrote: >I would think putting your commands in a DATASET, then using REXX to execute >them one at a time and check the return code would work. > With Rexx I'd use SIGNAL ON NOVALUE and wrap the few commands for which RC<>0 with call to a

Re: OS ENQ from COBOL

On Thu, Jul 21, 2016 at 11:13 AM, Hardee, Chuck < chuck.har...@thermofisher.com> wrote: > No, my requirement is batch. > The service executing in its own address space that I need to access > issues an EXCLUSIVE ENQ for a determinable QName/RName when it is up and > ready to receive requests. I

Re: OS ENQ from COBOL

Yes, I found nothing in the Unix, LE or C/C++ services that perform an ENQ of any kind, be it for control or for testing availability. I agree, the only real reason someone other than myself would need to do anything to the code is to reassemble it if the ENQ macro were to change. Since it

Re: OS ENQ from COBOL

No, my requirement is batch. The service executing in its own address space that I need to access issues an EXCLUSIVE ENQ for a determinable QName/RName when it is up and ready to receive requests. I need to know if it is up and ready to receive before issuing any requests to it. This is all

Re: Kind of COND in a CLIST

I would think putting your commands in a DATASET, then using REXX to execute them one at a time and check the return code would work. If it is required to do it with a CLIST then the same logic would work. Lizette > -Original Message- > From: IBM Mainframe Discussion List

OS ENQ from COBOL

There's nothing native in COBOL to do an what you want, and I'm not aware of anything in LE as a callable service. Hybrid. Documentation. Probably the most they'll need is how to reassemble it. Unless a macro changes, why else would they ever need to touch it?

Re: Resource Group Limits as a cost containment method?

RCTLACS contains the current running average for the LPAR. Assuming a single LAPR, it is possible to monitor and adjust the cap by changing the WLM policy (V WLM,policyname). This requires at least 2 policies. 1 with no caps and 1 without caps. You may need another with tighter caps in order to

Re: DFSORT and zIIP

On 7/20/2016 11:25 PM, Timothy Sipples wrote: To my knowledge, no. zIIP exploitation sometimes makes technical sense, and sometimes it doesn't. Even within the same general product category. Subject to periodic review as technologies change and evolve. Assuming they're constrained by the same

Re: OS ENQ from COBOL

I don't know if you are running in a CICS environment but CICS has an EXEC CICS ENQ service. Perhaps you can invoke it (non-blocking) to figure out if the resource is held? Admittedly not the most straightforward approach...

Re: DEVTYPE INFO=DASD

The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and bytes 4 - 7 000FF000 is tracks per cyl ? am I misreading misunderstanding the documentation Joe Reichman Joe Reichman   IT Specialist Master Files Division New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex M,T,Th,F

Re: DEVTYPE INFO=DASD

> FFF0 000FF000 0100 0800 x'FFF0' would be 65520 cylinders. x'000F' would be 15 tracks per cylinder. Reasonable for a 3390-54. On Thu, Jul 21, 2016 at 9:00 AM, Reichman Joseph wrote: > Hi > > I was looking for the capability on a dasd device > > > DEVTYPE

Re: SHARE Webcast: SHARE Academy and New to z Systems

Tom, Excellent. Thanks. It seems to be documented kind of inside-out. :) In article <2692326115030948.wa.m42tomibmmainyahoo@listserv.ua.edu> you wrote: > On Wed, 20 Jul 2016 18:20:19 -0400, Don Poitras wrote: > >I needed to know what bit represents a BAKR > >call vs. a PC. This is all I

Setting dump options for SVC dumps taken by StarTool DA-Batch?

We're using both SmartRestart as well as StarTool DA. As far as I understand, SmartRestart asks StarTool DA , The former recognizes the ABEND (0C4 in this case) and it recognizes that StarTool DA is also present. Since there is a //SYSUDUMP DD card in the jobstep, it sks StarTool to schedule an

Re: Real purpose of hipersocket

I would like to add one other advantage that I took advantage of. When you define your hipersocket network, you can define a very large MTU size for the hipersocket network. This can eliminate a lot of segmentation/re-assembly overhead because the data transmission is broken up into fewer

Re: SHARE Webcast: SHARE Academy and New to z Systems

On Wed, 20 Jul 2016 18:20:19 -0400, Don Poitras wrote: >I needed to know what bit represents a BAKR >call vs. a PC. This is all I could find: > >--- >Bytes 288-295 contain the entry >descriptor. EXTRACT STACKED STATE sets the >condition code to indicate whether the entry-type >code in the entry

Resource Group Limits as a cost containment method?

There's a system where their 4-hour rolling average maximum is always during their batch window, when they routinely reach their defined capacity limit, which in turn affects what they pay in a chargeback system. Because of scheduling dumbness (another story) they have several gaps in their

Re: Kind of COND in a CLIST

Also if you were to create a CLIST for this as suggested previously, rather than adding lots of IFs or WHENs, you should just be able to specify CONTROL FLUSH once at the beginning of the CLIST. Mick. On 21 July 2016 at 14:24, Norbert Friemel wrote: > On Thu, 21 Jul 2016

DEVTYPE INFO=DASD

Hi I was looking for the capability on a dasd device DEVTYPE (R6),(AREA,L'AREA),INFOLIST=ILIST2 ILIST2 DEVTYPE INFO=DASD AREA DSXL16 This was the data returned in area R15 = 0 FFF0 000FF000 0100 0800 DASD Returns 16 bytes as follows: Bytes 0-3 Number of cylinders

Re: AW: Re: DFSORT and zIIP

On 7/20/2016 10:45 PM, Peter Hunkeler wrote: I'm longing for the day when also the zIIPs disappear again and IBM has found a better way to charge software license fees. I agree it would be GREAT(!) if kneecapping of CPs was removed and replaced with PER CORE software charging like other

Re: Kind of COND in a CLIST

On Thu, 21 Jul 2016 14:36:30 +0200, R.S. wrote: > I'm going to submit huge command list in a batch (IKJEFT01). The > commands are unrelated (no loops, etc.) however I want to stop the > script after command failure, that means RC<>0. > > Example: > //STEP1 EXEC PGM=IKJEFT01 > //SYSTSPRT DD

Re: Kind of COND in a CLIST

On Thu, 21 Jul 2016 14:36:30 +0200, R.S. wrote: >I'm going to submit huge command list in a batch (IKJEFT01). The >commands are unrelated (no loops, etc.) however I want to stop the >script after command failure, that means RC<>0. > >Example: >//STEP1 EXEC

Re: Kind of COND in a CLIST

Radoslaw, I would put the commands into a CLIST (or REXX) and add IF logic to check the return code from each command and EXIT when it's not an acceptable value. Chuck Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific

Kind of COND in a CLIST

I'm going to submit huge command list in a batch (IKJEFT01). The commands are unrelated (no loops, etc.) however I want to stop the script after command failure, that means RC<>0. Example: //STEP1 EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=* //SYSTSIN DD *,DLM=@@ /* command list */ RDEF

CMP country multiplex pricing

Hi all, Any shop apply the CMP, anything we need to aware before apply CMP, thank for sharing -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO

Re: DFSORT and zIIP

W dniu 2016-07-21 o 08:25, Timothy Sipples pisze: Paul Gilmartin wrote: I find it hard to believe that optimization of revenue was not a consideration. To my knowledge, no. zIIP exploitation sometimes makes technical sense, and sometimes it doesn't. Even within the same general product

Re: S0C4 since z/OS 2.1

Gibney, Dave wrote: >There are unfortunately more than several copies of this module lying around >here. Someone zapped CSECT NATRUN3 >The unzapped version works under z/OS 2.1. The zapped version does work under >z/OS 1.13, but I have no idea what the environmental change is. This is not

Re: DFSORT and zIIP

Paul Gilmartin wrote: >I find it hard to believe that optimization of revenue was not a consideration. To my knowledge, no. zIIP exploitation sometimes makes technical sense, and sometimes it doesn't. Even within the same general product category. Subject to periodic review as technologies change