在Universe中创建子例程

Question

我在执行UniCommands期间识别UniObject的错误时遇到问题。我在UniObjects for Java: How to get response String when error occurred in UniCommand.exec()

中看到了答案

但我不知道如何在Universe中创建子程序？

我看到了这个方法CreateUniSubroutine，但它只有名称和参数＃。

UniSubroutine sub = us1.CreateUniSubroutine（“RUN.COMMAND”，2）;

感谢。

Answer 1

在UniVerse中，您可以在程序内外使用子程序。 让我告诉你如何做一个简单的例子。

主要档案：

0001 *EXAMPLE SUBROUTINE
0002       CRT 'ENTER A NUMBER OR Q TO QUIT:'
0003       INPUT NUM
0004       BEGIN CASE
0005          CASE NUM = "Q"
0006             GOSUB ENDPRG
0007          CASE NUM > 0
0008             CALL ADD5(NUM)
0009       END CASE
0010 ENDPRG:
0011       CRT 'END OF PROGRAM'
0012       CRT
0013    END

子程序文件：

0001       SUBROUTINE ADD5(NUMBER)
0002       NUMBER+=5
0003       CRT NUMBER
0004       RETURN
0005    END

在第6行和第8行的主文件中，您可以看到子例程。 我希望能提供帮助;）

Answer 2

我通常只从原生Universe内部做Universe，但这里看起来是命令“CreateUniSubroutine”创建一个Universe子程序的反映，而不是子程序本身。

我不确定您要做什么，但这似乎允许您利用现有的Universe代码而不添加新逻辑。

Answer 3

在Universe中创建子程序。

1. 您需要在文件类型为19的UniVerse帐户中设置子程序源文件文件夹。它可以是其他UniVerse帐户的本地或qpoint。
2. 使用任何文本编辑器（如记事本）编辑子程序源代码并保存到上面的源文件夹中。

3. TELNET到您的UniVerse帐户并输入以下基本子程序。

   BASIC source.folder subroutine.name

示例：如果源文件夹名称为SOURCE且子例程文件名为RUN.COMMAND。命令将是

BASIC SOURCE RUN.COMMAND

1. 在从UniObject调用之前，您可能需要在数据帐户中对CATALOG进行CATALOG。