Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

My IMS screen hangs

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
psubra001

New User


Joined: 01 Feb 2006
Posts: 15

PostPosted: Tue Mar 04, 2008 10:01 am    Post subject: My IMS screen hangs
Reply with quote

I switched from one transaction to another transaction using native IMS calls (ie. using CHNG and ISRT calls). The second transaction is supposed to throw a screen. But, the first transaction just hangs..

It works well when i expedite this and i get the second screen (no infinite loops); but when i try this our in IMS region, it hangs..

Any idea??
Back to top
View user's profile Send private message

rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 188
Location: india

PostPosted: Tue Mar 04, 2008 1:34 pm    Post subject:
Reply with quote

Hi,

Is your first transaction getting stopped when you try to switch over to other transaction. Just check it. If so then there is a problem in your code which is invoking your first transaction.....

Or else check with your IMS group if IMS region is down...
Back to top
View user's profile Send private message
psubra001

New User


Joined: 01 Feb 2006
Posts: 15

PostPosted: Tue Mar 04, 2008 1:36 pm    Post subject:
Reply with quote

The first transaction is active (it is not in STOP mode).
Also the IMS region is up and running..
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Tue Mar 04, 2008 9:22 pm    Post subject:
Reply with quote

Different transaction - different MPP program - right? Can we see your message switch?
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Tue Mar 04, 2008 9:24 pm    Post subject:
Reply with quote

And.....always remember that a DC program is "shared" in an IMS region. If you are testing in BTS or expediter, your working storage is your working storage.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Wed Mar 05, 2008 12:27 am    Post subject:
Reply with quote

After the CHNG and ISRT call exit your primary transaction MPP and make sure the subsequent MPP reads the message queue. Probably your primary transaction program is still in control.
Back to top
View user's profile Send private message
psubra001

New User


Joined: 01 Feb 2006
Posts: 15

PostPosted: Wed Mar 05, 2008 9:19 am    Post subject:
Reply with quote

Yes Sandy.. switching is to a different transaction - different MPP.

01 WS-WORK-AREA.
05 WS-MESSAGE-AREA PIC X(2000) VALUE SPACES.
05 WS-INPUT-MSG REDEFINES
WS-MESSAGE-AREA.
10 WS-LL1 PIC S9(04) COMP.
10 WS-ZZ1 PIC S9(04) COMP.
10 WS-TRANCODE PIC X(08).
10 WS-MESSAGE PIC X(1988).

CALL 'CBLTDLI' USING WS-CHNG
GNSALTIO-PCB
WS-OUTPUT-SWITCH-TRAN

if success
MOVE 2000 TO WS-LL1
MOVE WS-OUTPUT-SWITCH-TRAN TO WS-TRANCODE

CALL 'CBLTDLI' USING WS-ISRT
GNSALTIO-PCB
WS-MESSAGE-AREA
WS-MEMBINQ

if success,
CALL 'CBLTDLI' USING WS-PURG
GNSALTIO-PCB

and George,
I have done CHNG, ISRT and PURG calls and then a GOBACK from the current program... subsequent MPP is coded to read the message and throw a screen. In fact, I don't intent to pass any information from current transaction to subsequent transaction. I just want the 2nd transaction to be invoked so that it builds a menu screen by itself and throw it.. (which doesn't happen in the region icon_sad.gif )
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Wed Mar 05, 2008 4:01 pm    Post subject:
Reply with quote

If you use a SPA and change the transactioncode before inserting it what happens next? The other MPP should be invoked.

Did you check if the second transaction is active using /DIS TRAN xxx and /DIS PROG xxx?
Back to top
View user's profile Send private message
psubra001

New User


Joined: 01 Feb 2006
Posts: 15

PostPosted: Wed Mar 05, 2008 4:07 pm    Post subject:
Reply with quote

Yes Goerge, the TRAN, PGM and PSB, all are active..
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Wed Mar 05, 2008 4:44 pm    Post subject:
Reply with quote

Is your message right regarding the option parameter in MFS? And was the second MPP invoked at all? Did you check with a display? Is your PSB right regarding the use of an ALTPCB? Did you make a purge call?
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Wed Mar 05, 2008 5:21 pm    Post subject:
Reply with quote

In your 2nd program, did you put in code to determine where your transaction is coming from?
Back to top
View user's profile Send private message
psubra001

New User


Joined: 01 Feb 2006
Posts: 15

PostPosted: Wed Mar 05, 2008 5:35 pm    Post subject:
Reply with quote

Bitneuker wrote:
Is your message right regarding the option parameter in MFS? And was the second MPP invoked at all? Did you check with a display? Is your PSB right regarding the use of an ALTPCB? Did you make a purge call?


I checked with displays.. I get the "goback" on my first MPP but I don't get any displays from my second MPP (which means my second MPP never gets invoked). The PSB is correct. and I have made a PURG call also.
Back to top
View user's profile Send private message
psubra001

New User


Joined: 01 Feb 2006
Posts: 15

PostPosted: Wed Mar 05, 2008 5:43 pm    Post subject:
Reply with quote

Sandy Zimmer wrote:
In your 2nd program, did you put in code to determine where your transaction is coming from?


It doesn't make a difference Sandy..
MPP is coded to throw a screen irrespective of where the call comes from.
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Wed Mar 05, 2008 6:23 pm    Post subject:
Reply with quote

Can you somehow display these fields right before your GOBACK

WS-OUTPUT-SWITCH-TRAN
WS-TRANCODE
WS-MEMBINQ
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu Mar 06, 2008 1:13 am    Post subject:
Reply with quote

Is the second MPP consistent with MFS regarding;

    is the MID/MOD in the online MFS library
    are the DIF/DOF's consistent with your terminal type
    is the message structure consistent with the message option?


and is the alternate iopcb in your PCB defined as TYPE=TP,MODIFY=YES

is the second MPP ACBGEnned and known in the regions after SYSGEN?

and what are the status codes after your change, insert and purge calls?
Back to top
View user's profile Send private message
psubra001

New User


Joined: 01 Feb 2006
Posts: 15

PostPosted: Thu Mar 06, 2008 8:41 am    Post subject:
Reply with quote

Bitneuker wrote:
Is the second MPP consistent with MFS regarding;

    is the MID/MOD in the online MFS library
    are the DIF/DOF's consistent with your terminal type
    is the message structure consistent with the message option?


and is the alternate iopcb in your PCB defined as TYPE=TP,MODIFY=YES

is the second MPP ACBGEnned and known in the regions after SYSGEN?

and what are the status codes after your change, insert and purge calls?

All MID/MOD DIF/DOF are correct.. PCB is defined correctly. All those are correct. All the status codes are spces. I've pointed all libraries in XPED to the region and it works good. Only the region hangs..
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu Mar 06, 2008 7:52 pm    Post subject:
Reply with quote

Does the screen show when you perform a /FORMAT screenname?
Back to top
View user's profile Send private message
psubra001

New User


Joined: 01 Feb 2006
Posts: 15

PostPosted: Fri Mar 07, 2008 9:09 am    Post subject:
Reply with quote

Bitneuker wrote:
Does the screen show when you perform a /FORMAT screenname?

Yes
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IMS DC screen Access sivasaras IMS DB/DC 3 Fri Nov 18, 2016 6:38 pm
No new posts Increase the screen size after split mistah kurtz TSO/ISPF 2 Fri Sep 02, 2016 6:39 pm
No new posts Automation of data entry using Rexx i... zingy.rajeev CLIST & REXX 4 Mon Aug 22, 2016 4:13 pm
This topic is locked: you cannot edit posts or make replies. Automation of data entry using Rexx i... zingy.rajeev CICS 0 Mon Aug 22, 2016 4:11 pm
No new posts REXX Screen not working due to LINKED... sundarkudos CLIST & REXX 1 Mon May 09, 2016 1:44 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us