19 lines
832 B
Text
19 lines
832 B
Text
|
|
INTEGER
|
|
$ EVT_UNKNOWN, EVT_LOGGING, EVT_START_RTN, EVT_FINISH_RTN,
|
|
$ EVT_PROGRESS, EVT_PARAMETERS, EVT_SOURCE_IO, EVT_DATA,
|
|
$ EVT_MISC, EVT_REGRESSION, EVT_GUI,
|
|
$ ALWAYS_PRINT, TIER_1, TIER_2, TIER_3, TIER_4, TIER_5,
|
|
$ SEV_DEBUG, SEV_INFO, SEV_WARNING, SEV_ERROR,
|
|
$ PS_UNKNOWN, PS_NONE, PS_CORRECT, PS_NON_CORRECT,
|
|
$ DQ_UNKNOWN, DQ_GOOD, DQ_QUESTIONABLE, DQ_BAD
|
|
|
|
COMMON / MESSG /
|
|
$ EVT_UNKNOWN, EVT_LOGGING, EVT_START_RTN, EVT_FINISH_RTN,
|
|
$ EVT_PROGRESS, EVT_PARAMETERS, EVT_SOURCE_IO, EVT_DATA,
|
|
$ EVT_MISC, EVT_REGRESSION, EVT_GUI,
|
|
$ ALWAYS_PRINT, TIER_1, TIER_2, TIER_3, TIER_4, TIER_5,
|
|
$ SEV_DEBUG, SEV_INFO, SEV_WARNING, SEV_ERROR,
|
|
$ PS_UNKNOWN, PS_NONE, PS_CORRECT, PS_NON_CORRECT,
|
|
$ DQ_UNKNOWN, DQ_GOOD, DQ_QUESTIONABLE, DQ_BAD
|
|
|