On Tue, 17 Apr 2012 22:23:09 -0500, John McKown wrote:
>I do use a UNIX subdirectory on my SYSEXEC concatenation. But, as you
>said, it cannot be first. So I have an empty PDS with FB/80 as the first
>DSN in the concatenation. A clumsy work around, but at least it works
>for me.
>
When you do thi
Years ago, I learned my first programming language (FORTRAN) from an
excellent book by Daniel McCracken who was justly famous for his
excellent programming books. He was also known, (but not quite as
well) for a mid-life crisis which involved completing a degree from a
seminary, but never g
Mark,
"If you use that exec to "undo" indirect cataloging, *YOU MUST* change
"DEVT()" to "DEVT(3390)" (assuming you are not using something
like a P/390 with 3380 DASD) before submitting the IDCAMS job"
Yeah I have pointed DEVT(3390)..
On Wed, Apr 18, 2012 at 8:30 PM, Tom Marchant wrote:
On Wed, 18 Apr 2012 21:59:33 -0300, Clark Morris wrote:
>On Wed, 18 Apr 2012 23:04:51 +0200 (CEST), in bit.listserv.ibm-main
>Nomen Nescio wrote:
>
Hoo dat!?
>>This gets back to what I said. PERFORM is net 5 instructions more *per PEFORM*
>>than two GO TOs (to and fro) so loops processing millio
On Wed, 18 Apr 2012 23:04:51 +0200 (CEST), in bit.listserv.ibm-main
Nomen Nescio wrote:
* this is a response to a posting to just the newsgroup and not the
listserv
>mathwst...@bellsouth.net (Matthew Stitt) wrote:
>
>> Having said that, I still use GO TO extensively, and have not kept up with
>>
On Wed, 18 Apr 2012 12:25:06 -0500, Joel C. Ewing wrote:
>
>So does IBM change the docs to agree with the implementation (the
>cheaper solution), or do they change the code to not conflict with the
>docs (which may break existing usage)? In any event, the existing JCL
>documentation should not be
On 17 April 2012 21:26, Shmuel Metz (Seymour J.)
wrote:
>>I suspect they continue to use a combination of DADSM and
>>home-grown manipulation of control blocks.
>
> More likely a bog standard search of the TIOT with some of them doing
> an OPENJ, e.g., IEHLIST, IEHPROGM.
For IEHLIST you're proba
In
,
on 04/17/2012
at 05:49 PM, Tony Harminc said:
>I suspect they continue to use a combination of DADSM and
>home-grown manipulation of control blocks.
More likely a bog standard search of the TIOT with some of them doing
an OPENJ, e.g., IEHLIST, IEHPROGM.
--
Shmuel (Seymour J.) Me
In <1334691539.94814.yahoomai...@web180906.mail.ne1.yahoo.com>, on
04/17/2012
at 12:38 PM, Lloyd Fuller said:
>Univac SAAL computers
ITYM UNIVAC 1005[1]. I had successfully ripped the memory out by the
roots; thank you for reminding me :-(
[1] SAAL was the assembler.
--
Shmuel (Seymo
On Tue, 17 Apr 2012 22:23:09 -0500, John McKown wrote:
>I do use a UNIX subdirectory on my SYSEXEC concatenation. But, as you
>said, it cannot be first. So I have an empty PDS with FB/80 as the first
>DSN in the concatenation. A clumsy work around, but at least it works
>for me.
>
Me, too. It co
Sorry, my cut and paste went awry. Should be this:
//EP4IN PROC
//STEP01 EXEC PGM=IEFBR14,COND=(20,LT)
//STEP01A EXEC PGM=IEFBR14,COND=(20,LT)
//STEP02 EXEC PGM=EPZOS,COND=(20,LT)
//STEP03 EXEC PGM=IDCAMS,COND=(7,LT)
//STEP04 EXEC PGM=EPTBLUPD
// IF ( STEP04.RC = 3 ) THEN
//STEP05 EXEC PG
On 04/18/2012 12:43 PM, Frank Swarbrick wrote:
I have the following job (cut down to include only the relevant parts):
//VAPPROC4 JOB
//BACKUP1 EXEC PROC=SORTBKUP,COND=(4,LT)
//EP4INEXEC PROC=EP4IN,COND=(4,LT)
//E4INPRT EXEC PROC=E4INPRT
//
The EP4IN PROC is a vendor supplied proc as fo
And the Computer Systems Command was out of Ft. Belvoir, VA and had
administrative offices out at the Melpar bldg. on Route 50 along with a drone
development pgm out of DARPA. Classes were offered from DODCI at the Naval
Yard for civilians and military.
In a message dated 4/18/2012 6:46:5
You can pass the symbolic PARM to a program and then have the program set
the appropriate return code that the JCL can then use the return code for
branching. In this case you could return 0 or 1.
I often need to execute neither, one or both of two steps. RC=1 or 3
selects the first. RC=2 or 3
I have the following job (cut down to include only the relevant parts):
//VAPPROC4 JOB
//BACKUP1 EXEC PROC=SORTBKUP,COND=(4,LT)
//EP4IN EXEC PROC=EP4IN,COND=(4,LT)
//E4INPRT EXEC PROC=E4INPRT
//
The EP4IN PROC is a vendor supplied proc as follows:
//EP4IN PROC
//STEP01 EXEC PGM=IEFBR14,
Whomever it was that invented the entire "COND" construct in JCL was severely
demented; with the ABENDCC options being only a small part of it!
:-(
>
> From: Joel C. Ewing
>To: IBM-MAIN@bama.ua.edu
>Sent: Wednesday, April 18, 2012 11:25 AM
>Subject: Re: Execut
The following can accomplish the same thing without the need to write a
custom program. This solution is entirely contained within the JCL:
//*
// SET HEX00=' ' <=== THIS IS A HEX ZERO CHARACTER
// SET SYMBL='XYZ'
On 04/18/2012 10:51 AM, Paul Gilmartin wrote:
On Wed, 18 Apr 2012 09:47:05 -0500, Joel C. Ewing wrote:
On 04/18/2012 08:46 AM, Paul Gilmartin wrote:
On Wed, 18 Apr 2012 09:30:59 -0400, Veilleux, Jon L wrote:
According to the JCL manual that won't work:
The following keywords are the only ke
On Wed, 18 Apr 2012 08:02:20 -0500, Victor Zhang wrote:
>
>So I code:
>//ABC PROC VER='620'
>//IF620 IF (&VER=620) THEN
>//PGMNAME EXEC PGM=PGM
>//STEPLIB DD DNS=LOADMOD.V620
>// ELSE
>//PGMNAME EXEC PGM=PGM
>//STEPLIB DD DNS=LOADMOD.V710
>//ENDIF
>
A possible drawback of such a scheme is
On Wed, 18 Apr 2012 09:47:05 -0500, Joel C. Ewing wrote:
>On 04/18/2012 08:46 AM, Paul Gilmartin wrote:
>> On Wed, 18 Apr 2012 09:30:59 -0400, Veilleux, Jon L wrote:
>>
>>> According to the JCL manual that won't work:
>>>
>>> The following keywords are the only keywords supported by IBM and
>>> r
John Roberts has resolved your problem. You need a reusable zero-th
step that sets the return code.
The PL/I procedure
selstep: procedure(parm) options(main) reorder ;
/* sets its return code equal to 1 if its parm value is 'first',
to 2 if its parm value is 'second', to 0 otherwise */
d
On Wed, 18 Apr 2012 08:18:25 +0530, Jake anderson wrote:
>I am just curious to know if we have indirectly cataloged one set of volume
>lets say ZX2RS2 to &SYSR2. Can we change back the entries in Master Catalog
>from &SYSR2 to ZX2RS2 ? Could anyone please advise me if such options are
>available t
On 04/18/2012 08:46 AM, Paul Gilmartin wrote:
On Wed, 18 Apr 2012 09:30:59 -0400, Veilleux, Jon L wrote:
According to the JCL manual that won't work:
The following keywords are the only keywords supported by IBM and recommended
for use in relational-expressions. Any other keywords, even if ac
Z...
Here is another approach i use this:
//BULDREL JOB SYSTEMS,MSGLEVEL=(1,1),MSGCLASS=X,CLASS=A,PRTY=8,
// NOTIFY=&SYSUID,REGION=0M
//*--*
//* BUILD FOR IDF RACF RELEASES *
//* . PRODEXP = EXPRESS PIONEER ONLY *
//* . PRODENT
On Tue, Apr 17, 2012 at 10:33 PM, John McKown wrote:
> Guess I am spoiled by the assembler (as command) and C/C++ compiler's
> support of both UNIX paths and z/OS PDS[E]s.
>
> Spoiled by common sense :-) z/OS Unix commands should not be walled out
from z/OS datasets.
> I have a, to me, clumsy
Another option is to pass the parameter as PARM information to a first step.
The program for the first step would inspect the PARM and set its return code
accordingly. Subsequent steps could be made conditional on the return code of
this first step.
John
-
On Tue, 17 Apr 2012 23:50:46 -0700, Walter Marguccio
wrote:
>From: Jake anderson
>
>To: IBM-MAIN@bama.ua.edu
>
>> Are there any sample JCLs which would perform the above stuff at once for
>> all 214 datasets.
>
>the best method I can think of is Mark Zelden's REXX INDIRECR:
>
>
>http://www.mzel
Why not pass the the version in as a symbolic:
//ABC PROC VER=620
//PGMNAME EXEC PGM=PGM
//STEPLIB DD DNS=LOADMOD.V&ver
Then you can call it from your JCL:
//STEP1 EXEC PROC=ABC,VER=620or
//STEP1 EXEC PROC=ABC (This will default to 620)
and then if you have a new version, you can chang
On Wed, 18 Apr 2012 09:30:59 -0400, Veilleux, Jon L wrote:
>According to the JCL manual that won't work:
>
>The following keywords are the only keywords supported by IBM and recommended
>for use in relational-expressions. Any other keywords, even if accepted by the
>system, are not intended or s
According to the JCL manual that won't work:
The following keywords are the only keywords supported by IBM and recommended
for use in relational-expressions. Any other keywords, even if accepted by the
system, are not intended or supported keywords. Also you need to change DNS to
DSN
Ke
On 17 Apr 2012 18:13:15 -0700, in bit.listserv.ibm-main you wrote:
>In <4f84ecfe.7060...@gabegold.com>, on 04/10/2012
> at 10:31 PM, Gabe Goldberg said:
>
>>What are the worst -- most ridiculous, most outdated -- myths
>>you've recently heard?
>
>Not recent, but a customer once approached me w
Ok, the proc is like:
//ABC PROC VER='620'
//PGMNAME EXEC PGM=PGM
//STEPLIB DD DNS=LOADMOD.V620
IF VER NOT = '620' i want proc be:
//PGMNAME EXEC PGM=PGM
//STEPLIB DD DNS=LOADMOD.V710
So I code:
//ABC PROC VER='620'
//IF620 IF (&VER=620) THEN
//PGMNAME EXEC PGM=PGM
//STEPLIB DD DNS=LOADMOD.V620
/
Presumably an output PDS for file tailoring within the SMP/E dialogs.
You might want to make it a per-user data set.
No no no. SMPTABL is an ISPF table data set intended to be shared by
all your SMP/E dialog users.
(http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/gimusr51/3.6.3?SHE
What about the ASMA90 program? It can be invoked via JCL and process the PARM=.
But it can also be LINK'd to or ATTACH[X]'d. In this latter case, The parmlist
passed in via GPR1 can have more than one entry. The others are for things like
overriding DD names. Many of IBM's utilities (such as IDC
Fort Huachuca is in Arizona, and when I was in the Army was the training base
for some of the communications stuff. The other communications training was
Fort Monmouth, New Jersey.
I believe that Fort Huachuca also had some intelligence schools there. That
could have been programming classes
Just found this information related to the ZFS delay I'd had, which I'd filed
away. It's copied from a redpiece. I chopped bits out here and there I think,
but the full text is in the following Redpiece:
http://www.redbooks.ibm.com/redpieces/pdfs/sg246580.pdf
2.12.2 Mounting zFS file systems cop
Victor Zhang wrote:
>I want to achieve:
>if input parm is A:
>execute job step1
>else execute job step2
>Is it possible to do it using if/then/else or other methods without coding a
>program?
Where and in what format is your parm?
Give us an example on what you want to do.
Groete / Greetings
> -Ursprungligt meddelande-
> Från: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] För
> Shmuel Metz (Seymour J.)
> Skickat: den 18 april 2012 01:26
> Till: IBM-MAIN@bama.ua.edu
> Ämne: Re: SV: GO TO "cobol"
>
> In
>
> ,
> on 04/16/2012
>at 03:42 PM, Thomas Berg said:
>
On Wed, 18 Apr 2012 04:25:12 -0500 Victor Zhang
wrote:
:>Hello,
:>I want to achieve:
:>if input parm is A:
:>execute job step1
:>else execute job step2
:>
:>Is it possible to do it using if/then/else or other methods without coding a
program?
How is the "input parm" passed?
--
Binyamin Dissen
Hello,
I want to achieve:
if input parm is A:
execute job step1
else execute job step2
Is it possible to do it using if/then/else or other methods without coding a
program?
regards
Victor
--
For IBM-MAIN subscribe / signoff / a
Why? I don't understand this comment, because JCL parm is always only
one parm;
no variable length address list ... what do I get wrong? Well, the JCL
parm itself has
variable length, but the length of the address list is fixed, always
one. And: I dont know
if the system sets the high order bit
Thanks Peter. They re-IPLed that LPAR on Sunday so that cleaned everything
up.
Regards,
John.
On 17 April 2012 17:31, Peter Relson wrote:
> >Does anyone know if there is a way of finding out which address spaces
> >are using these previous versions with the non-zero use counts ?
>
> Brute for
Linda,
Thank you very much, your info is being very useful.
2012/4/18 Linda Mooney
> Hi Alvaro,
>
>
>
> Along with your ServerPac, there are instructions for testing system
> components/products and a library, *.SPAC.IVPLIB with some jobs in it.
> There is also some info in the Installing You
Hi Tom,
In respect of your recent post on the issue of the title, and your last
paragraph:
"It clearly says only directories and paths, but I suppose a confirmation
that datasets are not supported would be nice. I will try to get that into
the next version of the Programming Guide. If anyone ha
44 matches
Mail list logo