can any one give good example for cond 88 level number and for renames pls urgent dudes ?
Answer Posted / mk naidu
WORKING-STORAGE SECTION.
01 EMP-GENDER PIC X.
88 MALE PIC 'M'.
88 FEMALE PIC 'F'.
PROCEDURE DIVISION.
ACCEPT EMP-GENDER.
IF MALE
DISPLAY 'YOU ARE Mr.'.
ELSE
DISPLAY 'YOU ARE Ms.'.
you can find a simple example prog for condition name.
01 EMP-REC.
02 EMP-INFO.
05 EMP-NO PIC X(10) VALUE 'SACHIN'.
05 EMP-NAME PIC X(10) VALUE 'GUNTUR'.
02 EMP-ALLOWANCE.
05 HR PIC 9999 VALUE '1500'.
05 PF PIC 9999 VALUE '1000'.
66 EMP-SAL-ALLOWANCE EMPNO THRU PF.
PROCEDURE DIVISION.
DISPLAY EMP-SAL-ALLOWACE.
o/p:- all details from emp-no to pf will be grouped as
EMP-SAL-ALLOWANCES and displayed.
you can find a simple example for renames also.
| Is This Answer Correct ? | 0 Yes | 4 No |
Post New Answer View All Answers
What is perform what is varying?
What are the different rules for performing sort operation?
Write the code to count the sum of n natural numbers.
Mention the guidelines to write a structured cobol program?
i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?
How do you reference the fixed block file formats from cobol programs
What is an in line perform? When would you use it? Anything else you wish to say about it.
What is the difference between Structured COBOL Programming and Object Oriented COBOL programming?
What is the usage of comp fields in cobol?
What is the difference between PIC 9.99 and PIC9v99?
What are the different rules of SORT operation?
INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?
how do you reference the variable block file formats from cobol programs
How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.
How did the release of cobol/370 version 1.3 improve the performance of release 1.1?