Difference between revisions of "Hello world and hello Texas from Database"
From VistApedia
| Line 1: | Line 1: | ||
Install VistA with something like Astronaut. Get to a Mumps prompt: choose item 3 if you are using VistA Commander. | Install VistA with something like Astronaut. Get to a Mumps prompt: choose item 3 if you are using VistA Commander. | ||
| − | MUMPS>write "hello world" | + | MUMPS>write "hello world" |
hello world | hello world | ||
| − | MUMPS>write "hello " write $P(^DIC(5,48,0),"^",1) | + | MUMPS>write "hello " write $P(^DIC(5,48,0),"^",1) |
hello TEXAS | hello TEXAS | ||
| Line 10: | Line 10: | ||
* Invokes the $P[iece] command, which is similar to but not exactly like the substring command in many other languages. | * Invokes the $P[iece] command, which is similar to but not exactly like the substring command in many other languages. | ||
* The ^ indicates that this is not a local variable; MUMPS will look for a [[Global~|global]] stored on disk and visible to other users. | * The ^ indicates that this is not a local variable; MUMPS will look for a [[Global~|global]] stored on disk and visible to other users. | ||
| − | * DIC | + | * DIC is the data dictionary, and the subscripts say to look in file 5, field 48, item 0. |
* Then $P uses the ^ in this case as a delimiter, and returns the first piece. | * Then $P uses the ^ in this case as a delimiter, and returns the first piece. | ||
* Since ^DIC(5,48,0)="TEXAS^TX^48^^1^1", MUMPS writes "TEXAS". | * Since ^DIC(5,48,0)="TEXAS^TX^48^^1^1", MUMPS writes "TEXAS". | ||
Revision as of 18:44, 9 February 2010
Install VistA with something like Astronaut. Get to a Mumps prompt: choose item 3 if you are using VistA Commander.
MUMPS>write "hello world" hello world MUMPS>write "hello " write $P(^DIC(5,48,0),"^",1) hello TEXAS
What the above hello TEXAS line does:
- Invokes the $P[iece] command, which is similar to but not exactly like the substring command in many other languages.
- The ^ indicates that this is not a local variable; MUMPS will look for a global stored on disk and visible to other users.
- DIC is the data dictionary, and the subscripts say to look in file 5, field 48, item 0.
- Then $P uses the ^ in this case as a delimiter, and returns the first piece.
- Since ^DIC(5,48,0)="TEXAS^TX^48^^1^1", MUMPS writes "TEXAS".
