>>>>PARAMETERS pd_date
>>>>
>>>>LOCAL lc_date
>>>>
>>>>IF TYPE("pd_date") = "C"
>>>> pd_date = CTOD(pd_date)
>>>>ENDIF
>>>>
>>>>lc_date = ALLTRIM(STR(YEAR(pd_date))) + "-" + ;
>>>> PADL(ALLTRIM(STR(MONTH(pd_date))), 2, "0") + "-" + ;
>>>> PADL(ALLTRIM(STR(DAY(pd_date))), 2, "0")
>>>>
>>>>RETURN lc_date
>>>
>>>I don't have VFP in front of me. Would this work, or something like it?
>>>
>>>

RETURN TRANSFORM(DTOS(pd_date), "9999-99-99")

>>
>>Good idea, Rick, but this
>>
>>? TRANSFORM(DTOS(DATE()), "9999-99-99")
>>
>>
>>2018-12
>>
>>on 11/22/2018
>
>I think Rick Strahl hit it. Try "@R 9999-99-99".

Yes. He did, as usual.