Re: Finding Current Subsystem

I made this way too hard!

Sure, the idea way is to use GET_JOB_INFO but if you want it from the
joblog use the column message_tokens.

select
message_tokens,
message_text
from table(qsys2.joblog_info('*')) A
where message_id='CPF1124'

Returns
....+....1....+....2....+....3....+....4....+....5....+....6....+....7...
ROBS1 ROB 25904708:06:1503/19/1508:06:1503/19/15QINTER QSYS

select
substr(message_tokens , 59 , 10) as subsystem,
message_tokens,
message_text
from table(qsys2.joblog_info('*')) A
where message_id='CPF1124'
....+....1
SUBSYSTEM
QINTER

I was "this close" to typing up a DCR for something that already exists!

Message_tokens is equal to the message data.

The point of this example is it really eases incorporating APIs.

Rob Berendt