01 DATE-FIELD 05 DATE-YYYY PIC 9(04). 05 FILLER

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

Question Posted / kishore

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

Answer Posted / kishore

01 DATE-FIELD
05 DATE-YYYY PIC 9(04).
05 FILLER PIC X(1).
05 DATE-MM PIC 9(02).
05 FILLER PIC X(1).
05 DATE-DD PIC 9(02).
01 DATE-CONT
05 DATE-MM-CONT PIC 9(02).
05 DATE-DD-CONT PIC 9(02).
05 DATE-YYYY-CONT PIC 9(04).

ACCEPT DATE-FIELD

MOVE DATE-DD TO DATE-DD-CONT
MOVE DATE-MM TO DATE-MM-CONT
MOVE DATE-YYYY TO DATE-YYYY-CONT

DISPLAY DATE-CONT

Is This Answer Correct ?

6 Yes

0 No

Post New Answer View All Answers

Please Help Members By Posting Answers For Below Questions

Define redefine?

1116

What is sort?

946

Define redefine and its syntax?

966

Explain how to update data area in cobol 400 program?

1013

What is the syntax of sort?

897

Explain the output procedure?

1032

What is input procedure?

990

seqence numbers in cobol

3114

What is the syntax of redefine?

945

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

906

What is output procedure?

993

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

963

How to detect record is locked in cobol/400?

970

What is perform?

1087

Explain the difference between search and searchall?

862