You may optionally enter a comparison operator (<, <=, >, >=, <> or =) at the beginning of each of your search values to specify how the comparison should be done.
S arr("dim1","dim2")="value"
Set arr("dim1",99)=187
; Persistent, will be saved with prefix ^:
S ^save("dim1","dim2")="saved value"
16
Mumps
Variablen
Existenz der Varible abfragen
Set status=$Data(test)
If status Write !,"Variable existiert: "_test
I '$D(test2) W !,"Variable existiert nicht!"
21
Mumps
Variablen
Var-Dump einer Variable
ZW test
S A(1,2)="Inhalt"
ZWrite A
Set ^GLOBAL1("sub1","sub2")="content"
ZW ^GLOBAL1
33
Mumps
Strings
String nach Delimenter zerlegen
myString="A;B;C;D;E"
Write !,$Piece(myString,";",3) // gibt C aus
40
Mumps
Strings
String nach einem Teilstring durchsuchen
Set fullstring="This is my string"
Set searchfor="my"
If $Find(fullstring, searchfor) Do
. Write !,"I found it!!"
. Quit
127
Mumps
Konsolenverwaltung
Einlesen Konsoleneingabe
WRITE !,"What's your name? "
READ yourname
165
Mumps
Variablen
Auflistung aller Variablen
S A="This is a test"
Set b=1
ZW
ZWrite
8
Caché
Datum, Zeit
Aktuelles Datum/Uhrzeit
; Datum und Uhrzeit formatiert ausgeben
Set datuhr=$ZDateTime($Horolog,8)
; ergibt 20100308 09:47:36
; nur Datum
Set dat=$ZDate($Horolog,3) ; = 2010-03-08
; nur Zeit
Set uhr=$ZTime($Piece($H,",",2)) ; = 09:50:20
12
Caché
Datenbank
Lesen Datensatzes
; Es existiert eine Tabelle namens Table.Cities welche einen Eintrag mit der ID=15 enthält. Diese Tabelle enthält das Feld "Name"
Set ds=##class(Table.Cities).%OpenId(15)
Write !,ds.Name
; Oder über SQL
Set result = ##class(%Library.ResultSet).%New()
Set sql = "SELECT Name FROM Table.Cities WHERE ID=15"
Do result.Prepare(sql)
Do result.Execute("")
For
{
Quit:'result.Next()
Set name=result.Data("Name")
}
17
Caché
HTTP Form Submit
GET Link-Parameter lesen
; http://localhost:1972/csp/test/page.csp?name=john
Set linkparm=$Get(%request.Data("name",1))
Write !,linkparm ; = john
