如何在cobol中显示单引号

Question

我想使用显示语句显示这些单词 公司的政策但如果我使用它,它会将这些单词视为变量.我试过用了

DISPLAY "COMPANY'S POLICY"
DISPLAY 'COMPANY\'S POLICY' 

但都没有效果.怎么逃避这个单引号？

示例代码:

DFHMDF POS=(1,23),LENGTH=30,            
   INITIAL="company's policy"
   ATTRB=PROT

Answer 1

引用转义在COBOL中可以像许多其他语言一样工作.尝试:

DISPLAY 'COMPANY''S POLICY'

连续两个撇号表示单个文字撇号字符.要么:

DISPLAY "COMPANY'S POLICY"

使用引号作为外部字符串分隔符,允许您在文字中使用未转义的撇号

在DFHMDF内(严格来说这不是COBOL),您只能使用撇号作为文字分隔符.在这里你需要连续使用两个撇号.

          DFHMDF POS=(1,23),LENGTH=30,                                X            
                INITIAL='company''s policy',                          X
                ATTRB=PROT