View previous topic :: View next topic
Author
Message
Sahasra K New UserPosts: 8
Hi Good Morning ,
Code:
Code:
Code:
Code:
Back to top
Sahasra K New UserPosts: 8
Continaution to above
Code:
Back to top
steve-myers Active MemberPosts: 917
You have multiple issues here.Running services like LMDLIST in batch requires additional DD statements in the the JCL so ISPF can run. That may be the proximate cause of the U0102 ABEND. You can invoke a CLIST in a Rexx EXEC in two ways.As a pseudo TSO line command
As a TSO EXECUTE (EX) command
I believe the Rexx CALL command usually references a procedure in the same member as the CALL command. RUNJOB is not a procedure in your prototype Rexx exec. I know a Rexx CALL can reference an external procedure, but I am not enough of a Rexx expert to coach you in the requirements to call an external procedure.
Back to top
Sahasra K New UserPosts: 8
This is my entire code
Code:
Code:
Back to top
Nic Clouston Global ModeratorPosts: 2454
Refer to Steve's first point: you have not specified the required ISPF libraries to run ISPF in batch. There are examples in the forum of what you need.
Back to top
Sahasra K New UserPosts: 8
Thansk alot Nic...
Code:
Back to top
Pedro Global ModeratorPosts: 2593
For PGM=IKJEFT01, you need to provide SYSTSPRT and SYSTSIN.
Back to top
cvnlynn New UserPosts: 31
Quote:
//PS050 EXEC PGM=IKJEFT01,PARM='ISPSTART CMD(SVLSTHKR'
Back to top
Sahasra K New UserPosts: 8
i have done the changes like below in the JCL and submitted again . now getting ABEND=S000 U0999 REASON=00000000 989
Code:
Code:
Back to top
Sahasra K New UserPosts: 8
finally a minor progress on the job
Code:
Code:
Code:
Back to top
Nic Clouston Global ModeratorPosts: 2454
Well of course it isn't. The JCL is fixed in stone once it is submitted. Nothing can be changed once it has been read onto the machine.
Back to top
steve-myers Active MemberPosts: 917
Nic Clouston wrote:
Well of course it isn't. The JCL is fixed in stone once it is submitted. Nothing can be changed once it has been read onto the machine.
Mr. Clousten's statement is both correct and incorrect. The JCL card images themselves cannot be altered in any way. However, the effect of the statements can be altered through a variety of mechanisms by the programs that are run by the JCL. For exampleDynamic allocationThe TSO ALLOCATE and FREE commands. The BPXWDYN program, which can be called from Rexx EXECs (it is not really proper to call a Rexx EXEC a “program,” though many of us do this, and the effect is the same) as well as other programming languages such as C, PL/I or even Cobol. MVS dynamic allocation services directly called from (usually) Assembler programs, which is in effect what the TSO ALLOCATE and FREE commands are as well as something like BPXWDYN. Altering a data area known as a JFCB, which is only readily exposed to Assembler programs, followed by the use of the Assembler OPEN xxx,TYPE=J macro can achieve effects similar to the direct effect of using MVS dynamic allocation. In fact, there are things that can be done with this mechanism that cannot be directly done using dynamic allocation.
Back to top
Nic Clouston Global ModeratorPosts: 2454
Not incorrect - dynamic allocation does not go through the RI. I was referring solely to SUBMITTED JCL.
Back to top
Pedro Global ModeratorPosts: 2593
When your exec finishes, be sure to provide a return code 0.
Back to top
Sahasra K New UserPosts: 8
when i harocde the value of HLq = and RSS Like it working fine .. but i would be like to be mre generic
Code:
Code:
Code:
Code:
Code:
Back to top
Willy Jensen Active MemberPosts: 730
Seems that you are confusing JCL variable substitution with REXX ditto. And I don't see where you get the values for HLQ and RSS respectively.
Code:
Arg . 'HLQ('hlq')' . 0 . 'RSS('rss')' .
Code:
PARM='ISPSTART CMD(%SVLSTHKR HLQ(S) RSS(A2))'
Back to top
Sahasra K New UserPosts: 8
HLQ and RS vaues get passed from panels
Code:
Code:
Code:
Code:
Back to top
Willy Jensen Active MemberPosts: 730
Ok, but the statement DSNLEV = '&HLQ.AS&RSS.F*.&HLQ.A&RSS.*' is still wrong, this is not how you substitute values in REXX. Which is why you get RC=4 in your LMDLIST command.
Back to top
Pedro Global ModeratorPosts: 2593
Quote:
I can't see how you intend to pass the values from the panel to the REXX.
Back to top
Willy Jensen Active MemberPosts: 730
Quote:
Rexx programs and ISPF panels share a common variable pool
Back to top
Please enable JavaScript!
