|
as mentioned if you have audit journalling on for security
I use this bit of SQL. Adjust the time as necessary
SELECT Entry_Timestamp, current server as System_name
,Job_Number CONCAT '/' CONCAT RTRIM(Job_User) CONCAT '/' CONCAT
RTRIM(Job_Name) AS Job_Name
,RTRIM(Program_Library) CONCAT '/' CONCAT RTRIM(Program_Name) AS
Program_Name
,RTRIM(CAST(SUBSTR(Entry_Data, 2, 10) AS VARCHAR(10))) AS User_Id
,Remote_Address
,Remote_Port
, CAST(SUBSTR(Entry_Data, 12, 10) AS CHAR(10)) as "device"
,CASE RTRIM(CAST(SUBSTR(Entry_Data, 1, 1) AS CHAR(1)))
WHEN 'A' THEN 'APPC bind failure-(A)'
WHEN 'C' THEN 'User authentication with CHKPWD failed-(C)'
WHEN 'D' THEN 'Service tools user ID name not valid-(D)'
WHEN 'E' THEN 'Service tools user ID password not valid-(E)'
WHEN 'P' THEN 'Password not valid-(P)'
WHEN 'Q' THEN 'User profile is disabled-(Q)'
WHEN 'R' THEN 'User password was expired-(R)'
WHEN 'S' THEN 'SQL Decryption password is not valid-(S)'
WHEN 'U' THEN 'User name not valid-(U)'
WHEN 'X' THEN 'Service tools user ID is disabled-(X)'
WHEN 'Y' THEN 'Service tools user ID not valid-(Y)'
WHEN 'Z' THEN 'Service tools user ID password not valid-(Z)'
else '*UNKNOWN - ' concat
RTRIM(CAST(SUBSTR(Entry_Data, 1, 1) AS CHAR(1)))
END Violation_Type
FROM TABLE (
Qsys2.Display_Journal(
'QSYS','QAUDJRN',
Starting_Receiver_Name => '*CURAVLCHN',
Journal_Entry_Types => 'PW',
Starting_Timestamp => CURRENT TIMESTAMP - 1 days )) I;
*newer one
select current_server server,
AUDIT_USER_NAME,remote_address,eNTRY_TIMESTAMP, VIOLATION_TYPE_DETAIL,
DEVICE_NAME,job_name
from table (
SYSTOOLS.AUDIT_JOURNAL_PW(
STARTING_TIMESTAMP => current timestamp - 6 hours)
) pw
-- where Pw.Audit_User_Name = 'USER_ID'
order by entry_timestamp desc;
Bryan
Jerry Draper wrote on 8/26/2025 1:44 PM:
We have a user who changed password last Friday and now profile is
getting *DISABLED every night at 00:20:00.
The password doesn't expire until 11/25/25.
Enabling the profile allows for signon.
Seems like there is a ghost process that is trying to sign on with the
"old" password.
What could that be.
No WRKJOBSCDE jobs; no FTP; ???
Jerry
--
-- .
Bryan
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.