FoxPro/Visual FoxPro - ponerle formato a esta cadena 001,002,sc1

Tengo una cadena de texto que puede variar pero para ponerles un ejemplo seria :

sc1,001,ffr,004

lo que necesito hacer es tomar esta cadena y convertirla a este formato :

el primer caracter es un apostrofe(')seguido de comillas(")

'"sc1"'+","+'"001"'+","+'"ffr"'+","+'"004"'

lo he logrado hacer de varias formas pero ando buscando la menos complicada y quisiera que me brindaran sugerencias al respecto..

Agradeciendolos mucho su colaboracion

Fernando Porras

ctexto1="sc1,001,ffr,004"
ctexto2 =strtran(ctexto,",",chr(39)+Chr(34)+"+"+chr(34)+","+chr(34)+"+"+chr(39)+chr(34))
&& por ultimo
ctexto2=chr(39)+Chr(34)+ctexto2+chr(34)+Chr(39)