Re: Send pgm message to user

[Jonathan Mason <masonjo1@xxxxxxxxxxxxxxxx>]

Hi Ron

Is the program being run interactively by the user?  If so then the interactive 
job name will be the same as the workstation device that the program is running 
on.

Alternatively you could place a call to the QUSLJOB API and retrieve a list of 
all *ACTIVE interactive jobs on the system for a specific user.

All the best

Jonathan

-----Original message-----
From: RPower@xxxxxxxxxx
Date: Mon, 17 Jan 2005 15:11:49 +0000
To: RPG programming on the AS400 / iSeries rpg400-l@xxxxxxxxxxxx
Subject: Send pgm message to user

> Ok,
> I've spent a great deal of time this morning searching for this info, but 
> to no avail.  I have a program that I'd like to send a break message back 
> to the user.  I've found the api QMHSNDBM which appears to do what I want 
> it to, but I can't figure out how to determine the workstation that the 
> user is currently using.  Help.
> 
> I freaking hate Mondays where you wake up and find that you have to shovel 
> snow, end up at work and wet.
> 
> 
> Ron Power
> Programmer
> Information Services
> City Of St. John's, NL
> P.O. Box 908
> St. John's, NL
> A1C 5M2
> Tel: 709-576-8132
> Email: rpower@xxxxxxxxxx
> Website: http://www.stjohns.ca/
> ___________________________________________________________________________
> Success is going from failure to failure without a loss of enthusiasm. - 
> Sir Winston Churchill
> -- 
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 


Jonathan Mason
www.astradyne-uk.com