Maybe I've found an alternative: instead of reading the SCHENV, I can pass DB2 name (that is SCHENV depending) as a parameter to the program and check it. I think this should fit my needs.
Time to go testing!
PeterHolland, I'm just writing a program to make sure that my JCL procedure is used in the right way (correct job COND and a SCHENV matching the environment).
I have to do this because other users will make use of my JCL procedure, writing their own JCL jobs but they always try to ignore my guidelines. You know, it's an hard life
If I manage to force the job to abend if job COND and SCHENV are wrong, I can force them to use the right parameters. This is why I'm investigating how to do it and I'm almost done.
With respect to my colleague, I can't ask him to work on this task, he is deployed to an other project so I try to collect all information and ask him the less that I can.
Tomorrow I'll test my last idea, I'm confident it will work just fine.
I can't ask him to work on this task, he is deployed to an other project so I try to collect all information and ask him the less that I can.
You are unloading on people that reply on their own time and free of charge problems related to the dynamics of Your organization
Enrico, the scenario is completely different from what you are trying to draw and I'm pretty sure you know it.
I want to figure out how to achieve a result on my own but I don't have enough skills and knowledge. The solution is googleing and asking to experts. My colleague just knows assembler, it does not mean he can find any kind of solution. I asked him how to do it the work an the answer was he does not know how to go from CVT to JSE2 mapping areas. I spent come time googleing and I have found the mapping. Then WJ provided the answer and I went back to my colleague. We replaced a few macros, I did a few changes and the program got to light.
Here, I'm just asking for help, nobody is forced to answer me, nobody if forced to spent time for me or even read the thread. It's awkward I have to write a reply like this!
Please, save some of your spare time and ignore the thread for now on. Thanks for your time.
Joined: 30 Nov 2013 Posts: 859 Location: The Universe
As I said bafore, Mr. Jensen's code fragment will not always work. It will not work if your installation specifies the SWA above the line. This code fragment will always work. Your code specifies AMODE 31, though if it works it will work with AMODE 24. The SWAREQ macro requires AMODE 31.
ZB505SZ EQU *-ZB505
ZB505X DC XL(ZB505SZ)'0'
SWEPAPTR DS F
SWAPARM SWAREQ MF=L
The Load instruction after the SWAREQ macro call will load the correct address of the JCT.