Already have an account? Get multiple benefits of using own account!
Login in your account..!
Remember me
Don't have an account? Create your account in less than a minutes,
Forgot password? how can I recover my password now!
Enter right registered email to receive password!
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 of the Account Number.
identification division.
program- id.
environment division.
input-output section.
file-control.
select o1- file assign to disk
organization is line sequential.
select s1-file assign to disk
select w- file assign to disk.
data division.
file section.
fd o1- file
label records are standard
value of file- id is "o1.dat".
01 o1-rec.
02 o1-acc-no pic 9(2).
02 o1-name pic x(4).
fd s1-file
value of file- id is "s1.dat".
01 s1-rec.
02 s1-acc-no pic 9(2).
02 s1-name pic x(4).
sd w-file.
01 w-rec.
02 w-acc-no pic 9(2).
02 w-name pic x(4).
procedure division.
p-1.
sort w-file on ascending key w-acc-no using o1-file
giving s1- file.
stop run.
Example of Write statement: Illustration: (i) WRITE TRANS-RECORD AFTER ADVANCING 3 LINES. This WRITE statement specified that the TRANS-RECORD is a record name of a fi
INPUT AND OUTPUT PROCEDURE IN SORT STATEMENT: The common format of the SORT statement can write as shown below: The format of the RELEASE statement is as shown be
PROCEDURE DIVISION statements for the indexed files: All the statements which are available for a relative file are also available for an indexed file. READ STTATEMENT :
NONSTANDARD CLAUSES: The various clauses explained above are as per the ANSI standard. Also, most compilers provide for additional nonstandard clauses to meet the specific nec
Buffers: The Modern computers are able of handling I-O operations independent of the CPU by means of the hardware termed as data channel. For illustration, if two buffers a
PERFORM WITH VARYING OPTION: The format is as shown below:
Valid and Invalid Word - Cobol words: Valid Word Invalid Word & Reason emp-sal -pay ( it starts with a hyphen) TOTAL MARK (blank space em
MOVE CORRESPONDING: It is frequently required to move some of the data items of one group to some other data items in the other group. If the names of the equivalent data item
RENAMES CLAUSE: At times re-grouping of an elementary data items in a record may be essential so that they can belong to the original as well as to the latest group. This is o
Rules for apply for the condition name: The rules below apply for the condition name. (i) The Condition names should be explained at level 88. The level number starts in ma
Get guaranteed satisfaction & time on delivery in every assignment order you paid with us! We ensure premium quality solution document along with free turntin report!
whatsapp: +91-977-207-8620
Phone: +91-977-207-8620
Email: [email protected]
All rights reserved! Copyrights ©2019-2020 ExpertsMind IT Educational Pvt Ltd