Interested to Buy Any Domain ? << Click Here >> for more details...
can any one give good example for cond 88 level number and for renames pls urgent dudes ?
- 3 Answers
- 8902 Views
- DELL, I also Faced
- E-Mail Answers
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 |
can you please let me know if there is any walkins for COBOL/PLI/DB2/IMS/JCL in pune other than IBM and ITC infotech
What is the size of s9(19)comp3? explain
Why there is no questions in this column?
What is the use of LINKAGE SECTION?
Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?
What are different data types in cobol?
In INITIALIZE what is Repalcing Word will do
If you are current on the owner of a set, what is the difference between obtain next and obtain first?
01 text-data pic x(100). move 'xyzdbfrjjg u' to text-data. how to find the value of last index of text-data?
Define in-line perform?
I try to use some column names in my cobol progorm but these column not in db2 table ..when do i get error ..while bind time or runtime?
How to pass return codes from cobol to jcl?
COBOL 
