job  subroutine linkages
               ctl  6611
               org  1
     x3        equ  99
     n         equ  3                   Three times number of parameters
     enter     sbr  *+14                Store NSI
               sbr  exit-1,0+x3         Save X3
               sbr  x3,*                Store NSI into X3
               sbr  exit+3,n+x3         Store return
     * Do stuff here.
               sbr  x3,*
     exit      b    *
               end  0