|
Compile the command below using the program QEZSNDMSG as the CPP. It will send a break message to all the workstations that the selected user is logged onto. CMD /* Send break message to user */ PARM KWD(MSGTYP) TYPE(*CHAR) LEN(10) RSTD(*YES) + DFT(*INFO) VALUES(*INFO *INQ) + PROMPT('Message type' 3) PARM KWD(DLVRY) TYPE(*CHAR) LEN(10) CONSTANT(*BREAK) PARM KWD(MSGTXT) TYPE(*CHAR) LEN(120) MIN(1) + PROMPT('Message text' 1) PARM KWD(MSGTXTLEN) TYPE(*CHAR) LEN(4) + CONSTANT(X'00000078') PARM KWD(USRPRF) TYPE(*NAME) LEN(10) + SPCVAL((*ALL) (*ALLACT)) MIN(1) + PROMPT('Profile name, *ALL, *ALLACT' 2) PARM KWD(NBRELM) TYPE(*CHAR) LEN(4) + CONSTANT(X'00000001') PARM KWD(MSGSENT) TYPE(*CHAR) LEN(4) CONSTANT(' ') PARM KWD(FNRQS) TYPE(*CHAR) LEN(4) CONSTANT(' ') PARM KWD(ERRCDE) TYPE(*CHAR) LEN(26) + CONSTANT(X'0000001A0000001A') PARM KWD(SHOWDSP) TYPE(*CHAR) LEN(1) CONSTANT(N) PARM KWD(QUALMSGQ) TYPE(*CHAR) LEN(20) CONSTANT(' ') PARM KWD(NAMTYP) TYPE(*CHAR) LEN(4) CONSTANT(*USR) ----- Original Message ----- From: Kirk Yates <kirk.yates@usa.net> To: <MIDRANGE-L@midrange.com> Cc: <mwindbec@exelna.com> Sent: Thursday, July 29, 1999 10:26 AM Subject: Re: Break Messages > mwindbec@exelna.com wrote: > > > How can I get a listing of all devices a single user profile is > > signed on to so I can send break messages to all the active devices? > > I use a SNDBRKACT command that is part of TAA Productivity Tools. > http://www.taatool.com/ > -- > Kirk Yates > Director of Data Processing > Rockwood School District > > > +--- > | This is the Midrange System Mailing List! > | To submit a new message, send your mail to MIDRANGE-L@midrange.com. > | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. > | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. > | Questions should be directed to the list owner/operator: david@midrange.com > +--- +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.