BPX1SHT (shutdown) example

The following code issues a shutdown to stop socket writes to this socket connection. SOCKDESC was returned from a previous call to BPX1SOC. For the callable service, see shutdown (BPX1SHT, BPX4SHT) — Shut down all or part of a duplex socket connection. AMODE 64 callers use BPX4SHT (shutdown) example.
                                              
         SPACE ,                                                        
         CALL  BPX1SHT,              Shutdown communication            +
               (SOCKDESC,            Input: Socket Descriptor          +
               SOCK#SHUTDOWNWRITE,   Input: How - shutdown writes      +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------