View previous topic :: View next topic
|
Author |
Message |
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010 Posts: 3053 Location: NYC,USA
|
|
|
|
Quote: |
Why does the code care which "region" is true? If it is running at all, the "region" is valid. I suspect that the WHEN OTHER would never be processed. |
Qa has many SYSID like, DSNX(not for us at all but for the other team and they should not call this TRX),DSNA is only one where out group of people are working and all of out apps are installed. so OTHER condition still holds true if it is not DSNA(QA)/DSNP(PROD).
Hope I am explaing the reasons in the right way.. |
|
Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
Sometimes, some programs need to know where they are running.
Here is something I proposed to my boss:
- Use a INITPARM. For example:
in all CICS test regions: INITPARM=(GETRGNTP='TEST')
in all CICS prod regions: INITPARM=(GETRGNTP='PROD')
- Write a small routine that reads the INITPARM and returns the value.
(see INITPARM and INITPARMLEN options in the ASSIGN command)
in this case, the routine name is GETRGNTP and, when called, will return TEST, PROD or whatever value.
My proposition was refused and now, instead of that, these programs have to do an ASSIGN APPLID and check for patterns.
I still think my idea was better... |
|
Back to top |
|
|
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010 Posts: 3053 Location: NYC,USA
|
|
|
|
Yeah...I do like your idea.. but admin people do not like to play around the region parameters...so better get it done in the application programming ( thats is what we hear from them)... |
|
Back to top |
|
|
Bala_real
New User
Joined: 08 Jun 2013 Posts: 1 Location: india
|
|
|
|
As you aware that the program you mentioned will be invoked via some transaction.
you can go and check the transaction in which region it is defined.
if transaction in 1st region then cics will execute program defined in CICSQA1.
if transaction in 2nd region then cics will execute program defined in CICSQA2.
same as for others.
if your transaction is defined in 1st region only
then CICSQA2 and CICSQA3 programs will not get execute unless these two entries remotely defined to 1st region. vice versa for others.
i hope it is clear.
|
|
Back to top |
|
|
|