*DECK BTFJORT 
          IDENT  BTFJORT
          TITLE  BTFJORT - ENTRY POINTS FOR OVCAP LINKAGE 
*#
* *   BTFJORT - ENTRY POINTS FOR OVCAP LINKAGE  PAGE  1 
* *   A P WONG                                  DATE  08/27/81
* 
* DC  PURPOSE 
* 
*     THIS IDENT CONTAINS THE ENTRY POINTS DB=XXXX FOR BTFJORT
*     OVCAP LINKAGE.
* 
* DC  ENTRY CONDITIONS
* 
*     NONE
* 
* DC  EXIT CONDITIONS 
* 
*     NONE
* 
* DC  CALLING ROUTINES
* 
*     ALL CALLS FROM OUTSIDE THIS OVCAP TO DB$XXXX IN THIS OVCAP
*     ARE ROUTED THROUGH THE DB=XXXX ENTRY POINTS IN THIS IDENT.
*     SEE INDIVIDUAL DB$XXXX ROUTINES FOR THE CALLING ROUTINES. 
* 
* DC  CALLED ROUTINES 
* 
*     DB$XXXX ROUTINES ARE CALLED BY THE DB=XXXX ENTRY POINTS.
* 
* DC  NON-LOCAL VARIABLES MODIFIED
* 
*     NONE
* 
* DC  DESCRIPTION 
* 
*     THIS IDENT CONTAINS THE ENTRY POINTS DB=XXXX FOR BTFJORT
*     OVCAP LINKAGE.  DB=XXXX CONTAINS THE ADDRESS OF DB$XXXX.
*     DB$OVCB WILL PICK UP THE DB$XXXX ADDRESS THROUGH THE DB=XXXX
*     ENTRY PT.  THIS INDIRECT ADDRESSING IS NEEDED TO AVOID MAKING 
*     DB$XXXX AN ENTRY POINT (EXTERNAL TO THE BTFJORT OVCAP), 
*     ON THE LIBRARY, SINCE DB$XXXX IS ALREADY SPECIFIED AS AN
*     ENTRY POINT IN CD2JORT. 
* 
*#
          ENTRY  DB=IOER
          ENTRY  DB=JLCR
          ENTRY  DB=JLCT
          ENTRY  DB=JLH 
          ENTRY  DB=JLO 
          ENTRY  DB=JLRS
          ENTRY  DB=RWTR
          ENTRY  DB=WR2J
DB=IOER   VFD    42/0,18/=XDB$IOER
DB=JLCR   VFD    42/0,18/=XDB$JLCR
DB=JLCT   VFD    42/0,18/=XDB$JLCT
DB=JLH    VFD    42/0,18/=XDB$JLH 
DB=JLO    VFD    42/0,18/=XDB$JLO 
DB=JLRS   VFD    42/0,18/=XDB$JLRS
DB=RWTR   VFD    42/0,18/=XDB$RWTR
DB=WR2J   VFD    42/0,18/=XDB$WR2J
          END 
