Re: Date Data types

I think I found it.  When compiling use this option: CVTOPT(*DATE).
That should convert the special characters for you.



Basil Zangare
Applications Specialist
Nikon Inc
1300 Walt Whitman Road
Melville, New York 11747
phone: (631) 547-4389
fax: (631) 547-4026
bzangare@xxxxxxxxx


-----Original Message-----
From: cobol400-l-bounces@xxxxxxxxxxxx
[mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Michael Saunders
Sent: Wednesday, March 15, 2006 10:20 AM
To: cobol400-l@xxxxxxxxxxxx
Subject: [COBOL400-L] Date Data types

I'm new to ILE COBOL.  I'm trying to use the following date data types:
        01         DATE-FIELDS.                                         
            05     BDATE               FORMAT DATE '%M/%D/@Y'           
                                               VALUE '02/23/1949'.

     
            05     CDATE               FORMAT DATE '%M/%D/@Y'.      
    
I get the following errors.
 *    72  MSGID: LNC1236  SEVERITY: 30  SEQNBR:  006700

       
          Message . . . . :   No PICTURE for elementary item 'BDATE'.

       
 *    72  MSGID: LNC2974  SEVERITY: 30  SEQNBR:  006700

       
          Message . . . . :   FORMAT literal, ''%M/%D/@Y'', contains a
duplicate  
            conversion specifier, '@Y', at position 8. Statement
ignored. 
       
 *    73  MSGID: LNC1236  SEVERITY: 30  SEQNBR:  006900

        
          Message . . . . :   No PICTURE for elementary item 'CDATE'.

        
 *    73  MSGID: LNC2974  SEVERITY: 30  SEQNBR:  006900

        
          Message . . . . :   FORMAT literal, ''%M/%D/@Y'', contains a
duplicate   
            conversion specifier, '@Y', at position 8. Statement
ignored. 
        

I've used both apostrophe's and quotation marks, but no difference.
These are nearly identical to the examples in the IBM Manual.  Any ideas
what's wrong?

Michael R. Saunders
School District of Manatee County
Technology & Information Services
Programmer/Analyst
saunderm@xxxxxxxxxxxxxxxxxx
(941) 708-8770 ext 2139