Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

ISPF Edit and then Browse within Rexx Exec 1

Status
Not open for further replies.

IDC3044

Technical User
Apr 17, 2003
12
US
I have developed a Rexx exec that first edits and member of a PDS, then calls a program and finally browses a Sequential Dataset containing the desired output.

. . .
"ISPEXEC EDIT DATASET('USERID.SQL.IN("||SQLNAM||")')"
. . .
"CALL 'IDMSR.TEST.LOAD(IDMSBCF)'"
"ISPEXEC BROWSE DATASET('USERID.SYSLST')"
. . .

The problem I am encountering is while browsing the SYSLST dataset I do not see the 'COMMAND ===>' line that usually appears on Line 2. After scrolling down a few pages I receive the following error:

** ISPF screen input error - code = 28 **

The Command ===> line then returns and processes normally until I execute the exec again and the problem recurs as before.

I know this is an ISPF issue, but I hope someone may have encountered this within a Rexx exec.
 
My guees is that it's a SAVE/RESTORE problem:

Code:
address ISPEXEC 
"CONTROL DISPLAY SAVE"
address TSO "CALL 'IDMSR......'"
"BROWSE ...."
"CONTROL DISPLAY RESTORE"

Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster
 
Is CONTROL a clist or Rexx exec you have that is written in-house? When I tried rexxhead's suggestion I get the message - Command CONTROL not found RC(-3)
 
RC(-3) typically means "wrong address mode". CONTROL is an ISPEXEC function. What address() are you in when the -3 happens?

Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top