ASMB,C,Q  
      HED DUMFM: 91750-1X103 (C) HEWLETT-PACKARD CO. 1980 
      NAM DUMFM,7 91750-1X103 REV 2013 791119 M 
      SPC 2 
******************************************************************
*  * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1980. ALL RIGHTS      *
*  * RESERVED. NO PART OF THIS PROGRAM MAY BE PHOTOCOPIED,       *
*  * REPRODUCED OR TRANSLATED TO ANOTHER PROGRAM LANGUAGE WITHOUT*
*  * THE PRIOR WRITTEN CONSENT OF THE HEWLETT-PACKARD COMPANY.   *
******************************************************************
      SPC 4 
****************************************************************
* 
*     NAME:         DUMFM 
*     SOURCE:       91750-18103 
*     RELOC:        91750-1X103 
*     PGMR:         DAN GIBBONS 
* 
*************************************************************** 
      SPC 3 
      ENT APOSN,CLOSE,CREAT,FCONT,LOCF,NAMF 
      ENT OPEN,POSNT,POST,PURGE,READF,RWNDF,WRITF 
* 
      EXT .ENTR 
* 
PRAMS REP 8         PARAMETER ADDRESSES 
      NOP 
* 
DUMFM NOP 
      JSB .ENTR     PICK-UP PARAMETERS
      DEF PRAMS 
      CCA           INDICATE A DISC ERROR 
      STA PRAMS+1,I SINCE NO FMP PRESENT
      JMP DUMFM,I   RETURN
* 
APOSN EQU DUMFM 
CLOSE EQU DUMFM 
CREAT EQU DUMFM 
FCONT EQU DUMFM 
LOCF  EQU DUMFM 
NAMF  EQU DUMFM 
OPEN  EQU DUMFM 
POSNT EQU DUMFM 
POST  EQU DUMFM 
PURGE EQU DUMFM 
READF EQU DUMFM 
RWNDF EQU DUMFM 
WRITF EQU DUMFM 
* 
SIZE  EQU * 
* 
      END 
                                                        