cobol Open-IO : 존재하지 않는 파일 만들기

IO 파일이 존재하지 않으면 열려고하면 cobol이 throw하는 예외를 어떻게 잡을 수 있는지 아이디어를 얻은 사람이 누구인지 알 수 있습니까? 파일?cobol Open-IO : 존재하지 않는 파일 만들기

2009-12-16 user211992

SELECT OPTIONAL FILE-A 
    ASSIGN TO "INFILE" 
    ORGANIZATION INDEXED.

OPEN IO 파일의 경우 여기에

은 매일 실행 작업에서 미리보기입니다 필요한 경우 생성됩니다. OPEN INPUT의 경우, 파일은 생성되지 않고 EOF로 취급되며 모든 임의 읽기는 "INVALID KEY"가됩니다.

저는 이것이 ANSI 표준 절인 것이 확실합니다. 그러나 이것이 언제 나타나는지 기억하지 못합니다.

출처

2009-12-16 23:46:07

좋은 답변 - OPTIONAL 절이 COBOL-85 표준에 지정되어 있다고 생각합니다. z/OS에서 작업하는 경우 CBLQDA (ON) runtme 옵션을 추가해야합니다 (기본값은 OFF 임). CICS에서는이 옵션을 사용할 수 없습니다. – NealB

어떤 Cobol 버전을 사용하는지 또는 어떤 플랫폼을 사용하는지 알 수 없습니다. 내 프로그램은 먼저 파일을 열려고 시도하기 전에 파일이 있는지 확인합니다. Unisys Cobol 85를 MCP 메인 프레임 플랫폼에서 사용합니다. 메시지는 절름발이지만 누가 신경 쓰나요?

968545  IF ATTRIBUTE RESIDENT OF OU3-WORK-LIST-FILE = VALUE TRUE 
968550   DISPLAY "PROGRAM SHOWS ATTRIBUTE TRUE"     
968555   OPEN EXTEND OU3-WORK-LIST-FILE       
968560  ELSE              
968565   DISPLAY "PROGRAM SHOWS FALSE"       
968570   OPEN OUTPUT OU3-WORK-LIST-FILE       
968575  END-IF.              
968580

캐시 선택 (SELECT) 원인에 대한 선택적인 문구는이 작업을 수행합니다

출처

2009-12-16 22:38:17

cobol Open-IO : 존재하지 않는 파일 만들기

답변

관련 문제