Record description for the variable-length records, COBOL Programming

Record Description for the Variable-length Records:

When the variable- length records consists of records of various lengths, each record type is to be explained at level 01 following the FD entry for the file. The variable part is defined with the OCCURS...DEPENDING clause.

FD VARIABLE-FILE

            RECORD CONTAINS 40 TO 92 CHARACTERS

            BLOCK CONTAINS 933 TO 1024 CHARACTES

            LABEL RECORDS AERA ATANDARDA

            RECORDING MODE IS V

            VALUS OF INDENTIFICATION IS "VARFILE".

01 VARIABLE-RECORD.

            02 ACCOUNT-NUMBER    PIC 9(6).

            02 NAME  PIC  X(20).

            02 NO-OF-PAYAMENTS    PIC 9.

            02 PAYMENTS    OCCURS 1 TO 5 TIMES DEPENDING ON

               NO-OF-PAYMENTS   INDEXED BY TAB-INDEX.

               03 DATE-OF-PAYAMENT   9(6).

               03 AMOUNT-OF-PAYMENT  9(5)V99.

Posted Date: 10/17/2012 8:08:41 AM | Location : United States







Related Discussions:- Record description for the variable-length records, Assignment Help, Ask Question on Record description for the variable-length records, Get Answer, Expert's Help, Record description for the variable-length records Discussions

Write discussion on Record description for the variable-length records
Your posts are moderated
Related Questions
CR and DB (Credit and Debit Sign): The two characters that is CR or DB symbol may appear only at the rightmost place of the picture. They are similar to the minus sign edit ch

PROGRAMS FOR REDEFINES CLAUSE: We have to write a simple program to explain the REDEFINES clause at 01 level. identification division. program- id. Redef. environment

Example of File-control: The assign clause assigns a specific physical peripheral device name to a file. The physical peripheral device are machine-dependent. We use the devic

UPDATING OF THE RELATIVE AND INDEXED FILES: The Sequential files are updated by creating a new master file from an existing old master file and a transaction file. Such an Upda

PICTURE specification: The size of a group item is equivalent to the total of the sizes of all the subordinate elementary items. The group item class is alphanumeric. The i

Data Names and Identifiers:   The Data name provides reference to the storage space in the memory where the real value is stored. This value takes part in the operation whene

How do i write a simple cobol programming that works

Introduction to COBOL: In the year 1959, a new language named the COBOL ( CO mmon B usiness O riented L anguage) was introduced remembering the business purpose application

can we move spaces to numeric field

PROGRAM TO DEMONSTRATE SORT VERB: The file for which a record having 2 fields, viz., Account Number and Name is already available. Sort the file based on the ascending order o