We us the logon udc below to capture logon and off (if done properly), and can examine later....
CONTINUE
BUILD ULOGFILE;REC=-128,,F,ASCII;DISC=100000,32,1
CONTINUE
IF "!HPDUPLICATIVE"="TRUE" THEN
SETVAR HPTYPEAHEAD FALSE
continue
setvar log "!hpdatetime#!hpuser.!HPACCOUNT,!HPGROUP#!hpconnmins#"
setvar log "!log!HPSTDIN_NETWORK_NODE#!HPSTDIN_NETWORK_ADDR#!HPLDEVIN#"
SETVAR LOG "!LOG!HPDATEF#Login"
FILE ULOGFILE,OLD
ECHO !LOG >>*ULOGFILE
run control.pub
IF NOT BOUND(HPSTDIN_NETWORK_NODE)
SETVAR HPSTDIN_NETWORK_NODE "SERIAL"
SETVAR HPSTDIN_NETWORK_ADDR "SERIAL"
ENDIF
setvar log "!hpdatetime#!hpuser.!HPACCOUNT,!HPGROUP#!hpconnmins#"
setvar log "!log!HPSTDIN_NETWORK_NODE#!HPSTDIN_NETWORK_ADDR#!HPLDEVIN#"
(24/31) Continue?
SETVAR LOG "!LOG!HPDATEF#Logout"
FILE ULOGFILE,OLD
ECHO !LOG >>*ULOGFILE
IF JCW1 <> 99 THEN
BYE
Output looks like....note lines are folded.We can tell if login is local in house, remote office, vpn etc from IP, and see name of PC used. This is a logon nobreak udc which runs a menu program, and logs off on program end.
20090428163056400#TEST.STOCK2K,TEST#1#JPITMAN.COM.AU#192.168.2.248#417#TUE, APR 28, 2009#Login
20090428163056800#TEST.STOCK2K,TEST#1#JPITMAN.COM.AU#192.168.2.248#417#TUE, APR 28, 2009#Logout
20090428163132000#TEST.STOCK2K,TEST#1#WLAUVIPRD01.COM.AU#192.168.2.75#16#TUE, APR 28, 2009#Login
20090428163132300#TEST.STOCK2K,TEST#1#WLAUVIPRD01.COM.AU#192.168.2.75#16#TUE, APR 28, 2009#Logout
20090428163256500#TEST.STOCK2K,TEST#1#PRYRIE.COM.AU#192.168.2.71#18#TUE, APR 28, 2009#Login
Regards,
John Pitman
-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf Of Reggie Monroe
Sent: Thursday, 10 September 2009 9:32 AM
To: [log in to unmask]
Subject: [HP3000-L] Login Report
Is there a way to create customized reports displaying who logged into an Hp3000 system.
[cid:image005.jpg@01CA316B.045A5110]
Reginald C. Monroe Jr | Sr. Systems Administrator | Mercury Insurance
555 W. Imperial Hwy. Brea, CA 92821
(714) 671-6753 Direct (714) 671-6541 Fax
www.mercuryinsurance.com<http://www.mercuryinsurance.com>
This email and/or any files or attachments transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed, and may contain information that is privileged, confidential and exempt from disclosure under applicable law. If you are not the intended recipient, or the employee or agent responsible for delivering the message to the intended recipient, you are hereby notified that any dissemination, distribution or copying of this e-mail and/or any files or attachments transmitted with it is strictly forbidden. If you have received this email in error, please delete the e-mail and/or any files or attachments, and also notify the system manager ([log in to unmask]) of the error. Please note that any views or opinions presented in this email are solely those of the author and do not necessarily represent those of the company. Finally, the recipient should check this email and any attachments for the presence of viruses. The company accepts no liability for any damage caused by any virus transmitted by this email and/or any files or attachments transmitted with it.
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
CAUTION: This message may contain privileged and confidential information intended only for the use of the addressee named above. If you are not the intended recipient of this message you are hereby notified that any use, dissemination, distribution or reproduction of this message is prohibited. If you have received this message in error please notify RYCO Hydraulics Pty. Ltd. immediately. Any views expressed in this message are those of the individual sender and may not necessarily reflect the views of RYCO Hydraulics Pty. Ltd.
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
