Quantcast
Channel: IBM Mainframe Computers Forums
Viewing all 8500 articles
Browse latest View live
↧

CLIST & REXX :: RE: How to save expanded jcl's into one library

July 27, 2017, 10:20 am
$
0
0
Author: krishna417
Subject: Reply to: How to save expanded jcl's into one library
Posted: Thu Jul 27, 2017 10:50 pm (GMT 5.5)

The reason why i have posted this is

" I need to search few PS data sets in all the JCL libraries and all JCL's is having PROC's with symbolic parameters. It is little bit hard to find out and I thought there might be REXX routines or some utilities that expands PROC's in JCL's."



In my previous project, we used PRO and CA7 to search the data sets in the JCL's where ever it is being used.
_________________
Krishna
↧
Search

CLIST & REXX :: RE: How to save expanded jcl's into one library

July 27, 2017, 10:37 am
$
0
0
Author: daveporcelan
Posted: Thu Jul 27, 2017 11:07 pm (GMT 5.5)

I do not know about jjscan, but we have successful expanded large volumes of jcl using a product called XREFPLUS by SEA.

It does take some effort however.

You have to think outside of the box a bit. It can be done.
↧
↧

DFSORT/ICETOOL :: RE: Split file based on comparsion to 2 fields in 2nd file

July 27, 2017, 10:50 am
$
0
0
Author: sergeyken
Posted: Thu Jul 27, 2017 11:20 pm (GMT 5.5)

Code:
 JOINKEYS F1=...
 JOINKEYS F2=...
 REFORMAT FIELDS=...
 SORT FIELDS=COPY
 OUTFIL FNAMES=BEFORE,INCLUDE=...,BUILD=...
 OUTFIL FNAMES=AFTER,INCLUDE=...,BUILD=...
 END


RTFM
_________________
Tyrannosaurus-REXX
↧

JCL & VSAM :: RE: Paasing symbolic parameter to instream data in jcl

July 27, 2017, 10:58 am
$
0
0
Author: sergeyken
Posted: Thu Jul 27, 2017 11:28 pm (GMT 5.5)

1.
Code:
// SET DSNAME=&SYSUID

2.
Code:
//SYSIN DD *,SYMBOLS=SYSEXEC
     . . . . .
              (NAME(&SYSUID..DUMMY.TEST1)     -   
     . . . . .

_________________
Tyrannosaurus-REXX
↧

CLIST & REXX :: RE: How to save expanded jcl's into one library

July 27, 2017, 11:07 am
$
0
0
Author: Rohit Umarjikar
Posted: Thu Jul 27, 2017 11:37 pm (GMT 5.5)

why don't you check last 2 or 3 qualifiers to narrow down the search? Usually symbolics are used at the first 1/2/3 qualifiers.
_________________
Regards,
Rohit Umarjikar
"Knowledge is knowing that a tomato is a fruit, but Wisdom is knowing not to put it in a fruit salad."icon_razz.gif
↧
↧

DFSORT/ICETOOL :: RE: copying data without knowing location

July 27, 2017, 11:13 am
$
0
0
Author: sergeyken
Posted: Thu Jul 27, 2017 11:43 pm (GMT 5.5)

You must return starting position in PARSE %06 to the beginning of record:
Code:
%06=(ABSPOS=1,  - to restart parsing from the beginning
     STARTAFT=C',AMERI005,',
     ENDBEFR=C',',          - to handle empty or short parm, by a chance
     FIXLEN=06)),

_________________
Tyrannosaurus-REXX
↧

CLIST & REXX :: RE: How to save expanded jcl's into one library

July 27, 2017, 11:30 am
$
0
0
Author: Pedro
Subject: Reply to: How to save expanded jcl's into one library
Posted: Fri Jul 28, 2017 12:00 am (GMT 5.5)

Quote:
JJSCAN will expand the JCL and I want that JCL will be saved

It is not clear where you are after 'expand the JCL'. On the chance that the JJSCAN process ends in the ISPF editor, you can write an editor macro that copies the editor session to another dataset. And assign a PFkey to invoke the new edit macro.

A totally different approach is to use the SDSF rexx api to examine completed jobs and save the original JCL to a data set.
_________________
Pedro Vera
↧

DFSORT/ICETOOL :: RE: Split file based on comparsion to 2 fields in 2nd file

July 27, 2017, 12:15 pm
$
0
0
Author: Div Grad
Posted: Fri Jul 28, 2017 12:45 am (GMT 5.5)

sergeyken - Thanks for the feedback, I got it now! I think I was trying to make it more difficult than needed.
↧
Search

DFSORT/ICETOOL :: RE: Split file based on comparsion to 2 fields in 2nd file

July 27, 2017, 12:56 pm
$
0
0
Author: sergeyken
Posted: Fri Jul 28, 2017 1:26 am (GMT 5.5)

After JOINKEYS, the order of joined records is not guaranteed by SORT; it depends on the joining method actually used.
If specific order of final records is strictly required, then explicit SORT FILEDS=(...) might be needed.
_________________
Tyrannosaurus-REXX
↧
↧

DFSORT/ICETOOL :: RE: copying data without knowing location

July 27, 2017, 1:03 pm
$
0
0
Author: Nic Clouston
Posted: Fri Jul 28, 2017 1:33 am (GMT 5.5)

I doubt if anything was "thrown" - in these particular instances you should have used "giving" which has a completely different meaning. (Nothing is "thrown" on a mainframe.)
_________________
Regards
Nic
↧

DFSORT/ICETOOL :: RE: copying data without knowing location

July 27, 2017, 1:40 pm
$
0
0
Author: magesh23586
Posted: Fri Jul 28, 2017 2:10 am (GMT 5.5)

Nic Clouston wrote:
I doubt if anything was "thrown" - in these particular instances you should have used "giving" which has a completely different meaning. (Nothing is "thrown" on a mainframe.)


Well Said..

icon_axe.gif
_________________
Regards,
Magesh
↧

CLIST & REXX :: RE: How to save expanded jcl's into one library

July 27, 2017, 6:47 pm
$
0
0
Author: magesh23586
Subject: Reply to: How to save expanded jcl's into one library
Posted: Fri Jul 28, 2017 7:17 am (GMT 5.5)

krishna417,

What is the product you are using to expand the jcl?

Once you issue JJSCAN, you may find the product name in the first or second line of the expaned jcl.
_________________
Regards,
Magesh
↧

JCL & VSAM :: RE: JES2 doesn't honor the priority of the output for printing

July 28, 2017, 12:10 am
$
0
0
Author: Aron Lendvai
Posted: Fri Jul 28, 2017 12:40 pm (GMT 5.5)

Now I can confirm that the SPIN=UNALLOC parameter really did solve the problem.

To sum up: my premise was wrong, my problem had nothing to do with output priority, simply because the two outputs were never on the output queue at the same time. The problem was that even though job B was submitted by job A, but job B finished before job A, so its output was printer before job A's. The SPIN=UNALLOC parameter on job A's output allowed it to go to the output queue as soon as that jobstep finished, guaranteeing that it gets there before job B's output, because that step is earlier than which submits job B.
↧
↧

CLIST & REXX :: Iterative use of a REXX script causing insufficient storage

July 28, 2017, 12:22 am
$
0
0
Author: bryonyh
Subject: Iterative use of a REXX script causing insufficient storage
Posted: Fri Jul 28, 2017 12:52 pm (GMT 5.5)

Hi,

I have a REXX script which calls 9 sub modules (also REXX scripts) which retrieve data from DB2 tables, formats and writes the information to a file before returning control to the main calling module. This file is not huge- RL 133, perhaps 100 records max

I am able to use this module up to 5 times but on the 6th time I use it I get an abend with the following information:
INSUFFICIENT STORAGE
NOT ENOUGH STORAGE FOR BUFFER. LOG ON WITH LARGER SIZE PARAMETER

I thought that creating and deleting a bufferpool each time the rexx was run would help and it did but only slightly- I was able to run it up to 7 times but on the 8th time I get the following message;
IEW4000I FETCH FOR MODULE xxxxxx FROM DDNAME SYS00064 FAILED BECAUSE INSUFFICIENT STORAGE WAS AVAILABLE.
CSV031I LIBRARY ACCESS FAILED FOR MODULE xxxxxx , RETURN CODE 14, REASON CODE 6110021, DDNAME SYS00064

I've also tried creating a new stack and deleting it each time the rexx is run which didn't improve things beyond 8 tries.

I have read about other people experiencing this issue and they were advised to log off and on again which I know works but I am hoping that there is a slicker way of getting around this problem ie a way of getting back some storage via commands in the REXX script.

Any suggestions toward a solution or any help toward a better understanding of the problem would be appreciated.

Thanks in advance..
↧

CLIST & REXX :: RE: How to save expanded jcl's into one library

July 28, 2017, 12:53 am
$
0
0
Author: Willy Jensen
Posted: Fri Jul 28, 2017 1:23 pm (GMT 5.5)

As I recall the JJSCAN command, it makes NOTE lines in the displayed data. All NOTE lines can be changed to data lines in one go by the linecommand MD99999 in line 1 (MD = Make Data). Then the data can be saved by the CREATE edit command.
The CREATE can be packaged in an edit macro, unfortunately I couldn't see a edit macro command to change those NOTE lines.
_________________
WJ
↧
Search

CLIST & REXX :: RE: Iterative use of a REXX script causing insufficient storage

July 28, 2017, 5:40 am
$
0
0
Author: Robert Sample
Subject: Reply to: Iterative use of a REXX script causing insufficient storage
Posted: Fri Jul 28, 2017 6:10 pm (GMT 5.5)

From the System Messages manual (emphasis added by me):
Quote:
IEW4000I
FETCH FOR MODULE program-name FROM DDNAME ddname FAILED BECAUSE INSUFFICIENT STORAGE WAS AVAILABLE.
Explanation

There was insufficient storage available to load the load module or program object. If the DDNAME is *VLF*, then this failure occurred while attempting to retrieve the module or program object from VLF rather than from a dataset.
System action

An abend will occur unless the program was loaded by a LOAD macro with the ERRET option specified.
User response

Rerun the job with a larger region size specified.
For a TSO session, you get a larger region size by logging off, then logging on and changing the region size on the LOGON parameters screen -- or by contacting your site support group and having them change the TSO region size for you.

The manual is telling you that this is the solution, so looking for REXX solutions is going to be pretty much a total waste of time.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth
↧

JCL & VSAM :: RE: Paasing symbolic parameter to instream data in jcl

July 28, 2017, 5:43 am
$
0
0
Author: Robert Sample
Posted: Fri Jul 28, 2017 6:13 pm (GMT 5.5)

Talk to your site support group. Use of symbolic parameters in instream data is NOT automatic -- for JES2, a specific parameter has to be set in the initialization of JES2, and this parameter is by job class (not global) so you could be having a problem because you're running in the wrong job class, or because your site support group has not set up the parameter in JES, and only your site support group can tell you for sure which job class(es) are set up for instream symbolic parameters.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth
↧
↧

DFSORT/ICETOOL :: RE: copying data without knowing location

July 28, 2017, 5:54 am
$
0
0
Author: Arun Raj
Posted: Fri Jul 28, 2017 6:24 pm (GMT 5.5)

arunsoods wrote:
Hi magesh23586,

Thanks no Need to reply again My code ran fine and throwing expected output.

Thanks Arun, for the help.

Regards
Arun Sood
Arun,

Glad you figured it out. Thanks for letting know.
_________________
Arun
----------------------------------------------------------------------------------------------------
Love is like an hourglass, with the heart filling up as the brain empties. -Jules Renard
↧

CLIST & REXX :: RE: Iterative use of a REXX script causing insufficient storage

July 28, 2017, 6:06 am
$
0
0
Author: bryonyh
Subject: Reply to: Iterative use of a REXX script causing insufficient storage
Posted: Fri Jul 28, 2017 6:36 pm (GMT 5.5)

OK, thank you. Happy to stop wasting my time searching icon_smile.gif
↧

CLIST & REXX :: RE: How to save expanded jcl's into one library

July 28, 2017, 8:38 am
$
0
0
Author: enrico-sorichetti
Subject: Reply to: How to save expanded jcl's into one library
Posted: Fri Jul 28, 2017 9:08 pm (GMT 5.5)

that behaviour ( NOTE LINES ) is common to most jcl checkers
that' the reason the TS requirement cannot be satisfied

time to lock the topic
question asked and answered ( even if with unsatisfactory replies ) too many times
_________________
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort icon_cool.gif
↧
Viewing all 8500 articles
Browse latest View live
Search

Latest Images

7 clever tricks Primark does to keep you walking & buying more than you need...

7 clever tricks Primark does to keep you walking & buying more than you need...

July 20, 2025, 5:14 am
Art for Everyone! Autism advocacy, local stories, and indigenous pride in one...

Art for Everyone! Autism advocacy, local stories, and indigenous pride in one...

July 20, 2025, 5:06 am
Paintings of English Downs 2

Paintings of English Downs 2

July 20, 2025, 4:30 am
How Kerala Women Rescued a Dying Forest and Turned It Into a Safe Haven for...

How Kerala Women Rescued a Dying Forest and Turned It Into a Safe Haven for...

July 20, 2025, 3:30 am
Met Eireann warns of heavy rain & spot flooding for DAYS before big...

Met Eireann warns of heavy rain & spot flooding for DAYS before big...

July 20, 2025, 1:14 am
Who is Kevin Lerena’s wife Geraldine?

Who is Kevin Lerena’s wife Geraldine?

July 20, 2025, 12:57 am
Man stabs woman, baby to death inside Queens home, police say

Man stabs woman, baby to death inside Queens home, police say

July 19, 2025, 11:00 pm
Ang papel ni whistleblower Julie Patidongan sa kaso ng mga nawawalang sabungero

Ang papel ni whistleblower Julie Patidongan sa kaso ng mga nawawalang sabungero

July 19, 2025, 9:45 pm
Telangana Human Rights Commission (TGHRC) seeks report from revenue dept on...

Telangana Human Rights Commission (TGHRC) seeks report from revenue dept on...

July 19, 2025, 7:29 pm
Crisis-hit NHS fat cats raking in MASSIVE salaries as frontline services cry...

Crisis-hit NHS fat cats raking in MASSIVE salaries as frontline services cry...

July 19, 2025, 2:11 pm