Welcome to Programmers Language v2

ID: 12
PlCodelang: Caché
PlGroup: Datenbank
PlItemTitle: Lesen Datensatzes
Code: ; 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") }

ID: 13
PlCodelang: PHP
PlGroup: Array
PlItemTitle: Array definieren
Code: $arr = array(); $arr['dim1']['dim2']='value'; $arr['dim1'][99]=128;

ID: 14
PlCodelang: Mumps
PlGroup: Array
PlItemTitle: Array definieren
Code: S arr("dim1","dim2")="value" Set arr("dim1",99)=187 ; Persistent, will be saved with prefix ^: S ^save("dim1","dim2")="saved value"

ID: 15
PlCodelang: PHP
PlGroup: Variablen
PlItemTitle: Existenz der Varible abfragen
Code: $status=isset($test); if ($status) echo "Variable existiert: $test"; if (!isset($test2)) echo "Variable test2 existiert nicht!";

ID: 16
PlCodelang: Mumps
PlGroup: Variablen
PlItemTitle: Existenz der Varible abfragen
Code: Set status=$Data(test) If status Write !,"Variable existiert: "_test I '$D(test2) W !,"Variable existiert nicht!"

ID: 17
PlCodelang: Caché
PlGroup: HTTP Form Submit
PlItemTitle: GET Link-Parameter lesen
Code: ; http://localhost:1972/csp/test/page.csp?name=john Set linkparm=$Get(%request.Data("name",1)) Write !,linkparm ; = john

ID: 18
PlCodelang: Caché
PlGroup: Textdateien
PlItemTitle: Textdatei zeilenweise auslesen
Code: Set stream=##class(%FileCharacterStream).%New() Set stream.Filename="c:\myfile.txt" While 'stream.AtEnd { Set line=stream.ReadLine() ; Process the line here }

ID: 19
PlCodelang: Caché
PlGroup: Caché-Spezifisch, Namespaces
PlItemTitle: Prüfen ob ein Namespace existiert
Code: If $ZUtil(90,10,"SAMPLES") { ZNSpace "SAMPLES" }

ID: 20
PlCodelang: PHP
PlGroup: Variablen
PlItemTitle: Var-Dump einer Variable
Code: echo "<pre>"; var_dump($test); echo "</pre>";

ID: 21
PlCodelang: Mumps
PlGroup: Variablen
PlItemTitle: Var-Dump einer Variable
Code: ZW test S A(1,2)="Inhalt" ZWrite A Set ^GLOBAL1("sub1","sub2")="content" ZW ^GLOBAL1