ibm-midrange - 偶然发现 FMTDTA (IBM i)

Question

我偶然发现了一些 FMTDTA，它似乎是一种查询/排序语言，早于旧 RPG 系统中的 SQL。我试图解开它的用法。

例子:

物理文件布局:

ORNO         S      9 0     1     9 Order No       
ORCSTNO      A     10      10    19 Custno        
ORDAT        S      6 0    20    25 Order Date     
ORAMT        S     12 2    26    37 Order Amt  

PF 源成员 ORDSRT 中的排序标准:

HSORTR    25A                      Keyfields are 25 characters long - Sort Ascending
FNC  20  25                        KEY 1: ORDER DATE              
FNC   1   9                        KEY 2: ORDERNO                 
FNC  10  19                        KEY 3:  CUST NO                 
FDC   1  37                        Take whole record (1-37)       

排序命令

FMTDTA INFILE((MYLIB/ORDHED)) OUTFILE(QTEMP/ORDHED)          
SRCFILE(MYLIB/MYSRC) SRCMBR(ORDSRT) OPTION(*NOPRT)       

结果:

按 DATE/ORD#/CUST# 成功排序

但是，FMTSRC 中还有其他几行我不确定它们的用途。例子:

FOU 
FOC
FNU
O C   1   1EQCD                    CANCELLED  
I C   8   8EQCB                    CREDIT NOTE
O C   1   1EQCX                    OMIT CANCELLED

Answer 1

这六行是什么意思:

FOU

Col 6: F 表示它是一个字段语句

Col 7: O 表示该字段是相反的控制字段

Col 8:U 表示该字段包含带符号的十进制数据，采用分区格式

FOC

Col 6: F 表示它是一个字段语句

Col 7: O 表示该字段是相反的控制字段

Col 8: C 表示字段包含字符数据

FNU

Col 6: F 表示它是一个字段语句

Col 7: N 表示该字段是正常控制字段

Col 8:U 表示该字段包含带符号的十进制数据，采用分区格式

O C   1   1EQCD                    CANCELLED

Col 6: O 表示省略

Col 8: C 表示因子 1 和因子 2 必须包含字符数据

Col 9: 1 是因子 1 的起始位置

Col 13: 1 是因子 1 的结束位置

第 17 列:EQ 意味着因子 1 必须等于因子 2

第 19 列:C 表示因子 2 是常数

第 20 列:D 是与因子 1 进行比较的常数或关键字

第 40 列:CANCELED 是一条评论

I C   8   8EQCB                    CREDIT NOTE

第 6 列:我的意思是包含

Col 8: C 表示因子 1 和因子 2 必须包含字符数据

Col 9: 8 是 Factor 1 的起始位置

Col 13:8 是因子 1 的结束位置

第 17 列:EQ 意味着因子 1 必须等于因子 2

第 19 列:C 表示因子 2 是常数

Col 20:B 是与因子 1 进行比较的常量或关键字

第 40 列:信用说明是评论

O C   1   1EQCX                    OMIT CANCELLED

Col 6: O 表示省略

Col 8: C 表示因子 1 和因子 2 必须包含字符数据

Col 9: 1 是因子 1 的起始位置

Col 13: 1 是因子 1 的结束位置

第 17 列:EQ 意味着因子 1 必须等于因子 2

第 19 列:C 表示因子 2 是常数

第 20 列:X 是与因子 1 进行比较的常量或关键字

Col 40: OMIT CANCELED 是一条评论

Reference