!   TITLE:  entity_max.mac (MANAGEMENT)
!
!
!   This sub-macro displays the current solid model entity maximums in a
!   dialogue box.
!
*get,prkey_,active,0,prkey
/nopr

!
*ask,decision,Solid Model(0) Node/Element(1),0
!
*if,decision,eq,0,then
    *msg,ui,'KM',%km%,'LM',%lm%,'AM',%am%,'VM',%vm%
    %c = %i&
    %c = %i&
    %c = %i&
    %c = %i
*endif
!
*if,decision,eq,1,then
    *msg,ui,'NM',%nm%,'EM',%em%
    %c = %i&
    %c = %i
*endif
!
*set,decision,

*if,prkey_,eq,1,then
    /go
*endif