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
i need a small 3d program using inline and outline.
Name the sections present in data division.
What is the difference between structured cobol programming and object alternativelyiented cobol?
What is redefines clause in COBOL?
write a cobol logic. i have file that has 10 records .1 record go to first output file and second record goes to 2 output and etc
State the various causes of s0c1, s0c5 and s0c7.
Define static linking and dynamic linking.
What is the usage of comp fields in cobol?
What is the difference between next sentence and continue in cobol programing language?
I have a File that has duplicate records. I need only those records that occur more than thrice.?
What are INPUT PROCEDURE and OUTPUT PROCEDURE?
What is rmode(any) ?
I have File 1 occurs 5 times with Employee-ID,Employee-Name,Employee-Dept (EEE and MECH). I have File 2 occurs 10 times with Employee-ID,Employee-Name,Employee-Dept (EEE,CIVIL,CHEMICAL and MECH). In FIle 1 and FIle 2 , for matching Employee-DEPT (Only MECH) , we need to move entire records from file1 to file 2. We should not use 2D array. Your help is needed here.
) How do u handle errors in BMS macro?
Which mode is used to operate the sequential file?