*DECK FCMMFRF 
          IDENT  CMMFRF 
 CMMFRF   TITLE  CMMFRF - FREE FIXED POSITION BLOCK.
          COMMENT  FREE FIXED POSITION BLOCK
          SYSCOM B1 
*CALL FCMMCOM 
***       CMMFRF - FREE FIXED POSITION BLOCK. 
* 
*         CALL CMMFRF(BLKFWA) 
*                BLKFWA - FIRST WORD ADDRESS OF BLOCK TO RELEASE. 
* 
 CMMFRF   SPACE  4,4
          SUBRTN CMMFRF 
          SA1    X1+
+         RJ     =XCMM.FRF
-         VFD    12/0,18/CMMFRF-1 
          RTRN   CMMFRF 
          END 
