>>How can I insert current datetime in my sql table via VFP ?
>>
>>year, month, day, h, m,s
>>
>>Please help me insert date in line below:
>>
>>cSQL = "UPDATE reembolso set reg_correios= ?m.reg_correios, env_ect = 1 where code = ?m.code, datetime = "
>>
>>asa=SQLEXEC(lnHandle,cSQL )
>>
>>I am not sure if I have to convert it.
>>
>>Moises
>
>
>Moises
>
>The function below will return a SQL date formatted string for either a character or date variable
>
>
>

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

Bill,

A bit shorter

lc_date = transform(dtos(m.pd_date), '@R ####-##-##')