IBM Support

How to submit Batchrep using the CPSM API

Question & Answer


Question

You want to know, how can you use the CICSPlex SM (CPSM) Application Programming Interface (API) to run BATCHREP? This is new function starting with CICS Transaction Server for z/OS (CICS TS) V3.1.

Cause

A sample was not provided for the API.

Answer

See the following examples and the PERFORM OBJECT command in the CICS TS information center.

Here is an example REXX API command:

parameter = 'INPUTDSN(HLQ.FV.BATCHREP.IN) INPUTMEMBER(PWCOMP03)',


            'PRINTCLASS(A) PRINTNODE(WINMVS2D) OUTPUTUSER(FRED).'  

APIRC = EYUAPI('PERFORM',                      
               'OBJECT(BATCHREP)',            
               'ACTION(EXECUTE)',              
               'PARM(parameter)',              
               'PARMLEN('LENGTH(parameter)')',
               'RESULT(resulttoken.1)',        
               'THREAD(threadtoken.1)',        
               'RESPONSE(response)',          
               'REASON(reason)',              
              );


Here is an example COBOL API command:

01 W-PARAMETER.                                          
  02 W-FILLER1       PIC X(9)  VALUE 'INPUTDSN('.        
  02 W-INPUTDSN      PIC X(44)                            
     VALUE 'HLQ.BATCHREP                               '.
  02 W-FILLER2       PIC X(14) VALUE ') INPUTMEMBER('.    
  02 W-INPUTMEMBER   PIC X(8)  VALUE 'PWCOMPnn'.          
  02 W-FILLER3       PIC X(13) VALUE ') OUTPUTUSER('.    
  02 W-OUTPUTUSER    PIC X(8)  VALUE 'FRED    '.          
  02 W-FILLER4       PIC X(13) VALUE ') PRINTCLASS('.    
  02 W-PRINTCLASS    PIC X(1)  VALUE 'A'.                
  02 W-FILLER5       PIC X(12) VALUE ') PRINTNODE('.      
  02 W-PRINTNODE     PIC X(8)  VALUE 'WINMVS26'.          
  02 W-FILLER6       PIC X(2)  VALUE ').'.                

EXEC CPSM PERFORM                    
          OBJECT('BATCHREP')        
          ACTION(W-ACTION)          
          PARM(W-PARAMETER)          
          PARMLEN(W-PARAMETERLENGTH)
          RESULT(W-RESULT)          
          THREAD(W-THREAD)          
          RESPONSE(W-RESPONSE)      
          REASON(W-REASON)          
END-EXEC.
                           

Note that there are other ways to run BATCHREP by using the CPSM WUI, EUI (V3.1) or batched repository-update utility EYU9XDBC.

{"0":{"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Business Unit":{"code":"BU048","label":"IBM Software"},"Component":"API","Platform":[{"code":"PF035","label":"z\/OS"}],"Version":"5.1;4.2;4.1;3.2;3.1","Edition":"","Line of Business":{"code":"LOB70","label":"Z TPS"}},"32":{"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Business Unit":{"code":"BU048","label":"IBM Software"},"Line of Business":{"code":"LOB70","label":"Z TPS"}},"1":null,"2":null,"3":null,"4":null,"5":null,"6":null,"7":null,"8":null,"9":null,"10":null,"11":null,"12":null,"13":null,"14":null,"15":null,"16":null,"17":null,"18":null,"19":null,"20":null,"21":null,"22":null,"23":null,"24":null,"25":null,"26":null,"27":null,"28":null,"29":null,"30":null,"31":null}

Product Synonym

CICSPlex SM CICSPlexSM CPSM CP/SM

Document Information

Modified date:
05 January 2026

UID

swg21192003