ABMDEI2.m

ABMDEI2 ; IHS/ASDST/DMJ - Special Identifier for DIC Lookup Revn Table ;

 ;;2.6;IHS 3P BILLING SYSTEM;;NOV 12, 2009

 ;

 W " - ",$P(^AUTTREVN(+Y,0),U,2)

 ;

XIT Q

ABMDEI2   ; IHS/ASDST/DMJ - Special Identifier for DIC Lookup Revn Table ;

 +1       ;;2.6;IHS 3P BILLING SYSTEM;;NOV 12, 2009

 +2       ;

 +3        WRITE " - ",$PIECE(^AUTTREVN(+Y,0),U,2)

 +4       ;

XIT        QUIT