TYPE EMSProgramCallManagementType
! structure for Erl program calling managers
CHARACTER(len=MaxNameLength) :: Name = ' ' ! user defined name for calling manager
INTEGER :: CallingPoint = 0 ! EMS Calling point for this manager, see parameters emsCallFrom*
INTEGER :: NumErlPrograms = 0 ! count of total number of Erl programs called by this manager
INTEGER, DIMENSION(:), ALLOCATABLE :: ErlProgramARR ! list of integer pointers to Erl programs used by this manager
END TYPE EMSProgramCallManagementType