checking HP Variables

[Scott Gates]

I have some QUIZ code that checks to see if it's running on an HP or not.

@IF HPMPE OR HPMPEXL
  USE MARS152U NOLIST
@ELSE
  USE ALT$DATA:MARS152U.DAT NOLIST
@ENDIF

I was wondering.  I need to check HPSTREAMEDBY[1:5] = "TRANS"
If it is TRUE, direct a 2nd copy of the quiz report with a different heading
to another printer. 

Would code similar to the above do it? 
Say something like:
@IF HPSTREAMEDBY = "TRANS"
DEFINE HEADERSTR CHAR* 30 = <blah.blah>
:FILE QUIZLIST;DEV=<blah>
@ENDIF 
   
Is this DOABLE within QUIZ? 

The job is generated on the fly by the application and I can't change the
JCL. I can only change the code it calls to generate the QUIZ report.  
There are several other changes also needed but, I'm trying to investigate
this before I can even make judgment on whether or not it's even worth
trying.  



Scott Gates
Programmer/Analyst 
Information Services 
Our Lady of Bellefonte Hospital 
P.O. Box 789 
Ashland, Kentucky 41105-0789  
-----------------------------------
Phone: (606)833-3773 
  Fax: (606)833-3342
-----------------------------------
Intranet: http://Olbh01iis/intranet/index.html
Primary e-mail  : [mailto:sgates@olbh.com]
Alternate e-mail : [mailto:msgates@pobox.com]
-----------------------------------
Our Lady of Bellefonte : http://www.olbh.com
-----------------------------------
Confidentiality Notice: This e-mail message, including any attachments, is
for the sole use of the intended recipient(s) and may contain confidential
and privileged information.  Any unauthorized review, use, disclosure or
distribution is prohibited.  If you are not the intended recipient, please
contact the sender by reply e-mail, fax or phone and destroy all copies of
the original message.