z/OS Communications Server: IP Programmer's Guide and Reference
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


Example

z/OS Communications Server: IP Programmer's Guide and Reference
SC27-3659-02

The following assembler program example shows how to invoke the RCCStop request:
***********************************************************************         
*        RCCStop request                                              *         
*                                                                     *         
*        The RCCHeader is reused from the RCCOpen request.            *         
*                                                                     *         
***********************************************************************         
Stop     DS    0H                                                               
         MVI   RCHRRequest,RCCStop      Setup request header                   
         XR    R0,R0                    No other input structure                           
         STH   R0,RCHRNum                                                       
         LHI   R0,RCHRSize              Size of request header                  
         ST    R0,DynReqLn                                                      
*                                                                               
         EZBRCIFR RCCHeader,DynReqLn,                                  X        
               DynRtVal,DynRtCde,DynRtRsn,                             X        
               MF=(E,DynRcIfr)          Issue RCCStart request                  
         LT    R15,DynRtVal             Did it work?                            
         JNZ   ErrRtn                   Error                                   
.                                                                               
.                                                                               
                                                                                
DynRcIfr EZBRCIFR MF=L                  RCC API parameter list                  
DynReqLn DS    F                        Length of request input               
DynRtVal DS    F                        Return value                            
DynRtCde DS    F                        Return Code                             
DynRtRsn DS    F                        Reason Code                             
DynRccH  DS    XL(RCHRSize)             Space for the RCC header

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014