Cache Terminalde bulundugunu namespacaden bir baskasina gecmek icin ;
USER> "DIGERNS"
yada lokal bior degisken yardimi ile ;
USER> S ZYENI="DIGERNS" ZN ZYENI
Technorati Tags: intersystems cache
zaman nasilda cabuk geciyor, degil mi ?
S ZSTREAM=##CLASS(%Library.FileCharacterStream).%New()
S ZSTREAM.Filename="C:\deneme.txt"
WHILE ('ZSTREAM.AtEnd) {
S ZSTR=ZSTREAM.ReadLine()
W !,ZSTR
}
D ZSTREAM.%Close()
Class TEST.HASTA Extends %Persistent [ ClassType = persistent, ProcedureBlock ]
{
Property ADI As %String;
Property SOYADI As %String;
}
S ZOBJ=##class(TEST.HASTA).%New()
S $ZOBJPROPERTY(ZOBJ,"ADI")="TESTAD"
S $ZOBJPROPERTY(ZOBJ,"SOYADI")="TESTSOYAD"
;
W !,$ZOBJPROPERTY(ZOBJ,"ADI")
W !,$ZOBJPROPERTY(ZOBJ,"SOYADI")