Thanks
I still can not manage to format the date, if I assign F_DUEDATE in advance as below a weird date is displayed (12/31/0).
If I uncomment the PICTURE FORMAT then everything is displayed well, but you can not really change the date later in the form.
If I ignore formatting then everything works fine
```
CLEAR
;F_INVDATE = TODAY()
F_DUEDATE = FORMAT("W11,D7", TODAY()+30)
SHOWDIALOG "New Invoice"
@0,0 HEIGHT 59 WIDTH 131
@ 2,2 ?? " INV NUMBER: "
ACCEPT @ 2,25
WIDTH 14 "A10"
PICTURE "####{-}###"
TO F_INVNUMBER
@ 3,2 ?? " INV DATE: "
ACCEPT @ 3,25
WIDTH 14 "D"
TO F_INVDATE
@ 4,2 ?? " DUE DATE: "
ACCEPT @ 4,25
WIDTH 14 "D"
;
PICTURE FORMAT("W11,D7", TODAY())
TO F_DUEDATE
PUSHBUTTON @ 10,2
WIDTH 10
"~S~ave"
DEFAULT
OK
VALUE "OK"
TAG "Yes"
TO Button
ENDDIALOG
```