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
 

 

Problem with ISPSTRT - S0C1 and S0C4

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
stiffler

New User


Joined: 17 Dec 2008
Posts: 5
Location: India

PostPosted: Wed Dec 24, 2008 1:34 am    Post subject: Problem with ISPSTRT - S0C1 and S0C4
Reply with quote

Hi

I have a rexx routine which invokes ISPSTRT by using SELECT service for starting new screens based on PARM options("SELECT PGM(ISPSTRT) PARM(3.4)"). I am trying to invoke this routine with our existing LOGON procedure itself. Hence I will get all the defined screens while login into Mainframe. But I got S0C4 abend. I verified that the REXX routine is in ISPEXEC environment(means Primary option menu,ZSCREEN = 1) at the time of execution. Same routine works fine when executing alone in TSO/ISPF. Do I need to allocate any datasets for this? Please help me to resolve this.
Back to top
View user's profile Send private message

Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2025
Location: Silicon Valley

PostPosted: Wed Dec 24, 2008 1:43 am    Post subject: Reply to: Problem with ISPSTRT - S0C1 and S0C4
Reply with quote

It is not clear how you execute your rexx program. Show us your code.
Back to top
View user's profile Send private message
stiffler

New User


Joined: 17 Dec 2008
Posts: 5
Location: India

PostPosted: Wed Dec 24, 2008 2:00 am    Post subject: Reply to: Problem with ISPSTRT - S0C1 and S0C4
Reply with quote

We have a dataset lets say XXXX.REXX where we define all our rexx programs to invoke when login into Mainframe.

Lets say our Rexx program ABCD. I will place the following code "SELECT CMD(%ABCD)" in XXXX.REXX dataset, so our logon procedure will take this dataset and execute mentioned rexx programs.

In my case my rexx routine has "SELECT PGM(ISPSTRT)" statement. I have tried another routine with DSLIST program in above way, it works fine.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2025
Location: Silicon Valley

PostPosted: Wed Dec 24, 2008 4:32 am    Post subject: Reply to: Problem with ISPSTRT - S0C1 and S0C4
Reply with quote

Quote:
Same routine works fine when executing alone in TSO/ISPF

and
Quote:
I have tried another routine with DSLIST program in above way, it works fine.

In your first post, did you really mean that you tried "a totally different routine works fine when executing alone in TSO/ISPF"?

Read the description of the ISPSTRT program in the ISPF Dialog Developers Guide and Reference. The PARM() can be certain things, but probably not '3.4'.
Back to top
View user's profile Send private message
stiffler

New User


Joined: 17 Dec 2008
Posts: 5
Location: India

PostPosted: Wed Dec 24, 2008 7:56 am    Post subject:
Reply with quote

What I really meant is SELECT service with DSLIST program ISRDSLST works fine. In my second post I just have given extra information.

I am sure that we can have 3.4 in parm option. Generally parm option can have available screen options in your ISPF like SDSF for SPOOL

One more additional info "SELECT PGM(ISPSTSRT)" is equavlent to START commmand in ISPF.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2025
Location: Silicon Valley

PostPosted: Wed Dec 24, 2008 10:48 am    Post subject: Reply to: Problem with ISPSTRT - S0C1 and S0C4
Reply with quote

Quote:
I am sure that we can have 3.4 in parm option. Generally parm option can have available screen options in your ISPF like SDSF for SPOOL


Sorry, but 3.4, syntactically (sp?), does not look anything like SDSF or SPOOL.

Report back after you have actually read the manual.
Back to top
View user's profile Send private message
MBabu

Active User


Joined: 03 Aug 2008
Posts: 401
Location: Mumbai

PostPosted: Wed Dec 24, 2008 11:18 am    Post subject: Reply to: Problem with ISPSTRT - S0C1 and S0C4
Reply with quote

I tried this by changing ISR@PRIM to invoke a command on the 1st display only that does ISPSTRT for SDSF, 3.4 and DDLIST and other command table entries and panel options and it works fine, but it is rather confusing to use, especially if you have the "Always show split line" unchecked in the SETTINGS screen. I'd suggest making this an optional command such as a command table entry rather than having all your users get multiple screens by default. I also had to disable the logo display to make it work on entry to ISPF.
Back to top
View user's profile Send private message
MBabu

Active User


Joined: 03 Aug 2008
Posts: 401
Location: Mumbai

PostPosted: Wed Dec 24, 2008 11:27 am    Post subject:
Reply with quote

Also, you can't just check zscreen=1 because you will relaunch all the screens with the sequence END;SPLIT on screen number 1. You need to insure that it is the first display of the entire session. Something like this:
Code:
)INIT
...
VGET (xxFRSTxx) SHARED                                 
IF (&XXFRSTXX EQ &Z AND &ZSPLIT = 'NO' AND &ZCMD = &Z)
  &xxFRSTxx = 1                                       
  VPUT (xxFRSTxx) SHARED                               
  .RESP = ENTER                                       
IF (&ZSPLIT = 'YES')                                   
  &xxFRSTxx = 2                                       
  VPUT (xxFRSTxx) SHARED

Code:
)PROC                   
if (&xxFRSTxx EQ 1)     
  &ZCMD=xxINITxx         
  &xxFRSTxx = 2         
  VPUT (xxFRSTxx) SHARED
...
&ZSEL = TRANS (TRUNC (&ZCMD,'.') 
...
   xxINITxx,'CMD(%your command that starts the screens)'
...
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2025
Location: Silicon Valley

PostPosted: Wed Dec 24, 2008 9:56 pm    Post subject: Reply to: Problem with ISPSTRT - S0C1 and S0C4
Reply with quote

Quote:
nvoke a command on the 1st display only that does ISPSTRT for SDSF, 3.4 and DDLIST and other command table entries and panel options and it works fine


Can you show us the command syntax for ISPSTRT that will use '3.4' as a parameter? I do not believe it is possible.
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts SYMNAMES problem jacobdng DFSORT/ICETOOL 7 Thu Dec 22, 2016 7:47 am
No new posts Problem in writing Output file vickey_dw COBOL Programming 5 Mon Nov 14, 2016 11:14 pm
No new posts Problem in Running Query via JCL vickey_dw DB2 3 Tue Oct 18, 2016 11:11 pm
No new posts DB2 Streaming Batch Processing Problem Manshadi DB2 4 Sat Sep 24, 2016 12:14 pm
No new posts Problem with GETMAIN command amitc23 CICS 6 Thu Sep 01, 2016 1:01 pm


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