HP3000-L Archives

September 2003, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Paul H. Christidis" <[log in to unmask]>
Reply To:
Date:
Fri, 19 Sep 2003 10:11:12 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (48 lines)
Jon,

Below is a command file that I've linked to the 'chgroup' MPE command for
the programmers in our site.

Regards
Paul Christidis

====================
CHGROUP
ANYPARM ALLPARMS=![""]
chgroup  !allparms
continue
wrqtitle.util.sys
if hpjobtype = "S" then
 if POS(hpuser, "MGR#MANAGER") <> 0 OR &
    PMATCH("PROG#@", hpuser)       then
  setvar _ew chr(27)+"&oFSET WINDOW-TITLE "+CHR(34)
  setvar _WrqTitle "!!_ew<!!sys_name> !!hpgroup.!!hpaccount &c"+chr(34)
  echo !_WrqTitle
  deletevar _ew, _WrqTitle
 endif
endif
==========================

HP-3000 Systems Discussion <[log in to unmask]> wrote on 09/19/2003
10:00:37 AM:

>         I am using Reflection (Version 9.0) and would like to create a
> command file on the 3000 that would change the "Title" of my Reflection
> window.  I'm pretty sure I can do this and I'm part way into the
> research, but if somebody has already done it the economy of effort
> would be appreciated.
>
> Thanx,
>     Jonathan (Jon) M. Backus, MPE-CSM ~ President
>     Tech Group ~ 15 Catawba Place ~ Hagerstown, MD ~ 21742-6515
>     Vmail: 301.988.0614 ~ Fmail: 301.714.1854
>     Email: [log in to unmask] ~ Web: www.TechGroupMD.com
>     AIM: JMBackus ~ MSN: [log in to unmask]
>     Yahoo: techgroupjon ~ ICQ: 250635614
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2