can any one give good example for cond 88 level number and for renames pls urgent dudes ?
Answers were Sorted based on User's Feedback
Answer / mk naidu
sorry for the above one, pls check the below answer for
renames.
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 RENAMES 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.
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / prashanth somu
the simple eg. for Renames,
01 emp-rec.
05 emp-fnm pic x(10).
05 emp-lnm pic x(15).
66 emp-Nm renames emp-fnm thru emp-lnm.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / 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 |
I have a Main Program which is calling Sub-Program which is a DB2 pgm. What will happen if I am not closing the cursor used in the Sub-program? Please advise..
What are the different rules of SORT operation?
what is Pic 9v99 Indicates?
01 a pic x(6) value is abcdef 01 b pic x(3) move a to b wht will be the value in b ?
Can you please let me know the centre name of INS certification in Kolkata.
What do you understand by passing by reference and passing by content?
What will happen if we try to create GDG (+2) generaton instead of (+1) generation?
What rules are followed by the search verb.
How you can read the file from bottom?
here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?
how can we code index in an array of cobol pgm?
How do u know what version of cobol u are using?