Thanks Bob. 

I have changed my exec to use BLSGSCMD.  I have good news and bad news. 

The good news is that for LIST displays, when no scrolling is involved
because I specify a short length, like 256, BLSGSCMD works perfectly for my
needs. 

The bad news is that for long displays, like LENGTH(4096), *AND* I do not
scroll to the bottom, the SIGNAL ON HALT trap is still hitting and it blows
my exec out.    If I purposely scroll to the bottom, all is well and the
signal is not occurring.

What I have working now is good enough for my needs at the moment. It would
be nice to know how to overcome this though.  I could, of course, create
another ISPF panel and format the raw storage myself, but that’s a pain.

Another question.  I feel I have sort of hacked my way through this.  IPCS
Customization states the PARM to BLSGSCMD is a command.  Therefore, I am
dynamically writing a short rexx exec within my exec, writing to a member of
a PDS and then calling it from BLSGSCMD, like this: 

.
.
.
modaddr = some_variable_determined_above ; 
pgm.1 = "/* rexx */" ; 
pgm.2 = "Address IPCS ""LIST" modaddr". LENGTH(256)""" ; 
pgm.0 = 2 ; 
Address TSO "ALLOC F(TEMP) DA(CLIST.CLIST(TEMP)) SHR REUSE" ; 
Address MVS "EXECIO * DISKW TEMP (FINIS STEM pgm." ; 
Address ISPEXEC "SELECT PGM(BLSGSCMD) PARM('%TEMP') NEWAPPL(BLSG) PASSLIB" ;

.
.
.

(the above typed from memory - not copy/pasted from my working exec) 

So it's clunky.  Plus, if running the first time, if member TEMP does not
exist in CLIST.CLIST, it blows up, so for production use, I would have to
add logic to determine if it already exists, if not, blah blah blah.  

I tried to do this, but it didn't work: 

text = "IPCS LIST" modaddr". LENGTH(256)" ;
Address ISPEXEC "SELECT PGM(BLSGSCMD) PARM('"text"') NEWAPPL(BLSG) PASSLIB" 

or some flavor thereof, and that did not work.  Thus the clunk.  

Any suggestions for a better approach?  

Todd


> -----Original Message-----
> >
> >
> If you want each LIST subcommand treated as a distinct ISPF transaction,
> use dialog program BLSGSCMD.  The API is documented in /z/OS MVS IPCS
> Customization./  Short output from LIST will be handled on the way back
> from the subcommand to your exec, allowing it to be reviewed until no
> longer wanted.  Long output can be partially viewed if that gives the
> user enough information without bothering to generate the entire report
> requested from LIST.  My recollection is that your "signal on halt" exit
> should not be entered.
> 
> --
> Bob Wright  

No virus found in this outgoing message.
Checked by AVG. 
Version: 7.5.524 / Virus Database: 270.6.7/1628 - Release Date: 8/22/2008
6:32 PM
 

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to