
NO SE ENCUENTRA LA VARIABLE
Publicado por TANNALY (7 intervenciones) el 16/11/2016 15:47:28
HOLA, ESTOY INICIANDO EN ESTO DE LA PROGRAMACIÓN ESTOY TRABAJANDO CON EL INSERT PERO YA ANTES DECLARO CIERTOS CAMPOS QUE NECESITO, MAS SIN EMBARGO CUANDO CORRO EL PROGRAMA ME DICE QUE" NO SE ENCUENTRA LA VARIABLE CUSUARIO" AGREGO MI CODIGO:
m.cedula = val(thisform.container1.cedula.value)
SELECT profesores
LOCATE FOR PROFESORES.CEDULA == m.cedula
SELECT USUARIO
LOCATE FOR USUARIO.LOG_USU == CUSUARIO
IF FOUND()
SELECT CUR_OLD
SELECT SEG_USU_DPROFESORES
INSERT INTO SEG_USU_DPROFESORES VALUES (CUSUARIO,OLD, DATETIME(), VAL(M.CEDULA), CUR_OLD.APELLIDOS, CUR_OLD.NOMBRES, CUR_OLD. NACIONAL, CUR_OLD.SEXO, CUR_OLD.CIVIL, CUR_OLD.FECNAC, CUR_OLD.DIRECCION, CUR_OLD. CELULAR, CUR_OLD.EMAIL, CUR_OLD.FECING, CUR_OLD.PROGRAMA, CUR_OLD.FEC_ULT_ACTUAL)
INSERT INTO SEG_USU_DPROFESORES VALUES (CUSUARIO,NEW, DATETIME(),VAL(thisform.container1.cedula.value), THISFORM.CONTAINER1.APELLIDOS.VALUE,THISFORM.CONTAINER1.NOMBRES, THISFORM.CONTAINER1.NACIONAL, THISFORM.CONTAINER1.SEXO.VALUE, THISFORM.CONTAINER1.CIVIL.Value, THISFORM.CONTAINER1.FECNAC.VALUE, THISFORM.CONTAINER1.DIRECCION.Value, THISFORM.CONTAINER1.CELULAR.Value, THISFORM.CONTAINER1.EMAIL.Value, DATE())
ENDIF
AGRADEZCO LA AYUDA!!!
m.cedula = val(thisform.container1.cedula.value)
SELECT profesores
LOCATE FOR PROFESORES.CEDULA == m.cedula
SELECT USUARIO
LOCATE FOR USUARIO.LOG_USU == CUSUARIO
IF FOUND()
SELECT CUR_OLD
SELECT SEG_USU_DPROFESORES
INSERT INTO SEG_USU_DPROFESORES VALUES (CUSUARIO,OLD, DATETIME(), VAL(M.CEDULA), CUR_OLD.APELLIDOS, CUR_OLD.NOMBRES, CUR_OLD. NACIONAL, CUR_OLD.SEXO, CUR_OLD.CIVIL, CUR_OLD.FECNAC, CUR_OLD.DIRECCION, CUR_OLD. CELULAR, CUR_OLD.EMAIL, CUR_OLD.FECING, CUR_OLD.PROGRAMA, CUR_OLD.FEC_ULT_ACTUAL)
INSERT INTO SEG_USU_DPROFESORES VALUES (CUSUARIO,NEW, DATETIME(),VAL(thisform.container1.cedula.value), THISFORM.CONTAINER1.APELLIDOS.VALUE,THISFORM.CONTAINER1.NOMBRES, THISFORM.CONTAINER1.NACIONAL, THISFORM.CONTAINER1.SEXO.VALUE, THISFORM.CONTAINER1.CIVIL.Value, THISFORM.CONTAINER1.FECNAC.VALUE, THISFORM.CONTAINER1.DIRECCION.Value, THISFORM.CONTAINER1.CELULAR.Value, THISFORM.CONTAINER1.EMAIL.Value, DATE())
ENDIF
AGRADEZCO LA AYUDA!!!
Valora esta pregunta


0