如何在自然中制作多维数组?

问题描述 投票:0回答:2

是否在代码中重新定义了以下代码,使#JF-ARRAY为Natural中的一维数组。我想将其设置为5维数组,但不确定是否会是这样。

   myVariable (A5/7500)

或者是否有其他格式允许我执行此操作。

LOCAL                     
1 #JETFORMS-DATA (A7500)  
1 REDEFINE #JETFORMS-DATA 
  2 #JF-ARRAY (A1/7500)   

问题:如何用自然的方法制作数组?

mainframe adabas-natural
2个回答
1
投票

一点点搜索就显示出这一点:http://documentation.softwareag.com/natural/nat638vms/pg/pg_defi_array.htm

摘自文章:

定义一维数组

在格式和长度之后,指定斜杠,后跟所谓的“索引符号”,即数组的出现次数。

例如,下面的一维数组具有三个出现,每个出现的格式/长度为A10:

DEFINE DATA LOCAL 
1 #ARRAY (A10/1:3) 
END-DEFINE 
...

指定两个维度的索引符号:

DEFINE DATA LOCAL 
1 #ARRAY (A10/1:3,1:4) 
END-DEFINE 
...

二维数组可以可视化为表格。上例中定义的数组将是一个包含3个“行”和4个“列”的表:


0
投票

自然最多只能处理3个数组维。

例如,您可以像这样在3D中重新定义数据:

LOCAL 1     #JETFORMS-DATA (A7500)  
      1                                   REDEFINE  #JETFORMS-DATA 
       2    #JF-ARRAY      (A25/3,10,10)
© www.soinside.com 2019 - 2024. All rights reserved.