Set the job unique date to date-fields.
For details, refer to the CURRENT-DATE function of the NetCOBOL User's Guide.
Y: Job unique date is output.
N: System date is output.
UNIQDATE Y
N