Cobol Files Examples
GnuCOBOL supports both fixed and free source format. COBOL Source colouriser for Visual Studio Code What is this? Syntax highlighting for COBOL, JCL, PL/I and MF directive files. Explanations of user-supplied information (lowercase text in the example) are shown after the code. select in-file assign to "input. COBOL code to write data to PS; COBOL code to read KSDS dynamically; COBOL File IO for record replace; COBOL Single dimention search; COBOL program to illustrate Picture clause; COBOL program to display onsize error; COBOL program showing Round off decimal; COBOL program to split input from JCL instream. It has often been noted that the richness of the COBOL language in its Micro Focus. Figure E-1 Metadata Example in COBOL E. When an application ABEND (ABnormal END-of-job) occurs, Z/OS stops executing your program, closes files and buffers and generates a single high-level message in the form of a System Completion Code (Sxxx). 1 for Windows NT. An example is the code for type of employee, F for full time, P for part time, C for consultant and. Sounds like you should be concentrating on inserting another COBOL process into the mix to provide those 'COBOL' files in a platform- and language- independent format, such as XML for example. file section. identification division. How can i do that? the way do in COMP-3 format. OpenCOBOL implements a substantial part of the COBOL 85 and COBOL 2002 standards, as well as many extensions of the existent COBOL compilers. What is this not? An Integrated Development Environment for COBOL. Community Help: Cobol File Read Example - Example of opening and reading file with Cobol. 05 NEXT-YEAR PIC 99. Pass to the COBOL compiler. Save the file to your system, copy it onto the mainframe, modify to suit your files and any additona business logic, and you should be ready to run. COBOL Tutorial studay material - sample cobol indexed file writing program. Make a difference, get advice, join discussions, find solutions, and exchange ideas. This output is very minimal, and the program can run for several hours. txt" organization is line sequential. Free COBOL Programs for Download. program-id. It has often been noted that the richness of the COBOL language in its Micro Focus. Let's establish an example to compute the tax of a US citizen. Using Line Sequential and Indexed Files-Sample 4 Screen Input-Output Using the Screen Section-Sample 5 Calling COBOL Subprograms-Sample 6 Receiving a Command Line Argument-Sample 7 Environment Variable Handling-Sample 8 Using a Print File-Sample 9 Using a Print File (Advanced usage)-Sample 11 Remote database access-Sample 12. Both of these examples can be used as a template for a Spark job application. 13: 1998/01: MQSeries COBOL (MVS) Sample Code. As well as an editor. You should look at how to define your VSAM files for serial processing. cobol forum. environment division. Chapter 3: COBOL File Organizations. Sample COBOL and CICS Programs like Hello World, Y2K Problem solving, 4 digit year conversion, world time calculator. The example GETNAMES COBOL program above contains these compiler directives within the source. We also call INPUT-OUTPUT as the Logical files in the Program. It shows how to open the file, define the file, and read the file. The Input Storage Area is the place in the COBOL Program, where the data arrives and get stored, from a File, out here for the INPUT-FILE it is EMPLOYEE-INPUT-RECORD. Here is the COBOL ILE program called TEST2. bat file which is listed in the next section, for building a MERANT Micro Focus COBOL sample file: For release 9. 01 WS-INFILE-SW PIC X (02) VALUE SPACES. Cobol Examples and Tutorials. Pro*COBOL supplies the makeit. select out-file assign to disk organization is line sequential. This sample program takes a sigle record from the file specified by user at the offset specified by user and interpretes it according to the specified RDD file. This name of the file is used only inside the cobol program) used in a file's FD entry is connected to an external file (Actual physical file on disk or tape) by means of the SELECT and ASSIGN clause. For example, if you specify a COBOL program file named account. Rather, to construct an INDEXED (or RELATIVE) file, you would create it via the execution of some COBOL program in which the file is opened for OUTPUT and records are written to that file. What are the different data types in COBOL? There are three data types in Cobol: Alpha-numeric (X) Alphabetic (A) and; Numeric (9) 3. The COBOL source file itself consists of four divisions: IDENTIFICATION DIVISION, ENVIRONMENT DIVISION, DATA DIVISION, and PROCEDURE DIVISION. This is a very common task in my workplace. As long as the REPRO completes normally, you will not get a 97 when COBOL opens the file as the REPRO closed the file properly. Provided support for the Pension Payroll Management System (PPMS) and Payroll Management System (PMS). COBOL examples This collection of topics is taken from the WebSphere® MQ for z/OS® sample applications. suffixes=cbl,cpy sonar. Alternatively, they can be provided in an ecobol. Although not commonly seen in COBOL files, you can mix types in a field. reading and writing large XML documents in COBOL. after another, like cards in a dealing show. Although COBOL can be used to process these other kinds of data file, it is generally used only to process record-based files. obj but first receive prompts for the listing files, enter:. File extension is important because the build process (sequence of translators) defined for language "Cobol Batch Demo" just apply to the files with extension "cob" stored in RTC SCM unless a file is associated with a language definition explicitly though a file property. You can convert Cobol copybook (include file) that contains an FD statement with file`s record layout by using "File. This is an example of how a COBOL program can read from an Indexed file (or a VSAM KSDS) and write to a sequential file (ASCII/Text or Record Sequential) containing HEX dump information of a data structure with Text, Packed and Binary Data Strings (or User Defined Fields). The Editor uses a Record-Layout description to format the files. In this case it is used as is, with no conversion to upper case. And the list could go on. How do you reference the following file formats from COBOL programs: Fixed Block File - Use ORGANISATION IS SEQUENTIAL. Records in this file are accessible in sequent- ial , dynamic & random mode. Posted: Sat Feb 28, 2009 1:07 am Post subject: Reply to: COBOL program for unknown Input file length Just to add my piddly little thoughts. fd tran-file label records are standard. Each file description entry or sort-merge description entry is followed by one or more record description entries. INPUT-OUTPUT SECTION. Attempt to read from a file after reaching EOF. after another, like cards in a dealing show. Building the Sample Programs. Mainframe) file formats, both Text and binary files. NET applications. - Reading files sequentially is probably the most common access method for COBOL programs. We get a file from a different sever which I m not sure if it is windows or some other mainframe but it s copied to our mainframe as a sequential file as a VB file. Alternatively, they can be provided in an ecobol. They are applicable to all platforms, except where noted. I am currently getting file status code 39 which means. - Selection from PROGRAMMING IN COBOL/400: 2nd Edition [Book]. Best 5 cURL Files Download Examples. Design specification of an assembler with diagram? Ans. Covers topics like types of file organization, Sequential file organization, Indexed sequential file organization, Relative file organization etc. Cloud Class® Course: Python 3 Fundamentals. If external-file-reference contains one or more hyphens, all characters up to and including the last hyphen are ignored. In this, and subsequent file-oriented tutorials, we examine how COBOL may be used to process record-based files. The Input Storage Area is the place in the COBOL Program, where the data arrives and get stored, from a File, out here for the INPUT-FILE it is EMPLOYEE-INPUT-RECORD. COBOL - Data Layout - COBOL layout is the description of use of each field and the values present in it. While learning the basics of 'File' in COBOL, the concepts of both languages should not be corelated. Ref TekTalk. This article also includes examples of COBOL file layout, target tables, and some basic COBOL terminology so you can work with your COBOL files effectively. Codes beginning with a '1' are considered "at end" messages, those beginning with a '2' are considered "invalid key" messages, File Status Codes beginning with a '3' are considered "Permanent Errors", keys like '4x' are "Logical Errors" and '9x' are "Implementer defined". This program can be compiled and executed using JCL on Mainframes where it will display all the records present in the file. Therefore, VS data between dissimilar computers may be incompatible (e. A SECTION is further divided into PARAGRAPH. 01 WS-INFILE-SW PIC X (02) VALUE SPACES. What is it useful for? Quick viewing of COBOL source and edit. 0, the batch files are located in ORACLE_BASE\ORACLE_HOME \precomp\demo\procob2. Figure E-1 Metadata Example in COBOL E. This name of the file is used only inside the cobol program) used in a file's FD entry is connected to an external file (Actual physical file on disk or tape) by means of the SELECT and ASSIGN clause. The SELECT clause chooses a file in the COBOL program to be associated with an external data set. The cobol file stores various data used for internal purposes of the Micro-Focus Cobol. It is help us following categorize: healthcare, e commerce, programming, it consulting, retail, manufacturing, CRM, digital supply chain management, Delivering high-quality service for your business applications,. But I seriously doubt any claims making it to be the “dark matter of programming languages”. Net, XML, and more COBOL8M: Example COBOL Programs and Tutorials Murach Publising: Source code from Murach's Structured COBOL U of Regina (Canada) : Cobol tutorial with example Code (Warning: dated material). You cannot, however, decide at run time that you need six SELECT statements since the COBOL code must be compiled and the number of SELECT statements will be fixed when the compile is done. The SELECT clause chooses a file in the COBOL program to be associated with an external data set. We can immediately FREE the file, since the file data has now copied to an internal variable. cobol documentation: Simple READ from FD. Change the File name to LGICUS01 • Execute a batch COBOL functional test. select in-file assign to disk organization is line sequential. It is not a beginner level text, but covers the most advanced modern facilities of the current COBOL compilers. Example of using Rebuild to convert a file Example of validating the structure of an indexed file Example of a Rebuild options file Example of calling Rebuild from a COBOL program Example Relative File Definition Sequential Files Example Record Sequential File Definition - Fixed Length Records. The Editor uses a Record-Layout description to format the files. 05 ORDDATE PIC X(10). I much prefer to write my GUIs without GUIDE for many reasons, only one of which is that I need to keep track of only one file!. The example shows the XML content of a file, the program that reads and submits XML text to the parser, and the sequence of events that results from parsing the input records. COBOL was developed in the year 1960 bythe CODASYL Committee (Conference on Data Systems Languages). – Inside these three vials is a potion that allows to determine degree of relationships between people, all it's needed is a sample of DNA from both people and then to pure the potion at parchment. Posted: Wed May 25, 2005 10:20 am Post subject: Need an Example Program to use VSAM KSDS File Organization I want cobol file programming methods. 01 DFHCOMMAREA. What is it useful for? Quick viewing of COBOL source and edit. You will find lots of easy to understand tutorials, articles, code, example for Cobol. Each sample includes a README file that contains detailed information for setting up and executing the samples. This example demonstrates how a multisegment mainframe file can be read in Spark. Create directory named COBSAMPLES under drivename\Program Files\Fujitsu COBOL. COBOL to Java Example The following shows the translation of a small COBOL program to Java using SoftwareMining migration tools. , Lincoln, CA. Re: Reading a file in COBOL Thanks to sharing another one example is: It also shows how to check the open and read to make sure it was successfull. These intrinsic functions are provided as a facility of the compiler and runtime system. Share your own experience View front page This cobol example will show the basics for reading a file. For example, a condition can be expressed as x IS GREATER THAN y or more concisely as x GREATER y or x > y. You just write out your JCL syntax to a file and assign it how to submit a. There are several different versions of COBOL. File Handling in COBOL File: A file is a collection of data related to a set of entities and typically exists on a magnetic tape or a disk. tools forum. Run the program and click the "Try It" button. Pro*COBOL supplies the makeit. fd out-file data record is out-record. Save the file to your system, copy it onto the mainframe, modify to suit your files and any additona business logic, and you should be ready to run. jar ) and the specific database JDBC driver must be present on the CLASSPATH. suffixes=cbl,cpy sonar. The Cobol Report-Writer must be used to create the report. The Input Storage Area is the place in the COBOL Program, where the data arrives and get stored, from a File, out here for the INPUT-FILE it is EMPLOYEE-INPUT-RECORD. COBOL Tutorial studay material - sample cobol sequential file writing program. The Input Storage Area is the place in the COBOL Program, where the data arrives and get stored, from a File, out here for the INPUT-FILE it is EMPLOYEE-INPUT-RECORD. The C# application will pass it a number of occurrences to create in the table (much like a user requesting a specific number of months to report on). For an EBCDIC file, use the cobol. and use OPEN I-O data-file. You can write the SELECT statements for all nine SYSINx files -- the system won't actually attempt to access them until opened. - When your program requires file processing,…such as reading a series of records and then creating…a report, it is important to make sure that you read…every record in the file. In COBOL, to use this trick requires "reading into" or reading and then moving data to a record in the working storage section. Access and Excel are Microsoft applications and they use multiple file formats, none of which are suitable for COBOL indexed files. select input-file assign to ' cob2csv. Posted: Wed May 25, 2005 10:20 am Post subject: Need an Example Program to use VSAM KSDS File Organization I want cobol file programming methods. This chapter explains the available COBOL file organizations and gives examples of using them. Free COBOL Programs for Download. Applied COBOL programming experience to a Cognos environment to identify value-added features. A good example of this is "Sub Files" these are only available id workstation files, so if you tried to perform a subfile operation on a database file the compiler would tell you and not compile! Libraries hold the actual object. This is a very common task in my workplace. Chapter 3: COBOL File Organizations. suffixes=cbl,cpy sonar. If you don't understand this, you can safely ignore the "indexed by…" clause, unless you are programming in COBOL. ENVIRONMENT DIVISION. GnuCOBOL (formerly OpenCOBOL, and for a short time known as GNU Cobol) is a free implementation of the COBOL programming language. Requires SoftwareMining. In this post we will try to explore a sample program, which creates a variable length file using the COBOL Occurs Depending on clause. to go "belly-up" because of an example passed on to him by an older hand. obj but first receive prompts for the listing files, enter:. COBOL tutorial for beginners and programmers - Learn COBOL with easy, simple and step by step tutorial covering notes and examples for computer science students on important concepts like Data types, Basic Verbs, Data layout, Conditional Statements, Iterative Statements, String Handling, Table, File Handling etc. These kinds of errors will normally result in termination of the program run, whereas using File Status can allow the programmer to deal with any such problems without the program run stopping and returning to the operating system. And the list could go on. For example, the following command will take the COBOL source from \src\cbl and do the compile process under c:\temp\compile: cblbld c: \temp\compile Make note of the information that is displayed on the screen while the process is running; it provides the locations of important files that you will need to examine. NET environment have been circulating for a number of years. COBOL programming site with a comprehensive set of COBOL tutorials making a full COBOL course as well as COBOL lecture notes, COBOL programming exercises with sample solutions, COBOL programming exam specifications with model answers, COBOL project specifications, and over 50 example COBOL programs. COBOL was developed in the year 1960 bythe CODASYL Committee (Conference on Data Systems Languages). Working with Variable Length File Fixed length files are the ones that have fixed record lenth. cobol documentation: COMP-3. How to write records into VSAM file. The only prerequisite is that you know how to develop mainframe COBOL programs that process indexed files. code for program to sort the records of file in cobol identification division. I am currently getting file status code 39. A similar case is the NEC V30 and V20 CPUs, enhanced copies of the Intel 8086 and 8088, respectively. FILE SECTION. An example, tutorial, and discussion of COBOL In Line Perform. Below are the different examples on different cases and syntax which are very useful while coding a cobol program. JSON Thunder - How It Works Thunder generates all of the source code required for COBOL programs to interface with JSON. As well as an editor. The ORGANIZATION clause. Sample COBOL DATE Program for Mainframe Projects. 5 and now 4. Possibly i misunderstand what you are looking for. Insight Global Inc. We will be validing transactions to update to our inventory file. configuration section. Several examples of how to utilize COBOL in a Microsoft. ALLInterview. Mainframe Cobol Tutorial Part 8,This cobol tutorial is basics tutorial on Files, it gives introduction to Files concept and gives a basic idea to start working on files in cobol programming. Tallying and count options. For example, a master file may contain the entire data about the employees, payroll, or other applications of…. It includes all dependencies to run the job locally and on cluster. example of multiply verb in cobol. Three files are used in the sort process in COBOL − Input file is the file which we have to sort either in ascending or descending order. While learning the basics of 'File' in COBOL, the concepts of both languages should not be corelated. Mainframe) file formats, both Text and binary files. Normally, FTP is run in scripting language such as ksh or by the job. c file, with make and make clean rules, looks something like this (remember to add a TAB character before the command part):. A table is stored in memory as a contiguous block of bytes. png?root=atlantic-zoos ] ASCII [comp. Entire Mainframe Materials and Tutorials,Mainframe interview question and Mainframe Jobs,Mainframe Related news. Example: If and End-If. Attempt to close a file that was not opened. aka Windows, Linux. program-id. Following are the data description entries used in COBOL −. You can define the external name with a DD statement or an environment variable. The default format is the fixed format. * ACU: WANG Cobol * SEQ: Sequential Cobol data files, * Your file format: ask us to add your file format, if Data-Viewer does not recognize it. The configuration of the pipeline is something that the application developer rarely needs to know about. The COBOL DLL manipulates the retrieved data as required, then passes the data back to Visual Basic. The example GETNAMES COBOL program above contains these compiler directives within the source. The newest is from 2002. I have been assigned in my firm to extract our old financial data from files read by cobol programs and turn them to a database in our oracle DB. Example simple Makefiles for a C (or C++) The most simple Makefile for compiling a C (or C++) program from a single. Several examples of how to utilize COBOL in a Microsoft. GnuCOBOL supports both fixed and free source format. Author: IBM. What is this not? An Integrated Development Environment for COBOL. OpenCOBOL is an open-source COBOL compiler. x=60 The record. The ASSIGN clause associates the program's name for the file with the external name for the actual data file. I frequently store static data, constants like rates, prices, categories, options in COBOL arrays in WORKING STORAGE, rather than hard-coding at many places. In COBOL, to use this trick requires "reading into" or reading and then moving data to a record in the working storage section. COBOL User Groups (COBUG ): A source of COBOL program examples, including examples of client/server, database, Java, COBOL. Explanations of user-supplied information (lowercase text in the example) are shown after the code. End of Note. NET applications. For now though, I’ll keep using my good ol’ "COBDUMP" routine. Java Project Tutorial - Make Login and Register Form Step by Step Using NetBeans And MySQL Database - Duration: 3:43:32. COBOL File handling verbs - Tutorial to learn COBOL File handling verbs in simple, easy and step by step way with syntax, examples and notes. cobol YouTube This modified text is an extract of the original Stack Overflow Documentation created by following contributors and released under CC BY-SA 3. OpenCOBOL is an open-source COBOL compiler. Add-ons are programs that extend the capabilities of Internet Explorer, for example, toolbars or programs that let you accomplish tasks such as making hotel reservations or searching the Internet. 5 and now 4. cobol YouTube 2019. Question: I would like to understand the basics of how to write and execute Cobol program on Linux OS. File Handling in COBOL File: A file is a collection of data related to a set of entities and typically exists on a magnetic tape or a disk. You can take advantage of a variety of options to control the translation of a COBOL File Description to a Master File. Rather, to construct an INDEXED (or RELATIVE) file, you would create it via the execution of some COBOL program in which the file is opened for OUTPUT and records are written to that file. Attempt to open a file, which is already open. The Record length is 225, and the Block size 27998. The processing checks the value of the indicator to make sure that end of file has not been reached before each performance of the loop. They provide an interface to legacy files. forum list. csv file, making it very easy for COBOL to use a spreadsheet as input. Your COBOL source file may already be in the COBOL file format, or it may be a COBOL copybook. After checking a certain reviews on Australian websites, I put my trust in allassignmenthelp. how to submit a jcl by cobol program. GUIDE works by generating two files, an M-File which has the code, and a figure file which has the graphics. I only recently learned of the JOSS language, and then only through a roundabout fashion from an interview with David Ahl where he mentions FOCAL. file-control. For batch-oriented updates validation merely tests the form of the data. html ] Lexemes COBOL has hundreds of reserved words they are not listed. At the time there were a few examples out in the world of how to perform this conversion. Note: Each line in these files consist of. Sample COBOL and CICS Programs like Hello World, Y2K Problem solving, 4 digit year conversion, world time calculator. 3 Source format. Define a Java/EJB service interface to access a COBOL application, deploy it to Enterprise Server, generate and run a client to access the application. It is the final output of the Sort verb. These are simply two different ways of doing GUIs in MATLAB. ask a question on forum. The record length is fixed in the VSAM file, fixed in the COBOL progam, but the two lengths are different. Re: Cobol Source Code example - Help Please -- It sounds like the program compiled with one file and is running with another. cbl, the default filename for the schema created by cbl2xml is account. In that same folder, create the fixed-width ("COBOL-style") file called EMPLOYEE. Example of Using FORMATFILE Files in an ILE COBOL Program. data division. code for program to sort the records of file in cobol identification division. The File Section header is followed by file description entries or sort-merge file description entries consisting of a level indicator (FD and SD, respectively), a file-name and a series of independent clauses, terminated by a period. ie if file is specified with the record width of 80 then all the records will have same width. In COBOL, to use this trick requires "reading into" or reading and then moving data to a record in the working storage section. The ASSIGN clause associates the program's name for the file with the external name for the actual data file. Sort both files on accnum and then download the sample 2-file match/merge code from the "Sticky" at the top of this COBOL part of the forum. 2x Safir / Saphire - Rund facettiert Orange paar 1,81ct. In the next example, the screen is being used to display data from a file. Syntax of READ Format/Example 2 for Sequential Files START File in COBOL If we want to position the pointer at a specific position in INDEXED or RELATIVE ORGANIZATION, we have to use START operation. and where do we use static call pls give any example pls ?. FILE-CONTROL. These examples are provided to allow you to not only experience the IBM Z® Open Editor , but also in conjunction with the Zowe VS Code Extension. This is called the Fixed Format Mode. For library-name-1, the library name is converted to upper case before use. 05 ORDDATE PIC X(10). subroutine that was the winning entry in a GNU COBOL programming contest. At the time there were a few examples out in the world of how to perform this conversion. How do you reference the following file formats from COBOL programs: Fixed Block File - Use ORGANISATION IS SEQUENTIAL. * Increased coverage of ILE COBOL and subfiles. For example, a COBOL file may include data about four different financial quarters, each stored in the same record. The Inevitable Return of COBOL. It is the first and only mandatory division of every COBOL program. 88 WS-EOF-NO VALUE 'N'. Although it is considered a legacy program. We refer file as PS in Mainframe environment. Compile Command RM/COBOL Commands. 5 Sample 4: Screen Input-Output Using the Screen Section Sample 4 demonstrates using the Screen Section (the "screen handling function") to display and accept data. For example, a condition can be expressed as x IS GREATER THAN y or more concisely as x GREATER y or x > y. For batch-oriented updates validation merely tests the form of the data. Examples: In the examples we will assume that we are doing an inventory pricing program and that we want to fill a table with the price of the 6 items that we carry. If you mean the files you define in your COBOL program using file-control entries, etc, then no, they aren't in an Access or Excel format. The ASSIGN clause associates the program's name for the file with the external name for the actual data file. 88 WS-EOF-NO VALUE 'N'. Resolving the problem The following is an example of a COBOL program that loads a subfile one page at a time:. file section. dat using RDD file file. cics forum. I am currently getting file status code 39. I was given a sample from my professor, but I couldn't do anything constructive. WORKING-STORAGE SECTION. Sample COBOL and CICS Programs like Hello World, Y2K Problem solving, 4 digit year conversion, world time calculator. File handling in COBOL - II But if you wanted to produce a sorted file that only contained, for example, product numbers which begin with a '1', you would use an. Attempt to close a file that was not opened. PS files will be discussed in this module. Share your own experience View front page This cobol example will show the basics for reading a file. Following are the data description entries used in COBOL −. COB is defined as COBOL Source Code (file name extension) frequently. Free COBOL Projects for Download. obj but first receive prompts for the listing files, enter:. Cobol programmer, May 2000 - July 2005. International Technical Support Organization XML Processing Options on z/OS December 2009 SG24-7810-00. Check link below https://youtu. COBOL iSeries (AS400) Code Examples >iSeries(AS400) Sample COBOL Programs Several sample iseries(as400) COBOL programs. Example resumes of Cobol Programmers list duties such as the following: designing and coding new programs, designing and coding reports based on user requirements, and creating PowerPoint presentations on the functionality of certain programs. Production Support/Application Testing/Software Defect and IBM Mainframe COBOL ABEND Research. NET applications. The example in the manual is written in RPG but the same principles apply to COBOL. Open library with source code for OpenCobol, GnuCobol AS 400 COBOL, CL, CLP, CLLE, CBLLE - Martinfx/Cobol. ü Single record format Non-join logical file: If a logical file is derived from single physical file it is called simple logical file. The data is read from a disk file and then displayed on the screen. For example, in your programs we have used an indicator to tell whether we have reached end of file. identification division. Extract Record Layout from Cobol Program. INVALID KEY statement. suffixes=cpy sonar. 2 Hospital Database Example Foot 1 The following are the full source files for the Hospital database example that is used in Hierarchical Modelling and Constructing DLI Commands from SQL Requests. They are applicable to all platforms, except where noted. SORT verb is available for sorting/merging any number of files in COBOL. Delimited by Size Space or comma with suitable samples. data division. 88 WS-INFILE-EOF VALUE '10'. 02 sort-city pic x(12). READ sample-file INTO identifier. File Status.