2015-03-31 41 views
0

我有一個帶有幾個COMP-2變量的副本,需要以字母數字形式用於DISPLAY目的。我嘗試過移動,重新定義,移動到數字,然後到字母數字,似乎沒有任何工作。將comp-2轉換爲cobol中的字母數字

回答

3

這裏有一個程序:

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< 

如果你能澄清你的問題,我敢肯定有提供一個答案。

+0

工作得很好。感謝您的答覆。 – Radix