使用Universe基本子例程从Universe数据库中检索所有记录

Question

我只想知道如何使用universe基本子例程从Universe数据库表中检索所有记录。我是宇宙中的新人。

Answer 1

在unibasic

中也许是这样的

OPEN "filename" to FIL ELSE STOP 201,"cannot open filename"
EXECUTE "SELECT filename"
LOOP WHILE READNEXT ID
READ REC FROM FIL,ID ELSE REC = "" 
 * you now have the entire row in REC

REPEAT

Answer 2

GitHub上有一篇关于如何执行U2 UniVerse子程序的文章和示例代码。

Execute Rocket MV U2 Subroutine Asynchronously using C# (async\await) and U2 Toolkit for .NET. Convert Subroutine Multi-Value Output to Json/Objects/DataTable

这些示例代码基于C＃（async \ await），但您可以使用同步编程以及少量代码调整。

对于文章：

转到此链接：

https://github.com/RocketSoftware/multivalue-lab/tree/master/U2/Demos/U2-Toolkit/AsyncAwait/Execute_Subroutine_Async

读取'Subroutine-Async.docx'文件。

本文关于GitHub的示例代码

转到此链接：

https://github.com/RocketSoftware/multivalue-lab/tree/master/U2/Demos/U2-Toolkit/AsyncAwait/Execute_Subroutine_Async

Answer 3

您能提供有关您尝试做的更多信息吗？

子程序调用返回UniVerse文件的全部内容可能会返回大量数据。我希望你最好只返回一个项目的子集，这样调用例程就可以一次处理一下。

基于评论的新内容：

好的，既然您提到了类型19文件，我假设您要从文件指向的目录/文件夹中读取一个文件。

在子例程中，可以在类型19文件上使用OPEN，并使用READ命令读取文件。 （请注意，您还可以使用READU，READL，MATREAD，MATREADU或MATREADL来获取目录/文件夹中的整个文件，具体取决于您是否/如何锁定项目以及是否希望数据处于动态或尺寸如果您只需要特定属性，则可以使用READV，READVL或READVU命令。

或者，因为这是类型19文件，您可以使用顺序读取。使用OPENSEQ打开文件并使用READSEQ或READBLK命令读取。

Answer 4

OPEN '',FILENAME TO F.FILE ELSE STOP

SELECT F.FILE

 LOOP
    READNEXT K.FILE ELSE EXIT
    READ R.FILE FROM F.FILE, K.FILE ELSE NULL
    PRINT R.FILE
  REPEAT

  PRINT "All over Red Rover"

• 文件名应在引号中，即＆＃34; MYFILE＆＃34;或者＆＃39; MYFILE＆＃39;

• 循环将重复，直到所有记录都被读取，然后退出。