It looks as though the Day() function is returning the month! Perhaps you want:

lcWasDate = set('date',1)
set date to mdy
d = padl(day(date),2,'0')
set date to &lcWasDate



>from date date = 03/21/2001
>
>
> D = day (date)
>
>
> It returns 3
>
> How can I return 03
>
>
> Thanks
>
> Moisés