Specifies the format of the date stored in the CURRENT-DATE special register. 
Syntax:
>>-.---.--CURRENT-DATE--"date-format"------><
   +-/-+
Parameters:
| date-format | Either DDMMYY or MMDDYY. | 
 
Properties:
| Default: | CURRENT-DATE"MMDDYY" | 
| Phase: | Syntax check | 
| $SET: | Any | 
 
Comments:
The DDMMYY parameter causes CURRENT-DATE to be stored in European format. The parameter can be specified in either upper case or lower case.