FoxPro/Visual FoxPro - visual fox pro me sale no coinciden los tipos de datos error en REPLACE TELEFONO WITH MTELEFONO

SET TALK OFF
SET STATUS OFF
CLEAR
DO WHILE .T.
DEFINE WINDOW A FROM 0,0 TO 60,300
ACTIVATE WINDOW A
@4, 60 SAY "DATOS PERSONALES"FONT "ARIAL",30
@10,30 PROMPT "INGRESO" FONT "ARIAL",30
@14,30 PROMPT "CONSULTA"FONT "ARIAL",30
@18,30 PROMPT "MODIFICACION"FONT "ARIAL",30
@22,30 PROMPT "ELIMINACION"FONT "ARIAL",30
@26,30 PROMPT "REPORTE"FONT "ARIAL",30
@30,30 PROMPT "SALIR"FONT "ARIAL",30
MENU TO OP
DO CASE
CASE OP=1
DO INGRESO
CASE OP=2
DO CONSULTA
CASE OP=3
DO MODIFICACION
CASE OP=4
DO ELIMACION
CASE OP=5
DO REPORTE
CASE OP=6
EXIT
ENDCASE
ENDDO
DEACTIVATE WINDOW A
PROCEDURE INGRESO
SET TALK OFF
SET STATUS OFF
CLEAR
USE aplicaciones1
OP="S"
DO WHILE OP="S"
MAPELLIDOS = SPACE(25)
MNOMBRES = SPACE (25)
MTELEFONO = SPACE(10)
MESTADOCIVI = SPACE(25)
MNACIONALID = SPACE (25)
MPAISPROCED = SPACE(25)
MDIRECCION = SPACE (25)
MPROFESION = SPACE (25)
MOCUPACION = SPACE (25)
DEFINE WINDOW B FROM 0,0 TO 100,300 TITLE "DATOS PERSONALES"font"ARIAL",15
ACTIVATE WINDOW B
@4,30 SAY "DATOS PERSONALES"FONT"ARIAL",20
@6,10 SAY "APELLIDOS"font"ARIAL",10GET MAPELLIDOS font"ARIAL",10
@6,50 SAY "NOMBRES"font"ARIAL",10 GET MNOMBRES font"ARIAL",10
@6,90 SAY "TELEFONO"FONT "ARIAL",10 GET TELEFONO FONT "ARIAL",10
@8,10 SAY "ESTADOCIVI"font"ARIAL",10 GET MESTADOCIVI font"ARIAL",10
@8,50 SAY "NACIONALID"font"ARIAL",10 GET MNACIONALID font"ARIAL",10
@8,90 SAY "PAISPROCED "font"ARIAL",10 GET MPAISPROCED font"ARIAL",10
@10,10 SAY "DIRECCION"font"ARIAL",10 GET MDIRECCION font"ARIAL",10
@10,50 SAY "PROFESION"font"ARIAL",10 GET MPROFESION font"ARIAL",10
@10,90 SAY "OCUPACION"font"ARIAL",10 GET MOCUPACION font"ARIAL",10
READ
APPEND BLANK
REPLACE APELLIDOS WITH MAPELLIDOS
REPLACE NOMBRES WITH MNOMBRES
REPLACE TELEFONO WITH MTELEFONO
REPLACE ESTADOCIVI WITH MESTADOCIVI
REPLACE NACIONALID WITH MNACIONALID
REPLACE PAISPROCED WITH MPAISPROCED
REPLACE DIRECCION WITH MDIRECCION
REPLACE PROFESION WITH MPROFESION
REPLACE OCUPACION WITH MOCUPACION
@12,40 SAY "DESEA CONTINUAR S/N"font"ARIAL",15 GET OP
READ
IF OP="S"
LOOP
ELSE
EXIT
ENDIF
ENDDO
DEACTIVATE WINDOW B
PROCEDURE CONSULTA
SET TALK OFF
SET STATUS OFF
CLEAR
USE aplicaciones1
GO TOP
OP="S"
DO WHILE OP="S"
DEFINE WINDOW C FROM 0,0 TO 80,300 TITLE "DATOS PERSONALES"FONT"ARIAL",30
ACTIVATE WINDOW C
MAPELLIDOS=SPACE(25)
@2,20 SAY"CONSULTA DE DATOS"FONT"ARIAL",20
@3,10 SAY "APELLIDOS"font"ARIAL",15 GET MAPELLIDOS font"ARIAL",15
READ
LOCATE FOR APELLIDOS=MAPELLIDOS
IF APELLIDOS=MAPELLIDOS
@4,10 SAY "NOMBRES " + NOMBRES font"ARIAL",15
@5,10 SAY "TELEFONO " + TELEFONO font"ARIAL",15
@6,10 SAY "ESTADOCIVI " + ESTADOCIVI font"ARIAL",15
@7,10 SAY "NACIONALID " + NACIONALID font"ARIAL",15
@8,10 SAY "PAISPROCED " + PAISPROCED font"ARIAL",15
@9,10 SAY "DIRECCION " + DIRECCION font"ARIAL",15
@10,10 SAY "PROFESION " + PROFESION font"ARIAL",15
@11,10 SAY "OCUPACION " + OCUPACION font"ARIAL",15
READ
ELSE
WAIT WINDOW "APELLIDO NO EXISTE"TIME 3
ENDIF
@12,10 SAY "DESEA CONTINUAR S/N"font"ARIAL"GET OP
READ
IF OP="S"
LOOP
EXIT
ENDIF
ENDDO
DEACTIVATE WINDOW C






me sale error por que en telefono tengo como campo numerico y no caracter alguien que me ayude arreglar la codificacion porfavor

Cómo tenes definido el campo en la tabla ?

esta definido como numerico.. yo tngo el mismo problema ayuda

ese es tu problema el campo teléfono de tu tabla me decis que esta definido como numérico pero al definir la variable mtelefono decis qué es de tipo carácter. Por eso el error de no coincidencia de tipo de datos.

estas usando teléfono para cargar y no mtelefono

Estas usando como variable TELEFONO, al parecer según tu código debe ser MTELEFONO

@6,90 SAY "TELEFONO"FONT "ARIAL",10 GET TELEFONO FONT "ARIAL",10

Por esa razón cuando lo insertas mediante un replace sale ese mensaje
REPLACE TELEFONO WITH MTELEFONO

ahora si el campo TELEFONO es numérico, entonces a tu variable le puede declarar como

MTELEFONO = 0

espero sea de tu ayuda

pero al ejecutar sale el campo de telefono con un 0
ayuda!
creo que es al declarar

por supuesto que sí el campo es numérico al ejecutar va a aparecer un 0.
si queres evitar esto declara MTELÉFONO como de tipo carácter y al guardar en tu tabla usa la función VAL.
para mi lo más práctico es que el campo teléfono de tu tabla lo definas como de tipo carácter y con eso ya vas a solucionar todo.

pero lo que pasa es q nuestro profesor dijo que no le cambiemos que hagamos con ese tipo numerico
aun no encuentro solucion