ASSIGN TO DISPLAY in SELECT Statement Returns Error 013
PSS ID Number: Q35828 Article last modified on 04-20-1993
3.00 | 3.00 MS-DOS | OS/2
| The information in this article applies to: |
| - Microsoft COBOL for MS-DOS and OS/2, version 3.0 |
Summary: Using the ASSIGN TO DISPLAY clause in the SELECT statement returns a run-time system error 013 “File not found” message. Microsoft has confirmed this to be a problem in Version 3.0. This problem was corrected in Version 3.0a. Note: ASSIGN TO DISPLAY is not supported in versions of COBOL earlier than Version 3.0.
More Information: The following is a code example: ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT OUT-FILE ASSIGN TO display ORGANIZATION IS LINE SEQUENTIAL. DATA DIVISION. FILE SECTION. FD OUT-FILE LABEL RECORDS ARE omitted. 01 OUTPUT-RECORD PIC X(80). WORKING-STORAGE SECTION. 01 DETAIL-LINE PIC X(80) VALUE “This is a test.”. PROCEDURE DIVISION. 000-MAIN. OPEN OUTPUT OUT-FILE. WRITE OUTPUT-RECORD FROM DETAIL-LINE AFTER 1. CLOSE OUT-FILE. STOP RUN.
Additional reference words: 3.00 Copyright Microsoft Corporation 1993.
