$DEVICE=
$ECODE=,Z150373498,
$ESTACK=6
$ETRAP=D ER2^%ZTM5
$QUIT=0
$STACK=6
$STACK(000)=-direct
$STACK(000,"ECODE")=
$STACK(000,"MCODE")= F %ZTLOOP=0:1 S %ZTLOOP=%ZTLOOP#16 D CHECK,SCHQ,IDLE:%ZTCHK
$STACK(000,"PLACE")=LOOP+1^%ZTM
$STACK(001)=DO
$STACK(001,"ECODE")=
$STACK(001,"MCODE")= I $D(^%ZTSCH("LINK"))#2,$$DIFF($H,^("LINK"))>900 D LINK^%ZT
M3
$STACK(001,"PLACE")=CHECK+13^%ZTM
$STACK(002)=DO
$STACK(002,"ECODE")=
$STACK(002,"MCODE")=L0 F ZT=0:0 S ZTDVOL=$O(^%ZTSCH("LINK",ZTDVOL)) Q:ZTDVOL=""
D TEST
$STACK(002,"PLACE")=L0^%ZTM3
$STACK(003)=DO
Enter '^' to quit listing, <RETURN> to continue...:
$STACK(003,"ECODE")=,Z150373498,
$STACK(003,"MCODE")= S ZTS=^%ZIS(14.5,ZTI,0)
$STACK(003,"PLACE")=TEST+2^%ZTM3
$STACK(004)=DO
$STACK(004,"ECODE")=
$STACK(004,"MCODE")= D ^%ZTER K ZTERCODE
$STACK(004,"PLACE")=ER+13^%ZTM5
$X $Y=0 0
$ZV=GT.M V5.0-000 Linux x86
%N=82
%ZT("^XUTL("XQ",$J)")=
%ZTIME=5208398921
%ZTJOB=J GTM^%ZTMS::5
%ZTLOOP=0
%ZTMON=9
%ZTMON("0")=0
%ZTMON("1")=0
%ZTMON("10")=0
%ZTMON("11")=0
%ZTMON("12")=0
Enter '^' to quit listing, <RETURN> to continue...:
%ZTMON("13")=0
%ZTMON("14")=0
%ZTMON("15")=0
%ZTMON("16")=0
%ZTMON("17")=0
%ZTMON("18")=0
%ZTMON("19")=0
%ZTMON("2")=0
%ZTMON("20")=0
%ZTMON("21")=0
%ZTMON("22")=0
%ZTMON("23")=0
%ZTMON("3")=0
%ZTMON("4")=0
%ZTMON("5")=0
%ZTMON("6")=0
%ZTMON("7")=0
%ZTMON("8")=0
%ZTMON("9")=0
%ZTMON("DAY")=60282
Enter '^' to quit listing, <RETURN> to continue...:
%ZTMON("NEXT")=5208400800
%ZTNLG=0
%ZTNODE=vistaserver
%ZTOS=GT.M (Unix)^19
%ZTPAIR=ROU:vistaserver
%ZTPFLG("BAL")=
%ZTPFLG("BI")=30
%ZTPFLG("DCL")=
%ZTPFLG("LBT")=0
%ZTPFLG("MINSUB")=1
%ZTPFLG("START")=60282
%ZTPFLG("TM-DELAY")=60
%ZTPFLG("XUSCNT")=54
%ZTPN=2
%ZTPS=ROU:vistaserver^^N^7^^^500^^G^^0^1
%ZTPT=7
%ZTRET=0
%ZTSIZ=0
%ZTSLO=0
%ZTUCI=VAH
Enter '^' to quit listing, <RETURN> to continue...:
%ZTVLI=0
%ZTVMJ=500
%ZTVOL=ROU
%ZTVSN=2
%ZTVSS=ROU^N^Y^N^Y^VAH^2^^14^G^1
%ZTYPE=G
%ZTYPE("V")=G
DTIME=0
DUZ=0
DUZ("0")=@
U=^
ZT=60282,34122
ZTDVOL=VISTA
ZTE=
ZTERCODE=TEST+2^%ZTM3, Null subscripts are not allowed for region: DEFAULT,15037
3498,-%GTM-E-NULSUBSC
ZTI=
ZTPAIR=
Enter '^' to quit listing, <RETURN> to continue...:
$ZE= TEST+2^%ZTM3, Null subscripts are not allowed for region: DEFAULT,150373498
,-%GTM-E-NULSUBSC
S ZTS=^%ZIS(14.5,ZTI,0)
Last Global Ref: ^%ZIS(14.5,"",0)
Which symbol? >
