 VSEND

        Routine to send packes > 26. bytes via SEND BY REFERENCE

        In order to use the routine specify the following in the
        TKB commandfile:

        - GBLPAT=modulename:$VSAPR:n    To specify APR to be used for mapping
                                        (default APR 7 is used)

	- GBLPAT=modulename:$SCLUS:1	To specify if routine is to be 
					clustered with VRECVE or SDTMBX.
					If specified : the same APR and window
					can be used for these routines.
					No Unmapping tests are performed then.
					(Default non clustered)

        - WNDWS=1                       Window when not already spec.
        - WNDWS=n+1                     Extra window when already spec.

  Fortran       CALL    VSEND(TSKNAM,BUFFER,IBUFL,IDS)

         TSKNAM = 4 byte variable (or Real*4) which contains RAD50 receiver
                  taskname
         BUFFER = Buffer that contains data
         IBUFL  = Length of data in buffer
         IDS    = Integer to receive the directive status word

  Macro         MOV     #TSKNAM,R1      ; Address of RAD50 Receiver task name
                MOV     #BUFFER,R2      ; Buffer that contains data
                MOV     #BUFLEN,R3      ; Length of data in buffer

                CALL    $VSEND

        $DSW   Status code      carry bit set : error
        Registers are preserved

  Errors  :   IS.SUC -- Succesful operation
              IE.UPN -- Insufficient dynamic storage
              IE.INS -- Specified task not installed
              IE.IBS -- Invalid buffersize
              IE.WOV -- Address window overflow (no extrawindow specified)
              IE.ALG -- Invallid APR
