*DECK NETXFR
          IDENT  NETXFR 
          TITLE  NETXFR - FIP INTERFACE TO RHFXFR.
          COMMENT FIP INTERFACE TO RHFXFR.
          COMMENT COPYRIGHT (C) CONTROL DATA CORP., 1983. 
          ENTRY  NETXFR 
          SPACE  4,8
***       NETXFR - FIP INTERFACE TO RHFXFR. 
* 
*         NETXFR PROVIDES AN ALTERNATE ENTRY POINT TO FIP ROUTINE 
*         RHFXFR. 
* 
*         CALL NETXFR (PARAMS)
* 
*         SEE RHFXFR FOR PARAMETERS.
          SPACE  4,8
 NETXFR   SUBR                     ENTRY/EXIT 
          RJ     =XRHFXFR          CALL RHFXFR PRESERVING REGISTERS 
          EQ     NETXFR            RETURN 
          END 
