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!
OCCURS - INDEXED BY PROGRAM:
identification division.
program- id. searching.
environment division.
data division.
working-storage section.
01 table1.
02 data1 occurs 10 times indexed by a1.
03 name pic x(25).
03 sal pic 9(6).
01 n pic 9 value 0.
01 tot pic 9(2) value 0.
01 i pic 9 value 0.
procedure division.
p-1.
display(1 1) erase.
display(5 5) "Enter Data .....".
display(7 5) "Enter No.of Records : ".
accept n.
perform init-para varying i from 1 by 1 until i > n.
perform get-para varying i from 1 by 1
until i > n.
set a1 to 1.
p-2.
search data1 at end go to p-3
when sal (a1) > 1000
add 1 to tot.
set a1 up by 1
go to p-2.
p-3.
display(20 5) "Total Records > 1000 [sal] = " tot.
stop run.
get-para.
display(3 5) "Name : ".
accept name (i).
display(5 5) "Salary : ".
accept sal (i).
init-para.
move spaces to name(i).
move 0 to sal(i).
PROGRAM FOR ADD VERB: We have to write a simple program to elaborate the ADD verb. You can also use edit characters in the program. Identification division. Program- id.
what does it used
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
Example of Move corresponding: Consider the DATA DIVISION entries shown below. Suppose it is needed that the data stored in the 4 fields of the PAY_REC should be
ADD VERB: The ADD Verb can be used to find the sum of two or more numbers and to store the sum. The ADD verb takes any one of the two forms as shown below:
PROGRAM FOR SUBTRACT VERB: We have to write a simple program to elaborate the SUBTRACT verb. You can also use edit characters in the program. Identification division. Pr
Illustration of Perform with varying option: A) Perform para-3 varying the k from 1 by 1 until k > 10. Here para-3 will be constantly executed 10 times (For k=1,2,3, .....1
Illustration of indexed tables: Index items defined through the INDEXED phrase of the OCCURS clause are one type of indexes. There can be other type of index items that are de
Example of Nested if statement: Illustration: Consider the following sentence The nested IF sentence holds two IFs and one ELSE. The IF-ELSE couple has been marke
SEQUENTIAL FILES WITH THE VARIABLE-LENGTH RECORDS: The Magnetic - tape or disk files can hold variable-length records. In this situation the file can have records with various
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