Valor entero en un sle
Publicado por Ricardo Ríos (10 intervenciones) el 15/10/2006 21:40:16
¿Hola, alguien sabe como puedo mostrar un valor entero en un sle? no se como hacerlo, solo me funciona bien con los datos de tipo string, aca les dejo las lineas de codigo a ver si me ayudan, mi problema es que los datos enteros no puedo mostrarlos en los cuadros de texto (sle) porque me marca un error, cualquier ayuda por favor haganmela saber urgenete
int n_sol, n_esc, n_parroquia, usuarios
string no_esc, no_parroquia, direccion, observaciones, ti_escuela, turno, atend
date f_solicitud, f_atendido
n_sol = integer(sle_1.text)
SELECT id_escuela, observaciones, turnomv, fecha_solicitud, fecha_asignada, atendido
INTO :n_esc, :observaciones, :turno, :f_solicitud, :f_atendido, :atend
FROM solicitud
WHERE :n_sol = solicitud.id_solicitud ;
SELECT nombre_escuela, direccion_escuela, tipo_escuela, id_parroquia
INTO :no_esc, :direccion, :ti_escuela, :n_parroquia
FROM escuelas
WHERE :n_esc = escuelas.id_escuela ;
SELECT nombre_parroquia
INTO :no_parroquia
FROM parroquias
WHERE :n_parroquia = parroquias.id_parroquia ;
sle_10.text = observaciones
sle_3.text = no_esc
sle_5.text = no_parroquia
sle_6.text = direccion
If Turno = "1" then
cbx_1.checked = TRUE
cbx_2.checked = FALSE
elseif Turno = "2" then
cbx_1.checked = TRUE
cbx_2.checked = TRUE
elseif Turno = "3" then
cbx_1.checked = FALSE
cbx_2.checked = TRUE
end if
if ti_escuela = "1" then
rb_1.checked = TRUE
elseif ti_escuela = "2" then
rb_2.checked = TRUE
elseif ti_escuela = "3" then
rb_3.checked = TRUE
elseif ti_escuela = "4" then
rb_4.checked = TRUE
elseif ti_escuela = "5" then
rb_5.checked = TRUE
end if
if atend = "S" then
rb_6.checked = TRUE
elseif atend = "N" then
rb_7.checked = TRUE
end if
int n_sol, n_esc, n_parroquia, usuarios
string no_esc, no_parroquia, direccion, observaciones, ti_escuela, turno, atend
date f_solicitud, f_atendido
n_sol = integer(sle_1.text)
SELECT id_escuela, observaciones, turnomv, fecha_solicitud, fecha_asignada, atendido
INTO :n_esc, :observaciones, :turno, :f_solicitud, :f_atendido, :atend
FROM solicitud
WHERE :n_sol = solicitud.id_solicitud ;
SELECT nombre_escuela, direccion_escuela, tipo_escuela, id_parroquia
INTO :no_esc, :direccion, :ti_escuela, :n_parroquia
FROM escuelas
WHERE :n_esc = escuelas.id_escuela ;
SELECT nombre_parroquia
INTO :no_parroquia
FROM parroquias
WHERE :n_parroquia = parroquias.id_parroquia ;
sle_10.text = observaciones
sle_3.text = no_esc
sle_5.text = no_parroquia
sle_6.text = direccion
If Turno = "1" then
cbx_1.checked = TRUE
cbx_2.checked = FALSE
elseif Turno = "2" then
cbx_1.checked = TRUE
cbx_2.checked = TRUE
elseif Turno = "3" then
cbx_1.checked = FALSE
cbx_2.checked = TRUE
end if
if ti_escuela = "1" then
rb_1.checked = TRUE
elseif ti_escuela = "2" then
rb_2.checked = TRUE
elseif ti_escuela = "3" then
rb_3.checked = TRUE
elseif ti_escuela = "4" then
rb_4.checked = TRUE
elseif ti_escuela = "5" then
rb_5.checked = TRUE
end if
if atend = "S" then
rb_6.checked = TRUE
elseif atend = "N" then
rb_7.checked = TRUE
end if
Valora esta pregunta


0