2016-05-06 2 views
1

Ich benutze Microfocus Net Express 5.1 (Cobol).Öffnen Sie eine Cobol index-sequentielle Datei mit dem Dateinamen in einer Variablen

Wenn ich einen Index-sequentielle Datei öffnen, möchte ich schreiben

open input xyzfile 

Meine Frage ist: Gibt es irgendwie eine Möglichkeit, einen Schreib den Namen „xyzfile“ in Variable zu setzen stattdessen

move "xyzfile" to var-file 
open input var-file 

Vielen Dank im Voraus

+3

'var-file' ist kein Dateiname. Im Abschnitt 'Dateikontrolle' können Sie die Datei einem Variablennamen zuweisen:' SELECT var-Datei ASSIGN TO Eingabedateiname' ... wobei 'Eingabedateiname' in Ihrem' Arbeitsspeicher' definiert ist . – lurker

+1

Ich bin mir sicher, dass dies in Ihrer Dokumentation behandelt wird. Wie @lurker es angedeutet hat, ist es die SELECT-Anweisung, die Sie betrachten müssen. –

Antwort

2

aus der Umweltabteilung;

environment division. 
    input-output section. 
    file-control. 
     select ConfigFile 
       assign to wFile-folder 
       organization is line sequential 
       file status is wStatus. 

aus Arbeits-Speicherabschnitt;

working-storage section. 
    01 wFile-folder    pic x(256). 
    01 wStatus      pic x(2). 

und unter Ihrer Verfahrensabteilung;

 move "c:\data\configuration.txt" to wFile-folder 
     open input ConfigFile 

     read ConfigFile record