*DECK SMTAPE
          IDENT  SMTAPE 
          TITLE  SMTAPE -  GATHER PARAMETERS ABOUT TAPE FILES (PRETEND) 
          COMMENT  GATHER PARAMETERS ABOUT TAPE FILES (PRETEND) 
          SPACE  4
**        SMTAPE -  GATHER PARAMETERS ABOUT TAPE FILES (PRETEND)
* 
*     CALLING SEQUENCE: 
*         CALL SMTAPE(<LFN>, <LFN>, ..., <LFN>) 
* 
*     DOES: 
*         NOTHING.
* 
*     NOTE: 
*         THIS ROUTINE IS PROVIDED FOR FUNCTIONAL COMPATIBILITY WITH
*         SORT/MERGE 4.  THE SORT/MERGE 4 *SMTAPE* IS USED TO SPECIFY 
*         NAMES OF TAPES TO BE USED FOR TAPES SORTS.  BUT SORT/MERGE 5
*         DOES NOT HAVE A TAPE SORT SO IT IGNORES THIS CALL.
  
  
          ENTRY  SMTAPE 
 SMTAPE   SUBR
          EXIT
  
  
          END 
