So, maybe something like this
//QKVSP01 EXEC PROC=DFHZITCL,
//INDEX=DFH420.CICS,
//LNGPRFX=IGY420,
//DSCTLIB=IBMUSE2.QKVS,
//PROGLIB=VENDOR.LINKLIB.SECOND,
//PARM.COB='NODYNAM,LIB,MAP,CICS(''COBOL3''),SIZE(1000K)'
(though I'm probably missing a ' somewhere)
George
On
Folks,
I thankyou - still not resolved - going to bed:-(. Back on Thursday, bad day
tomorrow, experiments todo.
If it's this ugly for COBOL/CICS, my next week will be COBOL/CICS/DB2
compiles .. yuk
Graham
- Original Message -
From: Graham Hobbs gho...@cdpwise.net
Newsgroups:
At 18:44 +0200 on 04/30/2013, R.S. wrote about Re: Check whether job
still running:
Another option: JOB1 allocates some dataset with DISP=OLD, the JOB2
also has DISP=OLD for the same dataset. Assuming JOB1 is submitted
first, JOB2 will wait for JOB1 completion.
This solution does not fly.
On Tue, 30 Apr 2013 23:25:40 -0400, Robert A. Rosenberg wrote:
This solution does not fly. JOB2 will sit there and waste an
initiator until JOB1 (which is long running) ends.
How much does an initiator cost?
-- gil
--
For
On Apr 30, 2013, at 3:02 PM, Mark Zelden wrote:
Besides what's new in manuals, ISPF HELP, SHARE presentations,
etc., I find out
about new commands, features, changes by reading DOC holds when I
apply
maintenance. Another thing that most people seem to busy to read
these days
(but I
On 4/30/2013 8:25 PM, Robert A. Rosenberg wrote:
If you can live with JOB1 and JOB2 having the same jobname and you use
JES2, that will handle the wait since JES2 will not allow JOB2 to be
initiated so long as JOB1 is executing.
This is true only with JOBDEF DUPL_JOB=DELAY. More and more JES2
The latter - an unauthorised program.
I would have thought (hoped) that there is a short sequence of control blocks
accessible from an unauthorised program that can be processed to determine
whether a known job is running (is know to the system, if not - it has
completed).
I can certainly use
On 4/29/2013 10:10 PM, Paul Gilmartin wrote:
I don't know how it keeps a 128-bit PSW.
XSBOPSW16 DS XL16 16-BYTE PSW ANALOG OF RBOPSW
--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
http://www.phoenixsoftware.com/
W dniu 2013-04-30 06:25, Timothy Sipples pisze:
Scott Ford asks:
I have a question , can a vendor use crypto services on Z
without the crypto Card ?
Lloyd Fuller replies:
Yes, but not protected key.
Protected Key is supported with CPACF (CP Assist Cryptographic Facility)
and does not
W dniu 2013-04-30 06:25, Timothy Sipples pisze:
[...]
Protected Key is supported with CPACF (CP Assist Cryptographic Facility)
and does not *require* a CryptoExpress option.
Well, what about CKDS? How the protected keys are stored?
IMHO protected key *does require* CryptoExpress option, not
Is there an easy way to check whether a previously submitted job is still
running (without using TSO)?
Regards
Tony
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with
D console command?
What facilities DO you have? Who are you? -- a program running on z/OS, a
user with no TSO access but _ access?
Define easy LOL.
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Anthony Rudd
Sent:
REXX programs cannot be written inline. You must save it in a PDS. You
then
allocate that PDS to either SYSPROC or SYSEXEC.
Just in case someone ever finds this in the archive: must is a bit too
strict.
It is quite usual but not necessary to store REXX programs a members in
a *PDS*. A REXX
David Crayson is right to point out that a decent compiler would have
unrolled the loop in the specific five-element case he examines.
This is not, however, a tactic that is appropriate for n 5.
If one looks at what optimizing C compilers, the usual suspects, do
with the classical
On Tue, 30 Apr 2013 14:27:28 +0200, Hunkeler Peter (TLSG 4) wrote:
To run a REXX from any sequential data set, code:
EX 'your.rexx.ps.data.set'
And to be complete, to run a REXX from any member in any PDS (not
necessarily allocated to //SYSEXEC or //SYSPROC), code:
EX
In m38v41wbsc@garlic.com, on 04/29/2013
at 12:18 PM, Anne Lynn Wheeler l...@garlic.com said:
the claim has been made that 1/3rd of processor cycles for 370
instruction emulation went to checking for whether instruction
already fetched/decoded in the pipeline has been modified.
this
Create a workplace list and use the 'sf' line command.
I didn't know about the sf line command. I'm using the SRCHFOR
*primary* command in either a 3.4 or workplace data set list, or in a
member list.
Runs through all the data sets or members, resp., in the list, finally
returning a String(s)
Well, not entirely complete.
Which one(s) was I missing?
--
Peter Hunkeler
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
On 4/30/2013 6:48 AM, Hunkeler Peter (TLSG 4) wrote:
Create a workplace list and use the 'sf' line command.
I didn't know about the sf line command. I'm using the SRCHFOR
*primary* command in either a 3.4 or workplace data set list, or in a
member list.
Runs through all the data sets or
In 517efd90.8050...@aim.com, on 04/29/2013
at 05:09 PM, Paul Gilmartin paulgboul...@aim.com said:
(I bet one of our regular contributors wishes for regular
expressions.)
Of course!
--
Shmuel (Seymour J.) Metz, SysProg and JOAT
Atid/2http://patriot.net/~shmuel
We don't
If you search on
ISPF Hidden Treasures and New Features
In Google (or other engine) you should find the Share proceedings by this
title.
Peter Van Dyke gave this presentation a few times and it covers a lot of the
Hidden functions in ISPF. It is a good place to start
Lizette
-Original
In
ofd1484f42.6be3b89a-on85257b5c.007e856a-85257b5c.007f3...@tsys.tss.net,
on 04/29/2013
at 07:09 PM, Kirk Talman rkueb...@tsys.com said:
I was given at one point the Assembler source of the fast Fourier
transform, which I wanted to port to the 360. I had to read the
94 PoOp several times
In 0DA8183E177E484CA79B421C02D26788@graham, on 04/29/2013
at 10:06 PM, Graham Hobbs gho...@cdpwise.net said:
At a guess, how many COBOL/CICS developers have ever heard of
IKJEFT01?
At a guess, 10,000.
--
Shmuel (Seymour J.) Metz, SysProg and JOAT
Atid/2
In 7834089630400673.wa.aruddtonline...@listserv.ua.edu, on
04/30/2013
at 06:37 AM, Anthony Rudd ar...@t-online.de said:
Is there an easy way to check whether a previously submitted job is
still running (without using TSO)?
Check from where? Console? Authorized program? Unauthorized program? I
Around here, there is the ever popular option of yelling over the cube wall
to another programmer: I'm not on TSO, is ... still running?
On Tue, Apr 30, 2013 at 8:22 AM, Shmuel Metz (Seymour J.)
shmuel+...@patriot.net wrote:
In 7834089630400673.wa.aruddtonline...@listserv.ua.edu, on
On 4/30/2013 8:45 AM, Paul Gilmartin wrote:
On Tue, 30 Apr 2013 14:27:28 +0200, Hunkeler Peter (TLSG 4) wrote:
To run a REXX from any sequential data set, code:
EX 'your.rexx.ps.data.set'
And to be complete, to run a REXX from any member in any PDS (not
necessarily allocated to //SYSEXEC
Do you want to check from a PC up to the mainframe if a job is running? From
Linux, From Unix, from Solaris? What are you trying to do?
If you could provide more context, better answers might be given. But what has
been proposed based on very little information is adequate.
Lizette
Shmuel Metz (Seymour J.) wrote:
Hi. Could someone let me know what the below assembler code is doing?
Turning my stomache.
LOL! Do you have the stomach to read that code snippet? ;-D
Groete / Greetings
Elardus Engelbrecht
--
Hey! I resemble that remark!
Seriously, I think you denigrate application programmers with remarks like
that. We are not dumb coding robots with no experiences outside of our COBOL
shell.
*Some* of us are even experts in assembler as well as COBOL as well as C as
well as linux tool chains
W dniu 2013-04-30 18:33, Anthony Rudd pisze:
I am sorry that I was too imprecise.
I need a programmed solution, prefererably called from REXX (IRXJCL).
The situation:
I have submitted as batch job (possibly long running).
In a separate batch job, I need to wait until the first job has
Why bother checking periodically if the job has completed when you can
simply add a step at the end of the first job to submit the next job.
//LASTSTEP EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
SUB 'MY.JOB.PDS(my next job)'
//*
Kolusu
IBM Mainframe Discussion List
IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on
04/30/2013 12:33:19 PM:
From: Anthony Rudd ar...@t-online.de
I am sorry that I was too imprecise.
I need a programmed solution, prefererably called from REXX (IRXJCL).
The situation:
I have submitted as batch job (possibly
Trying to understand some astonishing behavior, in:
Title: SMP/E V3R6.0 for z/OS V1R13.0 Commands
Document Number: SA22-7771-15
3.0 Chapter 3. The APPLY command
3.7.5 Element installation
3.7.5.8 Module replacements
I read:
o If SMP/E has determined
But doing an allocate of the DISP=OLD will succeed if the job has not even
started yet. Perhaps the final step should allocate a
DISP=(NEW,CATLG,CATLG) and run with a COND=EVEN of a unique data set name.
The REXX script could generate one by using the DATE() and TIME() functions
to create
shmuel+...@patriot.net (Shmuel Metz , Seymour J.) writes:
It may be true for simulation of the S/370 on Intel, but a real
370/168 handled it in the I-unit.
re:
http://www.garlic.com/~lynn/2013f.html#65 Linear search vs. Binary search
high-end machines were horizontal microcode with lots of
z/OS seems to be transitioning more towards using lower case in addition to
upper case. One area in which it affects me is when the ISPF editor
automagically switches to upper/lower case support and I forget to type in
UPPER CASE when I do things like a CHANGE command. Yes, this is my fault
due to
John McKown wrote:
z/OS seems to be transitioning more towards using lower case in addition to
upper case.
Where? ;-) Please give Examples - short and sweet please... ;-)
One area in which it affects me is when the ISPF editor automagically switches
to upper/lower case support and I forget
Kirk Talman wrote:
Bless your heart for supplying an Assembler example. Thanks!
I have seen this done in Cobol, bless their hearts. I assume it can be done
in any HLL.
True. Mark Zelden, bless his heart, wrote something like that in REXX where he
used ASVENTY to grab ASIDs.
Check his site
On 4/30/2013 6:00 AM, Steve Comstock wrote:
... spend some time perusing the docs each time a new
release comes out.
It seems that most people are too busy these days to read the Release
Information books. Some folks still only use commands they learned in
the 1980s.
One good thing about
On 4/30/2013 1:17 PM, Ed Jaffe wrote:
On 4/30/2013 6:00 AM, Steve Comstock wrote:
... spend some time perusing the docs each time a new
release comes out.
It seems that most people are too busy these days to read the Release
Information books. Some folks still only use commands they learned
On Tue, 30 Apr 2013 12:17:13 -0700, Ed Jaffe edja...@phoenixsoftware.com
wrote:
On 4/30/2013 6:00 AM, Steve Comstock wrote:
... spend some time perusing the docs each time a new
release comes out.
It seems that most people are too busy these days to read the Release
Information books. Some
On Tue, 30 Apr 2013 13:27:40 -0500, Elardus Engelbrecht wrote:
z/OS seems to be transitioning more towards using lower case in addition to
upper case.
Where? ;-) Please give Examples - short and sweet please... ;-)
Binder. HLASM.
But I have considerable disagreement with Binder's making
From: John McKown john.archie.mck...@gmail.com
Date: 04/30/2013 11:19 AM
snippage
IF condition THEN
STATEMENT
END-IF
and I usually only put a single period in a paragraph, as the last line in
the paragraph. Everything else is delimited with END-verb. I never use
NEXT
SENTENCE any more.
Thinking of this, I I think that it would be nice to get a diff of a well
formed plain text type document.
OK, what I really want is plain text in a markup format. And have it be
available via a git repository. What this would get us is a log of the
changes which we could track over time.git is
Steve,
I usually do paragraph thru paragraph name-exit. Unfortunately I am also
writing in C and Assemblerhard to remember which is which.
Scott ford
www.identityforge.com
from my IPAD
'Infinite wisdom through infinite means'
On Apr 30, 2013, at 4:23 PM, Steve Thompson
C and Cobol with longnames and DLL support and ability to call java
Scott ford
www.identityforge.com
from my IPAD
'Infinite wisdom through infinite means'
On Apr 30, 2013, at 4:12 PM, Paul Gilmartin paulgboul...@aim.com wrote:
On Tue, 30 Apr 2013 13:27:40 -0500, Elardus Engelbrecht wrote:
Hello,
Back again. Am at Dallas IIC z/OS, compiling a dozen COBOL/CICS pgms all having
a SIZE problem. The following JCL almost worked without SIZE:
//ACICSP01 JOB (CONRAD-C),'IBMUSE2',CLASS=A,MSGCLASS=0,MSGLEVEL=(1,1)
//MYLIBS JCLLIB ORDER=(DFH420.CICS.SDFHPROC)
What's the length of your parm ? No more than 100 bytes
Scott ford
www.identityforge.com
from my IPAD
'Infinite wisdom through infinite means'
On Apr 30, 2013, at 8:06 PM, Graham Hobbs gho...@cdpwise.net wrote:
Hello,
Back again. Am at Dallas IIC z/OS, compiling a dozen COBOL/CICS pgms all
The SIZE parm needs to be specified on the PARM for the EXEC PGM=IGYCRCTL, ie:
//COMPILE EXEC PGM=IGYCRCTL,PARM='SIZE(16384K)'
From: Graham Hobbs gho...@cdpwise.net
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Tuesday, April 30, 2013 6:06 PM
Subject: Compile
Make a copy of the PROC in a JCL library you allocate on your TSO ID.
Change the ORDER statement to point to that. Hard code all those
overrides in the new PROC and leave then out of your JCL. In the PROC code
PARM=(SIZE=4000K) like you had below. You didn't specify your region. Put
50 matches
Mail list logo