DGCRAMS1.m

DGCRAMS1 ;ALB/RJS - BRIDGE ROUTINE FOR IBOAMS ; 20-OCT-92

 ;;5.3;Registration;**1015**;Aug 13, 1993;Build 21

 ;

 ;called by AR

 Q  ;ihs/cmi/maw 02/08/2012 patch 1014 no IB

 D ^IBOAMS

 Q

DGCRAMS1  ;ALB/RJS - BRIDGE ROUTINE FOR IBOAMS ; 20-OCT-92

 +1       ;;5.3;Registration;**1015**;Aug 13, 1993;Build 21

 +2       ;

 +3       ;called by AR

 +4       ;ihs/cmi/maw 02/08/2012 patch 1014 no IB

           QUIT 

 +5        DO ^IBOAMS

 +6        QUIT