CACHE>WRITE $DATA(VARI) 0 CACHE>SET VARI="HELLO" WRITE $DATA(VARI) 1 CACHE>NEW VARI WRITE $DATA(VARI) ;Change to a new scope 0 CACHE 1S1>SET VARI(1,2)="DOWN" WRITE $DATA(VARI) 10 CACHE 1S1>WRITE $DATA(VARI(1)) 10 CACHE 1S1>WRITE $D(VARI(1,2)) 1 CACHE 1S1>SET VARI(1)="UP" WRITE $DATA(VARI(1)) 11 QUIT ;Leave the scope W $DATA(VARI)," ",VARI 1 HELLO