7.19 DATECHECK

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


                                                                                         Required                                                                   

  DATECHECK ---- FIELD --------- field name --------------------->                                                                   

 --------------------------------------------------------------------
                                                                                        Optional                                                                   

                     >-- IN_FORMAT -- *SYSFMT ------------------------> 
                                                  *DDMMYY                           
                                                  *MMDDYY                           
                                                  *YYMMDD                           
                                                  *DDMMYYYY                         
                                                 *YYYYMMDD                         
                                                 *YYYYDDMM                         
                                                 *YYMM                             
                                                *MMYY                             
                                                *MMDDYYYY                         
                                                *YYYYMM                           
                                               *MMYYYY                           
                                               *SYSFMT8                                                                                           

                   >-- BEFORE ----- 9999999 -------------------------> 
                                               numeric value                                                                                       

                   >-- AFTER ------- 9999999 ------------------------> 
                                              numeric value                                                                                       

                   >-- IF_VALID --- *NEXT -----------------------------> 
                                             *ERROR                            
                                            *ACCEPT                                                                                             

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

                  >-- MSGTXT ---- *NONE ----------------------------> 
                                            message text                                                                                        

                 >-- MSGID ----- DCU0006 --------------------------> 
                                           message identifier                                                                                  

                 >-- MSGF ----- DC@M01 . *LIBL --------------------> 
                                         message file . library name                                                                         

                 >-- MSGDTA-- substitution variables ----------------| 
                                        |     expandable group expression        | 
                                         ------------- 20 max ----------------