I’m afraid that the only way to do it is to change message CPX2313 to use WRKJOB.
Can I ask why you don’t want to go down that route? Accepted it’s a global change, but as long as the users in your shop are set with limited capabilities you shouldn’t find that there’s any security risk.
If that’s still a worry, an alternative to changing it to WRKJOB would be to create your own command (e.g. MYWKJB) and in the CPP for it do something like:
DCL &USER *CHAR 10
IF COND(&USER *EQ ‘myprofile’) THEN(DO)
Where you can test for specific user ID’s to have the WRKJOB capability whilst the other users still get DSPJOB. Of course this still means that you have to change CXP2313, but limits the effects to particular users.
Hope it helps