Interested to Buy Any Domain ? << Click Here >> for more details...
HOW TO MOVE REDEFINES CLAUSE FROM INPUT TO OUTPUT ?
- 1 Answers
- 4405 Views
- I also Faced
- E-Mail Answers
Answer / adarsha
01 ws-misc-vars.
05 system-date pic x(06) value spaces.
05 system-date-rede redefines system-date
10 system-dt-yy pic x(02) value spaces.
10 system-dt-mm pic x(02) value spaces.
10 system-dt-dd pic x(02) value spaces.
01 ws-rep-dt-frmt pic x(06) value space.
.
.
.
procedure division.
move system-date to ws-rep-dt-frmt.
*** when you want any particular variable to be recevied or
stored in a particular format you can redefine them in the
way you want.. here system-date-rede has the same value as
system-date !
| Is This Answer Correct ? | 1 Yes | 0 No |
how to crack cts interview apps? NOVEMBER 21 2010
What is Redefines clause?
what is Reentrancy and Quasi-reentrancy?
1.Is it possible to move the data from 99.99 to 99v99? 2.What is the CICS-vsam Compilation process? 3.In My GDG 5 generation will be there GDG3 got an abend what will happen? 4.In my GDG first generation is +1 And I want to add the new generation what will happen previous generation? 5.How can you give the PIC clause below conditions A). s9 (reddy), B). s9 (5) occurs 5 times? 6.How override the proc from a particular step? and what is symbolic and override Procs?
In a program, there are 2 sections defined say SECTION-A and SECTION-B. There is a paragraph say CALC-INT in both the sections. If this para has to be called directly for SECTION-A, then PERFORM CALC-INT will not work as it is present in both sections. How the PERFORM statement has to be coded here?
I have a file it contain 10 records.i got abend at 8th record because of soc7.how do you know that perticular record got abend?
How do define dynamic array in cobol.
how can count the number of character in feild ?? suppose for instance i have a feild with value ' rajesh sarkar' then how can v count the number of characters whitout spaces...........
What the difference is between continue and next sentence?
How to retain the Duplicates in the one records?
what is the diff b/w select stsmt and cursor ?
How do you submit JCL via a Cobol program?
COBOL 
