IBM Support

Example of Adding an Exit Program to the Exit Point QIBM_QCA_CHG_COMMAND.

Troubleshooting


Problem

This document explains how to add an exit program to an exit point.

Resolving The Problem

To add an exit program to a exit point the ADDEXITPGM command should be used.

Here is what the screen for the command ADDEXITPGM could look like:
Type choices, press the Enter key.


 Exit point . . . . . . . . . . . > QIBM_QCA_CHG_COMMAND                    
 Exit point format  . . . . . . . > CHGC0100                            
 Program number . . . . . . . . . > *HIGH        
 Program  . . . . . . . . . . . . > #QGIP003                            
   Library  . . . . . . . . . . . >   LIBNAME        
 Threadsafe . . . . . . . . . . .   *UNKNOWN        
 Multithreaded job action . . . .   *SYSVAL      
 Text 'description' . . . . . . .   *BLANK                                  
                                                                             
 Message identifier . . . . . . .                 Name                      
 Message file . . . . . . . . . .                 Name                      
   Library  . . . . . . . . . . .     *LIBL       Name, *LIBL

Additional Parameters

Replace existing entry . . . . .   *NO          
                 
Exit program data:                                                          
  Coded character set ID . . . . > *JOB          
  Length of data . . . . . . . . > *CALC            
  Program data . . . . . . . . . > 'ENDJOB    QSYS      '  

Note: The program data variable is the command that will be used. There must be ten spaces for the command and ten for the library name list in this variable.

The command would look as follows on a system command line:

ADDEXITPGM EXITPNT(QIBM_QCA_CHG_COMMAND) FORMAT(CHGC0100) PGMNBR(*HIGH) PGM(LIBNAME/#QGIP003)
PGMDTA(*JOB *CALC 'ENDJOB QSYS ')

[{"Type":"MASTER","Line of Business":{"code":"LOB68","label":"Power HW"},"Business Unit":{"code":"BU070","label":"IBM Infrastructure"},"Product":{"code":"SWG60","label":"IBM i"},"ARM Category":[{"code":"a8m3p0000006x8GAAQ","label":"CL"}],"ARM Case Number":"","Platform":[{"code":"PF012","label":"IBM i"}],"Version":"All Versions"}]

Historical Number

467294293

Document Information

Modified date:
25 November 2024

UID

nas8N1014049