Hi Bob, What about simply another internal variable, similar to say, TITLE. One could then code
For Page: EVAL PAGENUM CLIST|REXX(STO(variable_name)) For Line: EVAL LINENUM CLIST|REXX(STO(variable_name)) I mean, if one could dream and hope, I would think this might be the easiest to implement. I'm guessing here, but there's probably a table of keywords that are looked for, like TITLE, etc, that trigger an internal routine call rather than a read of the dump directory to satisfy the return of the value, maybe? Just a thought. In any case, I can and have coded my own page logic before but in this case, I didn't want to start the display generation on a new page, I just wanted to generate it right in line with headers when appropriate. Thanks for listening Bob, and the rest of the list as well. Chuck -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Robert Wright Sent: Friday, July 20, 2007 8:44 AM To: [email protected] Subject: Re: IPCS Question(s) Charles Hardee wrote on 2007-07-20 08:22:06: > Thanks for the info Bob. > > Unfortunately, this is a report currently being produced via code from a > CLIST. I'm not sure I want to add much code to it, however, as the > CLISTs are in the process of being converted to REX EXECs. > In any case, your info seems to be something that would be available to > a report interface written in Assembler, which I am not doing. > If, however, your group ever decides to make the fields available to > CLIST or REXX, I would be very interested in hearing about it. Sorry I misread your original post as referring to HLASM code. It was clear about your use of a command procedure. I guess I heard the question I wanted to hear. It finally registered when Kenneth Tomiak restated the context. I can't hold out a lot of hope that we'll get this sort of thing into the product. My nose would grow as I reassured someone that it would sell an additional zSeries or z/OS system on one. Designing and coding an EVALPAGE subcommand would be a lot easier than justifying it. Bob Wright - MVS Service Aids ---------------------------------------------------------------------- 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 ---------------------------------------------------------------------- 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
