|
View previous topic :: View next topic
|
| Author |
Message |
anki
New User
Joined: 04 Apr 2008
Posts: 23
Location: Pune
|
|
|
|
Hi,
Thanks for above details, what if i would like to do vice versa... calling REXX program from assembler? and also want to pass a string message from Assembler to REXX program.
Thanks,
Ankit |
|
| Back to top |
|
 |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
what happened when You googled for calling rexx from assembler   |
|
| Back to top |
|
|
anki
New User
Joined: 04 Apr 2008
Posts: 23
Location: Pune
|
|
|
|
| I am calling REXX program from my assembler but now it is giving me error on TSO commands so tried using "ADDRESS TSO" in REXX program before using first ALLOC but no success. Please advise. |
|
| Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1787
Location: Bloomington, IL
|
|
|
|
| Did you establish a TSO environment? |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| I wonder if Assembler supports the same calls to IKJTSOEV and IKJEFTSR that COBOL does? |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| Ankit, I think you need to clarify if you wan to call TSO (and/or TSO commands) from Assembler, REXX (I would think it would be a simple call to IRXJCL), or some mixture of both, and if you need to establish a linkage between the two (for passing data). |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
| Back to top |
|
|
anki
New User
Joined: 04 Apr 2008
Posts: 23
Location: Pune
|
|
|
|
I need to do following things:
1. Call rexx program from assembler
2. In Rexx program need to execute TSO command.
Assembler >> Rexx >> TSO command
First point is working perfectly as suggested earlier. But I am getting error RC(-3) when trying to execute "ALLOC" or similar TSO command from REXX.
I am not familiar with IKJTSOEV or IKJEFTSR.
Q. Do we need to create a TSO enviorment in this case? If yes, how?
Q. Why in this case, when we are calling rexx from assembler TSO enviorment is not available in rexx program, while it normally available when REXX executed standalone? |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| I personally don't know Assembler, but I'm curious as to what TSO commands can't be handled directly, or even better, with Assembler. |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
why don't you try invoking the assembler module via IKJEFT..
it is a simple test and you don't have to change any code......
but you still need the ADDRESS TSO in the Rexx Script (i think). won't hurt. |
|
| Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1787
Location: Bloomington, IL
|
|
|
|
| anki wrote: |
| Q. Do we need to create a TSO enviorment in this case? |
Yes
I want you to contemplate for what the highlighted letters in IKJTSOEV could possibly stand. Please take as much time as needed to be certain of your answer.
| Quote: |
| Q. Why in this case, when we are calling rexx from assembler TSO enviorment is not available in rexx program, while it normally available when REXX executed standalone? |
Are you actually executing Rexx standalone -- i.e., by invoking IRXJCL -- or through some other program? Perhaps IKJEFT01, 1A, or 1B? |
|
| Back to top |
|
|
anki
New User
Joined: 04 Apr 2008
Posts: 23
Location: Pune
|
|
|
|
| Quote: |
| I want you to contemplate for what the highlighted letters in IKJTSOEV could possibly stand. Please take as much time as needed to be certain of your answer. |
TSOEV is for TSO Enviorment and IKJTSOEV is used to setup TSO env.
| Quote: |
| Are you actually executing Rexx standalone -- i.e., by invoking IRXJCL -- or through some other program? Perhaps IKJEFT01, 1A, or 1B? |
I also tried executing REXX program by IRXJCL also but TSO command in REXX program is not working.
[/quote] |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
Suggest you run a trace and post the info shown by the trace. |
|
| Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1787
Location: Bloomington, IL
|
|
|
|
| anki wrote: |
| Quote: |
| I want you to contemplate for what the highlighted letters in IKJTSOEV could possibly stand. Please take as much time as needed to be certain of your answer. |
TSOEV is for TSO Enviorment and IKJTSOEV is used to setup TSO env. |
Very good; you now know how to create a TSO environment.
| Quote: |
| Quote: |
| Are you actually executing Rexx standalone -- i.e., by invoking IRXJCL -- or through some other program? Perhaps IKJEFT01, 1A, or 1B? |
I also tried executing REXX program by IRXJCL also but TSO command in REXX program is not working. |
If you do not have a TSO environment -- because you are not executing your exec from TSO (IKJEFT*) and have not established one via IKJTSOEV -- why would you expect a TSO command to work? |
|
| Back to top |
|
|
anki
New User
Joined: 04 Apr 2008
Posts: 23
Location: Pune
|
|
|
|
I am able to run my REXX program using IKJEFT01.
Also I came across one para which would make it hard to create TSO enviorment in REXX. Copy pasted below. thanks.
| Quote: |
REXX ADDRESS TSO Support Requirementsv
If you want REXX ADDRESS TSO support, you must ensure that no REXX
language processor environment exists in your address space when you invoke
IKJTSOEV. If you invoke IKJTSOEV from an address space that already contains
a REXX language processor environment and the REXX environment does not
include the ADDRESS TSO host command environment, the REXX language
processor environment will continue to be available without ADDRESS TSO
support. |
|
|
| Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1787
Location: Bloomington, IL
|
|
|
|
| anki wrote: |
| I am able to run my REXX program using IKJEFT01. |
Just so. IKJEFT01 is TSO; thus, if you run your exec using IKJEFT01, you are ipso facto running it in a TSO environment.
| Quote: |
Also I came across one para which would make it hard to create TSO enviorment in REXX. Copy pasted below. thanks.
| Quote: |
REXX ADDRESS TSO Support Requirementsv
If you want REXX ADDRESS TSO support, you must ensure that no REXX
language processor environment exists in your address space when you invoke
IKJTSOEV. If you invoke IKJTSOEV from an address space that already contains
a REXX language processor environment and the REXX environment does not
include the ADDRESS TSO host command environment, the REXX language
processor environment will continue to be available without ADDRESS TSO
support. |
|
Indeed. So, then, you won't create the environment by invoking IKJTSOEV from Rexx, but by invoking it from your assembler program before executing the exec, won't you? |
|
| Back to top |
|
|
anki
New User
Joined: 04 Apr 2008
Posts: 23
Location: Pune
|
|
|
|
THANK YOU.
I am able to setup TSO enviorment in Assembler program and succesfully called REXX program which is executing TSO commands.
APPRECIATE YOUR HELP..!!.. |
|
| Back to top |
|
|
|
|
