【问题标题】:Retrieve all records from universe database using universe basic subroutine使用 Universe 基本子例程从 Universe 数据库中检索所有记录
【发布时间】:2015-01-19 13:03:39
【问题描述】:

我只是想知道如何使用 Universe 基本子程序从 Universe 数据库表中检索所有记录。我是 Universe 新手。

【问题讨论】:

  • 嗨帕拉夫,你看到我的回答了吗?这有帮助吗?你试过了吗?
  • 是的,但它不起作用。
  • 请在此电子邮件中发送错误消息和日志/跟踪文件:u2askus@rocketsoftware.com

标签: universe u2 u2netdk rocket-u2


【解决方案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

【讨论】:

    【解决方案2】:

    你能提供更多关于你想要做什么的信息吗?

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

    基于评论的新内容:

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

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

    或者,由于这是 19 类文件,您可以使用顺序读取。使用 OPENSEQ 打开文件并使用 READSEQ 或 READBLK 命令读取。

    【讨论】:

    • 我创建了一个类型为 19 的文件并插入了一些值,并尝试使用基本子例程检索所有值,您能否建议我提供示例示例。谢谢
    • 您好 Pallav,请将您的子程序代码和 .NET 代码 (C#\VB.NET) 发送给我们。我们将尝试解决这个问题。您是否下载了 U2 Toolkit for .NET v2.1.0 Provider?
    • 感谢 Mike 和 Rajan 的建议,我会尝试希望它会起作用。 @RajanKumar 我没有使用任何 VB.NET 代码
    【解决方案3】:

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

    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

    【讨论】:

      【解决方案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"
      
      • 文件名应该用引号括起来,即“MYFILE”或“MYFILE”

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

      【讨论】:

        猜你喜欢
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 2020-10-15
        相关资源
        最近更新 更多