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.
we have input file ,record layout is EMP ID (6 char) , EMP NAME (20 char), Designation (3 char),Salary (5 digit) Base Branch (10char) Grade (3 Alphanumeric). This is the input file
PROGRAM FOR SCREEN SECTION: identification division. program- id. environment division. data division. working-storage section. 01 a pic 9(2) value
RULES FOR OCCURS CLAUSE: The rules apply for the OCCURS clause and the subscripts are as shown below. (1) The integer in the OCCURS clause should be a positive integer.
Illustration of Renames clause: In the illustration, PAT-OTHER-THAN-BASIC will become a fresh group consisting of DEARNESS-ALLOWANCE, HOUSE-RENT & MTHLY-INCENTIVE. Keep in min
Second form of Divide verb: The second form of this verb is as shown below: In this situation the identifier-1 or numeric- literal-1 will be divided by identifier-2 or
Valid and Invalid Word - Cobol words: Valid Word Invalid Word & Reason emp-sal -pay ( it starts with a hyphen) TOTAL MARK (blank space em
PROGRAM FOR COMPUTE VERB: We have to write an easy program to elaborate the COMPUTE verb. Identification division. Program- id. compverb. Environment division. Da
RULES FOR INDEXED TABLES: The rules of indexing a table with an INDEXED phrase are as shown below: (1) If indexing is completed for any one level of a table, then indexing
Example of If- else statement Illustration: IF QUANTITY IS NUMERIC AND QUANTITY IS POSITIVE MOVE ZERO TO ERROR-CODE. COMPUTE SALES VALUE=QUANTITY*RATE
Name the divisions in a COBOL program are given below DENTIFICATION DIVISION DATA DIVISION ENVIRONMENT DIVISION PROCEDURE DIVISION.
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