ASMB,C,Q
      HED IDADM: 91750-1X128 REV 2013 (C) HEWLETT-PACKARD CO. 1980
      NAM IDADM,8 91750-1X128 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:         IDADM 
*     SOURCE:       91750-18128 
*     RELOC:        91750-1X128 
*     PGMR:         DAN GIBBONS 
* 
*************************************************************** 
      SPC 2 
      ENT #IDAD 
* 
*     THIS IS A DUMMY SUBROUTINE TO BE ATTACHED TO DLIST IN 
*     AN M ENVIRONMENT. 
* 
* 
#IDAD RPL 0         REPLACE "JSB #IDAD" WITH "NOP"
      END 
                                                                                                                                                                                                                                                      