Como almacenar datos en un campo memo para generar una factura?

estoy haciendo un sistema en red de un restaurante, que va almacenando en una variable que esta en un ciclo, este ciclo también verifica el platillo que esta en una etiqueta y resta los ingredientes correspondientes...dentro del ciclo defino una variable que me vaya guardando el platillo y le voy sumando el precio, algo así:

FOR x=1 TO 8

IF ALLTRIM(UPPER(mesa1(por)))="CREMA DE ESPÁRRAGOS"
des=des+"CREMA DE ESPÁRRAGOS LPS. 30.00"+CHR(13)
tot=tot+30
LOCATE FOR UPPER(ALLTRIM(ingredient))="CEBOLLA"
IF FOUND()
REPLACE cant WITH cant-1
ENDIF