在 Progress-4gl 中读取 XML 文件到临时表

Question

我正在使用 OpenEdge 10.2A。

我的 XML 文件只有一个 TABLE_NAME 记录，它有很多字段，但简化版本是：

<Table_Name>
    <Field_Name_1>Value_1</Field_Name_1>
    <Field_Name_2>Value_2</Field_Name_2>
</Table_Name>

为了阅读，我使用了代码：

DEFINE TEMP-TABLE Table_Name NO-UNDO
    FIELD Field_Name_1 AS CHAR
    FIELD Field_Name_2 AS CHAR
.

TEMP-TABLE Table_Name:READ-XML("File","C:\myFile.xml","empty",?,?,?,?).

DEF VAR i AS INT NO-UNDO.
FOR EACH Table_Name: 
    i=i + 1.
END.
DISP i.

它显示 0（零）作为结果，这意味着它不读取文件中的 XML 记录。

如果我按如下方式更改我的 XML 文件：

<My_XML_Records>
      <Table_Name>
          <Field_Name_1>Value_1</Field_Name_1>
          <Field_Name_2>Value_2</Field_Name_2>
      </Table_Name>
</My_XML_Records>

同样的代码显示1（一）

由于XML文件是由其他程序生成的，格式是固定的，有没有办法让代码正确读取XML文件？

Answer 1

这似乎是一个已知的错误，我找到了一个知识库条目： https://knowledgebase.progress.com/articles/Article/How-to-read-an-XML-in-a-temp-table-using-READ-XML

解决方法：在您的 XML 中，您将需要一个带有数据集名称的外部节点。像这样：

<dataset_name>
    <Table_Name>
        <Field_Name_1>Value_1</Field_Name_1>
        <Field_Name_2>Value_2</Field_Name_2>
    </Table_Name>
</dataset_name>

然后为您的临时表定义一个数据集。代码如下：

DEFINE TEMP-TABLE Table_Name 
    FIELD Field_Name_1 AS CHAR
    FIELD Field_Name_2 AS CHAR
.

define dataset dataset_name for table_name.

dataset dataset_name:read-xml("File","C:\myFile.xml","empty",?,?,?).
DEF VAR i AS INT NO-UNDO.
FOR EACH Table_Name: 
    i=i + 1.
    DISP Field_Name_1 format "x(20)" 
         Field_Name_2 format "x(20)".
END.
DISP i.

我用它加载了数据集。