- 论坛徽章:
- 0
|
假设LIB/CHKLF为逻辑文件CHKLF的Object:
1、执行:DSPFD FILE(LIB/CHKLF) TYPE(*ACCPTH) OUTPUT(*OUTFILE) OUTFILE(QTEMP/CHKLF) ;
2、执行:WRKQRY ;
3、QRY指定“选择排序字段”;
4、选取APKEYN、APFILE、APBOF、APKEYF 4个字段来显示即可:
- 选择排序字段
-
- 输入最多 32 个字段名的排序优先级 (0-999) 和 A (升序)或 D (降序),
- 按“执行”键。
-
- 排序
- Prty A/D 字段 文本 Len Dec
- 10 A APKEYN 关键字段号: 1= 格式中的第一个关键字 3 0
- 20 A APFILE 文件 10
- 30 A APLIB 库 10
- 40 A APBOF 物理文件 10
- 50 A APKEYF 关键字段名 10
- APRCEN 检索世纪: 0=19xx, 1=20xx 1
- APRDAT 检索日期:年/月/日 6
- APRTIM 检索时间:时/分/秒 6
- APFTYP P=PF, L=LF, R=DDM PF, S=DDM LF 1
- APFILA 文件属性: *PHY 或 *LGL 4
- APMXD 已保留 3
- APFATR 文件属性: PF, LF, PF38 或 LF38 6
-
- 尚有 ...
- F3= 退出 F5= 报告 F11= 仅显示名称 F12= 取消
- F13= 布局 F18= 文件 F20= 重新编号 F24= 其余键
- 字段列表开始。
复制代码
5、可以很清楚看到LF中索引字段的名称:DBXLIB、DBXFIL;
- 显示报告
- 报告宽度 . . . . . . : 358
- 定位至行 . . . . . . . . . 移位至列 . . . . . . . . .
- 行 ....+....1....+....2....+....3....+....4....+....5....+....6....+....7..
- 关键字 文件 库 物理 关键字段 检索 检索
- 字段 文件 名 世纪 日期
- 号
- 000001 1 CHKLF LIB QADBXREF DBXLIB 1 060425
- 000002 2 CHKLF LIB QADBXREF DBXFIL 1 060425
- ****** *********** 报告结束 **********
-
-
-
-
-
-
-
-
-
-
-
- 底部
- F3= 退出 F12= 取消 F19= 左移 F20= 右移 F21= 分开
复制代码
6、对照CHKLF逻辑文件的DDS,证明结果是完全正确的。
- 列 . . . : 1 71 浏览 LIB/QDDSSRC
- SEU==> CHKLF
- FMT A* .....A*. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
- ******************** 数据开始 *****************************************
- 0001.00 A*
- 0002.00 A R RECOED PFILE(QSYS/QADBXREF)
- 0003.00 A*
- 0004.00 A DBXFIL
- 0004.01 A DBXLIB
- 0004.02 A DBXATR
- 0004.03 A DBXRDL
- 0005.00 A*
- 0006.00 A K DBXLIB
- 0007.00 A K DBXFIL
- ******************** 数据结束 *****************************************
-
-
-
-
-
-
- F3= 退出 F5= 刷新 F9= 检索 F10= 光标 F11= 切换 F12= 取消
- F16= 重复查找 F24= 其余键
- (C) COPYRIGHT IBM CORP. 1981, 2002.
复制代码 |
|