Distributed Systems Network Management (DSNM) Subsystem Interface Development Guide

DSNM Library Services
Distributed Systems Network Management (DSNM) Subsystem Interface Development
Guide—109759 A-121
_SUBSYS^DEF
Example
< in global definitions >
INT .EXT ci^config (_CI^DEF);
INT .EXT ss^config (_SUBSYS^DEF);
STRING .ciname[0:ZDSN^MAX^CICLASS-1] := [“XXX ”];
STRING .ssname[0:ZDSN^MAX^SUBSYS-1] := [“YYYYYY ”];
< within _STARTUP procedure >
BEGIN
.
.
IF _ISNULL (@ci^config := _ADD^CI (ciname)) THEN
RETURN ZDSN^ERR^INTERNAL^ERR;
IF _ISNULL (@ss^config := _ADD^SUBSYS (ssname)) THEN
RETURN ZDSN^ERR^INTERNAL^ERR;
.
.
END;