How to Convert 2010/02/11 to m/dd/yyy.. with string and without string if any other method... code?
Submitted by: AdministratorThe above issue can be resolved by using REDEFINES clause.
01 DATE-FIELD
05 DATE-YYYY PIC 9(04).
05 DATE-MM PIC 9(02).
05 DATE-DD PIC 9(02).
01 DATE-CONT REDEFINES DATE-FIELD
05 DATE-MM-CONT PIC 9(02).
05 DATE-DD-CONT PIC 9(02).
05 DATE-YYYY-CONT PIC 9(04).
I guess the above declaration will resolve it. I have not
tested it.
Submitted by: Administrator
01 DATE-FIELD
05 DATE-YYYY PIC 9(04).
05 DATE-MM PIC 9(02).
05 DATE-DD PIC 9(02).
01 DATE-CONT REDEFINES DATE-FIELD
05 DATE-MM-CONT PIC 9(02).
05 DATE-DD-CONT PIC 9(02).
05 DATE-YYYY-CONT PIC 9(04).
I guess the above declaration will resolve it. I have not
tested it.
Submitted by: Administrator
Read Online IBM COBOL400 Job Interview Questions And Answers
Top IBM COBOL400 Questions
| ☺ | How to update data area in cobol 400 program? |
| ☺ | How to detect record is locked in Cobol/400? |
| ☺ | How array can be declare in cobol? |
| ☺ | How can i change the below code in SQL to cobol/400? |
| ☺ | What is redefine and its syntax? |
Top Mainframe Technical Categories
| ☺ | IBM MainFrame Interview Questions. |
| ☺ | IBM AS400 Interview Questions. |
| ☺ | JCL Interview Questions. |
| ☺ | IMS DB Interview Questions. |
| ☺ | CICS Interview Questions. |
