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