代码之家 › 专栏 › 技术社区 › Yimin Rong

如何引用不明确的顶层变量?

disambiguation cobol

Yimin Rong · 技术社区 · 6 年前

在这段代码中,我想 ACCEPT 和 DISPLAY 01级 D 变量。而05级 丁 很简单, D OF F ,是否有方法指定01级别 丁 是吗?

最明显的解决方案就是改变变量名,但希望有更好的方法!

IDENTIFICATION DIVISION.
    PROGRAM-ID. DISAMBIGUATION-ISSUE.
DATA DIVISION.
    WORKING-STORAGE SECTION.
    01 D VALUE PIC 9(8). 
    01 F.
        05 Y PIC 9(4).
        05 M PIC 9(2).
        05 D PIC 9(2).
PROCEDURE DIVISION.
*> Errors here, D is ambiguous
    ACCEPT D.
    DISPLAY "Date: " D.
STOP RUN.

1 回复 | 直到 6 年前

Edward H 6 年前

恐怕在这种情况下,唯一的方法是更改变量名或使 01 -水平 D 进入一个从属项,例如

 01  D-rec.
     03  D PIC 9(8).
 ...
     DISPLAY D IN D-rec

推荐文章

sunleo · 这是否可以使用java将EBCDIC Comp-3文件转换为ASCII文件值?

7 年前

Bruce Martin · 如何为Cobol copybook生成java~jrecord代码

7 年前

SaggingRufus · 是否需要在我的JCL中指定所有文件?

7 年前

JOHN · 如何解决CICS中的PROG753错误?

8 年前

MC Emperor · 如何处理作为CALL语句参数的文字?

8 年前

Lena · 将字母转换为包含数字的字符串中的数字

9 年前

Sridhar · 用于cobol显示和解包数字字段的Java映射

9 年前

raz_user · 由尾随空格分隔的Cobol字符串

9 年前

Benjer · 有没有一种方法可以用现代Cobol写评论?[副本]

10 年前

user3401335 · 用cobol计算变量的长度字符串

10 年前