HP3000-L Archives

January 2001, Week 5

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:
Robert Mills <[log in to unmask]>
Reply To:
Robert Mills <[log in to unmask]>
Date:
Tue, 30 Jan 2001 10:05:27 -0000
Content-Type:
text/plain
Parts/Attachments:
text/plain (84 lines)
Michael,

Have a look at Jeff Vance's :STREAM UDC on Jazz.

We have been using it for the past few months and it only has two minor
problems:

1) MPEX doesn't like one of the WHILE statements (it is unable to set and
test the same variable in the expression). Therefore, don't %STREAM jobs OR
modify the offending statement.

2) If any of your programs use the COMMAND instead of the HPCICOMMAND
intrinsic to :STREAM job's then it will not get picked up by the UDC. The
following routine (thanks again Keven) will fix this problem.

#pragma list off
/*----------------------------------------------------------------*/
/* CMDXL    Keven Miller   11 Jan 2001    [log in to unmask]     */
/* COMMAND intrinsic trap routine, routing to HPCICOMMAND         */
/*----------------------------------------------------------------*/

#pragma intrinsic CCODE          mpe_ccode
#pragma intrinsic HPCICOMMAND    mpe_hpcicommand
#pragma intrinsic HPSETCCODE     mpe_hpsetccode

typedef  short    i16;

void COMMAND ( char* cmd, i16* ierr, i16* parm ){
   int   cc;

   mpe_hpcicommand ( cmd, ierr, parm, 2 );
   cc = mpe_ccode ();
   mpe_hpsetccode ( cc );
}
/*----------------------------------------------------------------*/

regards,
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
|Robert W.Mills (Systems Development Manager) |
|Windsong Services, St. Mary Cray, ENGLAND    |
|Tel  : +44 (0)1689 870622 x3005              |
|Fax  : +44 (0)1689 899026                    |
|Email: [log in to unmask]  |
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
-----Original Message-----
From: Michael Anderson [mailto:[log in to unmask]]
Sent: Monday, January 29, 2001 7:51 PM
To: [log in to unmask]
Subject: Implement JOBQ's


This has probably been discussed on this list before, but looking back two
or three months I haven't found much info. I would like thoughts from others
on the list about JOBQ's and how to implement them in an environment of
programmatically streamed jobs. When job stream files are created and
streamed programmatically I have no way to define different JOBQ's for each
user or account. I do not have access to the source code.

My thoughts are to create a system level UDC that will override the real
stream command. Then I would be able to add the necessary logic to the
stream UDC to launch jobs into various JOBQ's.

Back in the days of the classic HP3000 I wrote my own 'STREAM' program. This
allowed me to (Without buying any third party software) read the stream
file, and insert passwords and variables into the stream file before
streaming it. I realized that I no longer had a need for this 'STREAM'
program after M.P.E. variables came into existence, and PASSEXEMPT was added
to the JOBSECURITY command.  Now with the introduction of JOBQ's I am
felling the need to resurrect my old stream program. By analyzing the stream
file I could programmatically decide what JOBQ it belongs in, and stream it
into that Que. Has anyone been here and done this?

Thanks in advance,


--
Michael Anderson
Spring Independent School District
16717 Ella Boulevard
Houston, Texas 77090-4299
office: 281.586.1105
fax: 281.586.1187
-

ATOM RSS1 RSS2