Skip to content

Commit e8590f2

Browse files
committed
$System usage unification
1 parent 17d48ed commit e8590f2

File tree

1 file changed

+7
-7
lines changed

1 file changed

+7
-7
lines changed

export/template.xml

Lines changed: 7 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -848,10 +848,10 @@ This method transforms error </Description>
848848
do ..SendData($C(13,10))
849849
do ..SendData("35", ..#ConstClientOutputLocalized)
850850
do ..SendData($C(13,10))
851-
set stload = $system.OBJ.LoadStream(httprequest.HttpResponse.Data,"",.error,.items)
852-
if $$$ISERR(stload) { do ..SendData(System.Status.GetErrorText(stload)) quit $$$NOTOK }
853-
set st2 = $system.OBJ.CompileList(.items)
854-
if $$$ISERR(st2) { do ..SendData(System.Status.GetErrorText(st2)) quit $$$NOTOK }
851+
set stload = $System.OBJ.LoadStream(httprequest.HttpResponse.Data,"",.error,.items)
852+
if $$$ISERR(stload) { do ..SendData($System.Status.GetErrorText(stload)) quit $$$NOTOK }
853+
set st2 = $System.OBJ.CompileList(.items)
854+
if $$$ISERR(st2) { do ..SendData($System.Status.GetErrorText(st2)) quit $$$NOTOK }
855855
if $$$ISERR(error) {
856856
do ..SendData($C(27)_"[31mFAILED" _ $C(27) _ "[0m" _ $C(13,10))
857857
quit $$$NOTOK
@@ -942,7 +942,7 @@ the client - it includes authorization key.</Description>
942942
continue:($order(userProps("")) = "")
943943
944944
set namespace = $case(namespace, "":userProps("NameSpace"), :namespace)
945-
set loginStatus = ##class(%SYSTEM.Security).Login(username) // login user
945+
set loginStatus = $System.Security.Login(username) // login user
946946
947947
kill ^%WebTerminal.AuthUser(key)
948948
@@ -952,7 +952,7 @@ the client - it includes authorization key.</Description>
952952
953953
// kill "old" auth tickets
954954
set time = $LISTGET(lb, 2)
955-
if (time '= "") && ($SYSTEM.SQL.DATEDIFF("s", time, $h) > 100) { // if older than 100 sec
955+
if (time '= "") && ($System.SQL.DATEDIFF("s", time, $h) > 100) { // if older than 100 sec
956956
kill ^%WebTerminal.AuthUser(key)
957957
}
958958
@@ -1163,7 +1163,7 @@ This method is invoked when a class is compiled.</Description>
11631163
set Properties("TempGlobals") = "CACHETEMP"
11641164
set status = ##Class(Config.Namespaces).Create("%All", .Properties)
11651165
if ($$$ISERR(status)) {
1166-
do $SYSTEM.Status.DisplayError(status)
1166+
do $System.Status.DisplayError(status)
11671167
quit status
11681168
} else {
11691169
w !, "%All namespace is created."

0 commit comments

Comments
 (0)