BPX1SND (send) example

The following code issues a send for a socket. SOCKDESC was returned previously from a call to BPX1SOC. For the callable service, see send (BPX1SND, BPX4SND) — Send data on a socket. For the data structures, see BPXYSOCK — Map SOCKADDR structure and constants and BPXYMSGF — Map the message flags. AMODE 64 callers use BPX4SND (send) example.

                                              
         MVC   BUFLENA,=F'16'                                           
         MVC   BUFFERA(16),=CL16'Here is the data'                      
         SPACE ,                                                        
         CALL  BPX1SND,              Send data on a socket             +
               (SOCKDESC,            Input: Socket Descriptor          +
               =A(L'BUFFERA),        Input: Length of input buffer     +
               BUFFERA,              Input: input buffer               +
               PRIMARYALET,          Input: Alet of input buffer       +
               MSG_FLAGS,            Input: Flags                      +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------