Change Dates to String in Crystal Reports | CLEARIFY

Changing Dates to String

Change Date Format to String Format:

local stringvar nday;
local stringvar nmonth;

if length (replace(totext (Month({vd_CalYrShipDate.CalYr Ship Date})),".00","")) = 1 then
nmonth := "0" & replace(totext (Month({vd_CalYrShipDate.CalYr Ship Date})),".00","")
else
nmonth := replace(totext (Month({vd_CalYrShipDate.CalYr Ship Date})),".00","");

if length (replace(totext (Day({vd_CalYrShipDate.CalYr Ship Date})),".00","")) = 1 then
nday := "0" & replace(totext (Day({vd_CalYrShipDate.CalYr Ship Date})),".00","")
else
nday := replace(totext (Day({vd_CalYrShipDate.CalYr Ship Date})),".00","");

nmonth & "/" & nday & "/" & Replace(replace(totext (Year({vd_CalYrShipDate.CalYr Ship Date})),".00",""),",","")