Answer Posted / marlo

I've done this before and here's part of my code!!! You do
the research!!!

ADDRESS TSO "SUBCOM DSNREXX"
IF RC <> 0 THEN
DO
X_RC = RXSUBCOM('ADD','DSNREXX','DSNREXX')
IF X_RC <> 0 THEN
DO
SAY 'PROBLEM LOADING '||SUBSYS' ENVIRONMENT'
EXIT 0
END
END

ADDRESS DSNREXX "CONNECT" SUBSYS
...
...

ADDRESS DSNREXX "EXECSQL DECLARE C1 CURSOR FOR S1"
ADDRESS DSNREXX "EXECSQL PREPARE S1 FROM :SQLSTMT"
ADDRESS DSNREXX "EXECSQL OPEN C1"
ADDRESS DSNREXX "EXECSQL FETCH C1 INTO :COUNT "
ADDRESS DSNREXX "EXECSQL CLOSE C1"

-marloL.

What is the use of uni-rexx?

887

---

How to find or access the current level of a gdg?

794

---

I executed one job and I forget to save the final JCL. But took an XDC from SPOOL. Now I want to recover the JCL from XDC dataset. Is there any process to do this?. (Manually it takes a lot of time). Is there

3013

---

How to code the db2 queries using rexx?

934

---

can oorexx run normal rexx programs?

969

---

Can I cleanly uninstall oorexx?

918

---

What is the difference between ooRexx and IBM's Object REXX for Windows?

1036

---

Can I combine uni-REXX with a compiled language in my application? What application programming interfaces are available? For example, can I share variables between uni-REXX and a compiled language?

853

---

i want new rexx tool which will perform jcl chk without submitting it

2024

---

What are the functions available in rexx?

895

---

how to pass parms to ispf edit macro?

1052

---

why is there no os/2 (ecs) port of oorexx?

944

---

Enlist the features of rexx as a programming language.

987

---

When will a port of ooRexx to "XYZ" be available?

835

---

does uni-rexx give me any capabilities designed specifically for the unix environment?

941

---