将comp-2转换为cobol中的字母数字

Question

我有一个包含几个COMP-2变量的字帖，我需要这些变量以字母数字形式用于DISPLAY目的。我尝试过移动，重新定义，移动到数字然后换算为字母数字，似乎没什么用。

Answer 1

这是一个程序：

   ID DIVISION. 
   PROGRAM-ID DISPLEXP. 
   DATA DIVISION. 
   WORKING-STORAGE SECTION. 
   01  SOME-NAME                    COMP-2. 
   01  SOME-OUTPUT                         PIC -9.9E-99.
   PROCEDURE DIVISION. 
       MOVE -2.3E-6                 TO SOME-NAME 
                                       SOME-OUTPUT 
       DISPLAY 
               ">" 
               SOME-NAME 
               "<" 
               ">" 
               SOME-OUTPUT 
               "<" 
       GOBACK 
       . 

输出结果为：

>-.23000000000000000E-05<>-2.3E-06<

如果你能澄清你的问题，我确定已经有了答案。