FoxPro/Visual FoxPro - Dificultad con operaciones Aritmeticas

quetal como estan!!!

Saben tengo desarrollado un formulario con lo necesario, pero lo malo es que tengo error o hago mal una operacion aritmetica, o sera que me falta algun signo.

Saben hago un operacion aritmetica de multiplicacion y suma, utilizo dos text o mejor dicho utilizo lo que lleno de esos text, hago que el primer text1se multiplcique con 100 y luego lo sumo con el text2, pero me sale que las variables no son reconocibles.

Que puedo hacer???
aqui les dejo mi codigo.
--------------------------------------------------------
SELECT B

p1=thisform.txtcodramo.value
p2=thisform.txtcod.value
q=100
*asignado=(p1*100)+p2 && "AQUI NO REALIZA LA OPERACION ARITMETICA QUE FALTA?"


LOCATE FOR (codramo2)=thisform.txtcod.Value
IF found()
MESSAGEBOX("El Codigo: "+co +CHR(13) +"YA EXISTE!!!!",0+32+256)
return
else
iq=MESSAGEBOX("Esta Seguro de guardar los datos?",1+48)
IF iq=2
WITH thisform
.txtcodramo.value=""
.txtramo.value=""
.txtcod.value=""
endwith
thisform.refresh
ELSE
APPEND BLANK
GO bottom
replace ramos.cod_mod_ra WITH thisform.txtcodramo.Value
replace ramos.ramo WITH ALLTRIM(thisform.txtramo.Value)
replace ramos.codramo2 WITH thisform.txtcod.Value
replace ramos.cod_ramo WITH asignado &&ACA QUIERO PONER EL VALOR ASIGNADO ARRIVA
ENDIF
ENDIF
thisform.Refresh
------------------------------------------------------------------------
Que signo devo de poner para o mi operacion aritmetica esta mal??

1- Algun mensaje de error?
2- dime que te devuelven estos wait windows

p1=thisform.txtcodramo.value
wait window TYPE("p1")
p2=thisform.txtcod.value
wait window TYPE("p2")
q=100
*asignado=(p1*100)+p2 && "AQUI NO REALIZA LA OPERACION ARITMETICA QUE FALTA?"

Prueba con esto

p1=val(alltrim(thisform.txtcodramo.value))

p2=val(alltrim(thisform.txtcod.value))

q=val(100)

Creo que VAL(100) te va a dar error