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
10662 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?

948

Define redefine and its syntax?

923

What is sort?

900

Explain the difference between section, paragraph and sentences?

922

What is the syntax of sort?

866

Explain the types of perform?

939

Explain the input procedure and output procedure?

867

Explain the output procedure?

978

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

905

What is sort? And its syntax?

994

What is the syntax of redefine?

900

What is output procedure?

955

Explain how to update data area in cobol 400 program?

970

Explain what all the conditiones required for using open opcode on a file?

908

What are the types of perform?

964