COBOL 怎么定义可变长度的字符串
答案:4 悬赏:80 手机版
解决时间 2021-11-20 00:31
- 提问者网友：嘚啵嘚啵
- 2021-11-19 16:28
COBOL 怎么定义可变长度的字符串
最佳答案
- 五星知识达人网友：一秋
- 2021-11-19 17:45
FD C1-FILE
BLOCK CONTAINS 10 RECORDS
RECORD IS VARYING IN SIZE FROM 1 TO 756 CHARACTERS
DEPENDING ON WK-C1-LENG
LABEL RECORD STANDARD
VALUE OF IDENTIFICATION IS C1-EFN.
01 C1-REC.
03 C1-REC-CONTENTS PIC X(756).
没有直接可变的、、、
BLOCK CONTAINS 10 RECORDS
RECORD IS VARYING IN SIZE FROM 1 TO 756 CHARACTERS
DEPENDING ON WK-C1-LENG
LABEL RECORD STANDARD
VALUE OF IDENTIFICATION IS C1-EFN.
01 C1-REC.
03 C1-REC-CONTENTS PIC X(756).
没有直接可变的、、、
全部回答
- 1楼网友：纵马山川剑自提
- 2021-11-19 20:13
可以按照如下两种方法定义：
1.
01 WK-CHAR-AREA OCCURS 0 TO 999 TIMES
DEPENDING ON WK-QTY
INDEXED BY WK-IDX.
05 WK-CHAR PIC X(1).
2.
01 WK-CHAR-AREA OCCURS WK-MAX TIMES
INDEXED BY WK-DX.
05 WK-CHAR PIC X(1).
1.
01 WK-CHAR-AREA OCCURS 0 TO 999 TIMES
DEPENDING ON WK-QTY
INDEXED BY WK-IDX.
05 WK-CHAR PIC X(1).
2.
01 WK-CHAR-AREA OCCURS WK-MAX TIMES
INDEXED BY WK-DX.
05 WK-CHAR PIC X(1).
- 2楼网友：不想翻身的咸鱼
- 2021-11-19 19:56
COBOL是没有可变长的概念
- 3楼网友：琴狂剑也妄
- 2021-11-19 18:56
vsam文件有变长文件的概念的；
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯