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 FOR PERFORM - THRU:
We have to write a program to elaborate PERFORM ...THRU statement
Identification division.
Program- id. Perfthru.
Environment division.
Data division.
Procedure division.
Para-1.
Display(1 1) erase.
Display "ABC".
Perform para-2 thru para-4.
Display "XYZ".
Stop run.
Para-2.
Display "DEF".
Para-3.
Display "GHI".
Display " Gandhi".
Para-4.
Display "Bharathiar".
The output of the above program will be ABC
DEF
GHI
Gandhi
Bharathiar
XYZ
When using the accept verb in cobol is it possible to assign something other then "SYSIN" for a ddname?
BLANK WHEN ZERO: BLANK WHEN ZERO is an editing clause that may be used along with a picture. This will set the whole data item to blanks of its value is equal to zero. Though,
program
There are some restrictions when these procedures are used. (i) The Procedure should not contain any SORT/MERGE statement. (ii) An explicit transfer of the control outside
Transaction file : A transaction file is a file which contains new records those changes to old records which are used to update the master file. The problem of file updatio
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
Character Set: To study any language, first one should know the alphabets of the language and they are termed as character set in general. There are 50 different characters in
Identification Division: The Identification Division is the first division of each and every COBOL source program. The paragraph PROGRAM-ID is necessary in most of the mac
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
simplify smple interest
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