2016-03-30 88 views
-1

我需要編寫COBOL中的小程序的幫助。 我寫這段代碼:使用COBOL語言在文件中保存輸出

IDENTIFICATION DIVISION. 
PROGRAM-ID. CallC. 
DATA DIVISION. 
WORKING-STORAGE SECTION. 
01 INITBUF PIC X(10). 
01 SHOWBUF PIC X(10). 
01 BUF USAGE IS POINTER. 
01 NUM PIC 9(10). 
PROCEDURE DIVISION. 
MOVE 10 to NUM. 
CALL "getBuffer" USING BY VALUE NUM RETURNING BUF. 
CALL "initBuffer" USING BY VALUE BUF RETURNING INITBUF. 
CALL "showBuffer" USING BY VALUE BUF RETURNING SHOWBUF. 
DISPLAY SHOWBUF. 
STOP RUN. 

我怎麼去寫的DISPLAY結果到一個文件?

+1

以常規方式。將輸出重定向到一個文件。細節取決於你的操作系統,但搜索引擎很容易。 –

+0

此URL https://rosettacode.org/wiki/File_input/output幫助我 – Snorri

+0

嗯,你介意說明如何? –

回答

1

比爾。如下例所示聲明文件。將想要輸出的任何內容移動到輸出變量中,然後寫入輸出變量

ENVIRONMENT DIVISION.        
CONFIGURATION SECTION.       
INPUT-OUTPUT SECTION.        
FILE-CONTROL.          
    SELECT PARM-OUT    ASSIGN TO PARMOUT. 
************************************************* 
DATA DIVISION.         
FILE SECTION.          

FD PARM-OUT          
    RECORDING MODE F.        

01 PARMIN-REC.         
    05 PSID-IN   PIC 9(09).    
    05 PCID-IN   PIC 9(08).    
    05 IN-PCIDSEQ  PIC 9(03).    
+0

比爾是我嗎?如果是,爲什麼?你如何顯示影響DISPLAY語句? outputVar在哪裏? –

+0

好的。感謝您的建議。我在哪裏可以在Windows環境中測試我的代碼?在Windows中不可能嗎? – Snorri

+0

@Snorri如前所述,「窗口輸出重定向」。所提供的代碼與操作系統無關。它不會在任何操作系統上做你想要的。 –