The above issue can be resolved by using REDEFINES clause. 01 DATE-FIELD

How to Convert 2010/02/11 to m/dd/yyy.. with string and
without string if any other method... code

Question Posted / mvrk

5 Answers
10606 Views
CGI, I also Faced
E-Mail Answers

Answer Posted / mvrk

The 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.

Friends, please correct me if i am wrong.

Is This Answer Correct ?

1 Yes

13 No

Post New Answer View All Answers

Please Help Members By Posting Answers For Below Questions

What are fillers? What is the actual use of fillers? With mall/simple example?

933

Explain the input procedure and output procedure?

858

What is the syntax of sort?

852

How to detect record is locked in cobol/400? What is the solution for that?

888

Explain the syntax of redefine?

856

Define sort?

1097

How to detect record is locked in cobol/400?

916

why icetool be used in programmer view?

2509

What are fillers?

974

Explain the difference between comp & comp-3?

899

Explain the output procedure?

967

Explain how to detect record is locked in cobol/400? What is the solution for that?

858

What is input procedure?

950

Explain how to update data area in cobol 400 program?

957

Explain the input procedure?

882