Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

7.19 DATECHECK

Note
Note: Usage options


The DATECHECK command is used to check if a date field is valid against one of five possible formats and optionally that the date is within a certain number of days before and/or after the current date.

Also See

7.19.1 DATECHECK Parameters

7.19.2 DATECHECK Comments / Warnings

7.19.3 DATECHECK Examples

7.7 BEGINCHECK

7.10 CALLCHECK

7.17 CONDCHECK

7.45 ENDCHECK

7.61 FILECHECK

7.102 RANGECHECK

7.128 VALUECHECK


Panel
bgColor#ffffcc

                                                                                         Required                                                                   

  DATECHECK

No Format
                                                        Required    DATECHECK

----

FIELD

---------

field

name

---------------------> 

                                                                  

 --------------------------------------------------------------------

                                                         Optional               >--


                                                                                        Optional                                                                   

                     >-- IN_FORMAT

-

--

-

*SYSFMT

------------------------> 

                                *DDMMYY                                                            *MMDDYY                                                            *YYMMDD                                                            *DDMMYYYY                                                          *YYYYMMDD                                                          *YYYYDDMM                                                          *YYMM                                                              *MMYY                                                              *MMDDYYYY                                                          *YYYYMM                                                            *MMYYYY                                                            *SYSFMT8                                       >-- BEFORE ------- 9999999


                                                  *DDMMYY                           
                                                  *MMDDYY                           
                                                  *YYMMDD                           
                                                  *DDMMYYYY                         
                                                 *YYYYMMDD                         
                                                 *YYYYDDMM                         
                                                 *YYMM                             
                                                *MMYY                             
                                                *MMDDYYYY                         
                                                *YYYYMM                           
                                               *MMYYYY                           
                                               *SYSFMT8                                                                                           

                   >-- BEFORE ----- 9999999 -------------------------

->                                  numeric value                                   >-- AFTER


                                               numeric value                                                                                       

                   >-- AFTER -------

-

9999999

------------------------> 

                                numeric value                                   >--


                                              numeric value                                                                                       

                   >-- IF_VALID

--- *NEXT ---

*NEXT

--------------------------> 

                                *ERROR                                                             *ACCEPT                                         >-- IF_INVALID --- *ERROR


                                             *ERROR                            
                                            *ACCEPT                                                                                             

                  >-- IF_INVALID - *ERROR ----------------------------> 

                                *NEXT                                                              *ACCEPT                                         >-- MSGTXT


                                             *NEXT                             
                                             *ACCEPT                                                                                       

                  >-- MSGTXT ----

-

*NONE --

*NONE

--------------------------> 

                                message text                                    >-- MSGID


                                            message text                                                                                        

                 >-- MSGID -----

-

DCU0006 --

DCU0006

------------------------> 

                                message identifier                              >-- MSGF


                                           message identifier                                                                                  

                 >-- MSGF -----

----

DC@M01

.

*LIBL

--------------------> 

                                message file . library name                     >-- MSGDTA


                                         message file . library name                                                                         

                 >-- MSGDTA-- substitution variables -------

substitution variables

---------| 

                             |  expandable group expression     |                                


                                        |     expandable group expression        | 
                                         --------

-----

20

max

----------------