>>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