how to display date in reverse order if the pic clause of
the is numeric
suppose date is 09032010 ==> need to print in 20100309
(pic clause is numeric)
Answer Posted / tata
id division.
program-id. exe.
data division.
working-storage section.
01 idate pic 9(8) value 10032010.
01 rdate pic 9(8).
procedure division.
move idate (1:2) to rdate (7:2).
move idate (3:2) to rdate(5:2).
move idate (5:4) to rdate(1:4).
display rdate.
stop run.
| Is This Answer Correct ? | 10 Yes | 0 No |
Post New Answer View All Answers
how to move the records from file to array table. give with code example
Can we redefine the field of x(200) to less than 200?
What is the difference between a binary search and a sequential search what are the pertinent cobol?
What are the different rules of SORT operation?
how do you reference the printer file formats from cobol programs
How to traceback if I am getting SOC7 or SOC4 abend? List down the steps
Explain how you can characterize tables in cobol?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
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?
how to access the file from prodution from changeman tool and to submit a file to production
Write a program that uses move corresponding.
In which area will you utilize 88 level items in cobol?
Explain the configuration section of a cobol program with examples of syntax.
Have you used the sort in your project?for this type of questions any working on real time project give the eg. with real time scenario.
What do you understand by psb and acb?