如何在Mac OS X上的MUMPS中创建子例程

Question

我正在开始一个项目，我需要掌握MUMP的一些阅读知识，马萨诸塞州综合医院多功能编程系统。我已经设法让它在我的OS X El Capitan计算机上运行。我可以做一些简单的事情，但似乎无法创建一个简单的子例程。根据我能找到的规格，子程序由标签创建，然后是以制表符或空白和说明开头的行，以便

HELLO
   WRITE "Hello, World!",!
   QUIT

将是我可以使用

调用的子程序

DO HELLO

当我尝试输入它时，它会立即执行WRITE语句。

此外，许多例子的形式如下：

DEMO 
   Kill For i=1:1:10 SET Ary(i)=i*2
   DO Average Write !,"Average=",AVG
   KILL Ary,AVG,i
   QUIT
Average  SET Sum=0;
   ;  Do something here
   QUIT

当我开始输入DO平均线时，我得到一个未定义平均值的错误。

关于如何进入子程序的任何想法？

Answer 1

首先在Kill和For之间，应该超过1个空格，如果它只是一个空格，那么For成为一个变量，应该被杀死。 然后，当您发现命令DO Average的UNDEFINED错误时，您错了，您在同一行中有另一个UNDEFINED错误且它是AVG变量，这在您的代码中确实是未定义的。
如果您刚开始理解MUMPS语言，我建议您在单独的一行中编写每个命令。