IBM Mainframe Forum

1. Your link points to a discussion of several exits. Which exit are you trying? The IEFUJI exit - if that is the exit you are trying - is not entered until the system is starting to run the job, which is much later in the process than "after submit every job," which implies immediately after the job is submitted before the system decides it is going to run the job.
2. I sort of recall looking for an exit at roughly where you seem to want to insert your exit and concluded that IEFUJI was too late. Mind you, this was at least 10 years ago, and probably much longer ago than that, so my memory is probably faulty.
3. At least one of the exits in the link is entered in key 0. I admit we all have to try new things, but No way a beginner who is not certain how the USING Assembler instruction works should be writing operating system exits entered in a privileged state.
4. You save and restore registers 14, 15, 0, 1 and 2, but you modify register 3 without saving and restoring it. This sort of echoes a warning Mr. Jensen made.
5. When you execute your CLC instruction, I think register 3 points to the job name. As the CLC instruction is written, it is starting to test at the second byte in the job name, which I do not think is what you intend.
6. You carefully store what appears to be a return code in register 15. Then your RETURN macro specifies RC=0, which replaces the return code you stored in register 15. What you want to do is specify RC=(15) to use the return code in register 15. RC=(R15) will not work.
7. Saying xxx does not work in these forums is totally useless. Where (in the exit) did it fail? Or did it fail somewhere else?

• IBM coding standards forbid the use of "magic numbers" like 1 for register 1. But R1 is not a "magic number," even though R1 EQU 1 equates R1 to a magic number. In other words, the standard is BS.
• R1 appears in the Assembler symbol table, where the magic number 1 does not. This can be sort of useful. Sometimes. However, High Level Assembler now has the register XREF table, which is much more useful than R1 in the symbol table. More accurate, too, as the symbol table misses some register usage that the register XREF table does not miss. For example, the TRT instruction may alter registers 1 and 2, which would not be recorded in the symbol table, but would be noted in the register XREF table.

willy jensen wrote:...
4. your use of r0 as index and length don't make any sense'
...