run rexx code with jcl

mox512 · Posted: Sat Feb 10, 2024 10:02 am

I want to execute rexx with jcl. but its not working. this code extract sdsf panel but jcl with this pgms ( IKJEFT1A, IKJEFT01, IKJEFT1B) is not able to execute this rexx code. Do you have any solution so that i can run this code as job.
It seems that to view the panel sdsf it is not possible to extract information from the sdsf panel with this jcl code as job.

/* REXX */
S_RC = RXSUBCOM('ADD','DSNREXX','DSNREXX')
ADDRESS DSNREXX
'CONNECT' 'Database name'
RC = ISFCALLS('ON')
ADDRESS SDSF "ISFLOG READ TYPE(SYSLOG)"
DO I = 1 TO ISFLINE.0
IF POS('IEF125I',ISFLINE.I) \= 0 THEN DO
PARSED_DATA = SUBSTR(ISFLINE.I,POS('IEF125I',ISFLINE.I)+8,40)
SAY PARSED_DATA

END
END

jcl:

//LOGUSR JOB CLASS=A
//EREPMTN EXEC PGM=IKJEFT01,REGION=0K,PARM='LOGREAD'
//SYSEXEC DD DSN=USER.REXX,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY,BLKSIZE=80
//INDD DD *

Pedro · Posted: Sat Feb 10, 2024 10:29 am

re: not able to execute

You need to provide error messages or other symptoms.

Pedro · Posted: Sat Feb 10, 2024 10:34 am

These are probably not required to use SDSF:

mox512 · Posted: Sat Feb 10, 2024 10:36 am

It doesn't give an error and it runs with cc0000 but it seems that it can't read the panel with this pgm.

ADDRESS DSNREXX
'CONNECT' 'Database name'

this section is connect to database for next step i need to insert in table. i think rexx code is run correctly but idont know how it run as job.

Pedro · Posted: Sat Feb 10, 2024 12:33 pm

Show us the trace.

don.leahy · Posted: Mon Feb 12, 2024 2:08 am

don.leahy · Posted: Mon Feb 12, 2024 2:09 am

Willy Jensen · Posted: Mon Feb 12, 2024 3:19 am

As to how to run a REXX as a job, take look at the RXINSTRX pgm at harders-jensen.com.
But I expect that at least part of your problem could be the statement 'CONNECT' 'Database name'
which I guess tries to connect to a database called DATABASE NAME. Check your quotes.

Pedro · Posted: Mon Feb 12, 2024 11:32 am

re: "this section is connect to database for next step"

I agree with Willy that this is a problem. You should remove the DB2 code until you have the SDSF code working. That is, you should develop the project in incremental steps and get one to work before moving to the next so that you do not have to debug too much at once.

mox512 · Posted: Mon Feb 12, 2024 11:40 am

I remove database connection but i cant compile my code with jcl. But it seems that this pgm or this jcl cant Execute sdsf information. if I execute this code with tso exec 'datasetname' rexx code run correctly and this information at log insert in table. But this code cant work with jcl. It seems that I can't read the sdsf panel, I am so confused.

/* REXX */

RC = ISFCALLS('ON')
ADDRESS SDSF "ISFLOG READ TYPE(SYSLOG)"
DO I = 1 TO ISFLINE.0
IF POS('IEF125I',ISFLINE.I) \= 0 THEN DO
PARSED_DATA = SUBSTR(ISFLINE.I,POS('IEF125I',ISFLINE.I)+8,40)
SAY PARSED_DATA

END
END

mox512 · Posted: Mon Feb 12, 2024 11:41 am

I remove database connection but i cant compile my code with jcl. But it seems that this pgm or this jcl cant Execute sdsf information. if I execute this code with tso exec 'datasetname' rexx code run correctly and this information at log insert in table. But this code cant work with jcl. It seems that I can't read the sdsf panel, I am so confused.

/* REXX */

RC = ISFCALLS('ON')
ADDRESS SDSF "ISFLOG READ TYPE(SYSLOG)"
DO I = 1 TO ISFLINE.0
IF POS('IEF125I',ISFLINE.I) \= 0 THEN DO
PARSED_DATA = SUBSTR(ISFLINE.I,POS('IEF125I',ISFLINE.I)+8,40)
SAY PARSED_DATA

END
END

sergeyken · Posted: Mon Feb 12, 2024 6:28 pm

enrico-sorichetti · Posted: Mon Feb 12, 2024 6:42 pm

from the first TS post...

Pedro · Posted: Tue Feb 13, 2024 11:23 am

I would make sure you get a response:

Pedro · Posted: Tue Feb 13, 2024 11:26 am

re: "i think rexx code is run correctly"

Can you run your rexx code from your TSO id? I suggest you try that, assuming that you can use SDSF from there, to show that SDSF is setup correctly.

If it works in TSO, check your DD allocations for some ISF files... they also need to be allocated in your batch job.

Pedro · Posted: Tue Feb 13, 2024 11:30 am

Show us the trace.

And look here for more debugging information:
www.ibm.com/docs/en/zos/3.1.0?topic=language-diagnosing-errors-in-rexx-exec