*        THIS ROUTINE MUST APPEAR AHEAD OF THE COBOL PROGRAM.
*
         DEF      FORTLINK
         REF      9INITIAL
         SYSTEM   SIG5
FORTLINK LW,6     15
         B        9INITIAL
         END
