Anónimo
Llenar campos previa Selección Db Powerbuildr
Hola Experto mi pregunta es la siguiente
Tengo un Ddlb_usuario con datos que jalo desde mi tabla creada en sql anywhare
integer li_n,li_t
string ls_nombre
ls_usuarios=create DataStore
ls_usuarios.dataobject="dw_liscli"
ls_usuarios.settransobject(sqlca)
ls_usuarios.retrieve()
ls_usuarios.setsort("Ape_nom")
ls_usuarios.sort()
ddlb_usuario.reset()
for li_t=1 to li_n
ls_nombre=ls_usuarios.getitemstring(li_t,"Ape_nom")
ddlb_usuario.additem(ls_nombre)
next
destroy ls_usuarios
Es de nombres de usuarios con direcciones de residencia
Pero me gustaría que cuando selecciono uno de dichos clientes mediante el ddlb_usuario.
En un Sle_direc.text me aparezca automáticamente su dirección
la tabla es de nombre: Clientes y los campos : Ape_nom y distrito
Por favor Ayuda Urgente
Tengo un Ddlb_usuario con datos que jalo desde mi tabla creada en sql anywhare
integer li_n,li_t
string ls_nombre
ls_usuarios=create DataStore
ls_usuarios.dataobject="dw_liscli"
ls_usuarios.settransobject(sqlca)
ls_usuarios.retrieve()
ls_usuarios.setsort("Ape_nom")
ls_usuarios.sort()
ddlb_usuario.reset()
for li_t=1 to li_n
ls_nombre=ls_usuarios.getitemstring(li_t,"Ape_nom")
ddlb_usuario.additem(ls_nombre)
next
destroy ls_usuarios
Es de nombres de usuarios con direcciones de residencia
Pero me gustaría que cuando selecciono uno de dichos clientes mediante el ddlb_usuario.
En un Sle_direc.text me aparezca automáticamente su dirección
la tabla es de nombre: Clientes y los campos : Ape_nom y distrito
Por favor Ayuda Urgente
1 respuesta
Respuesta de jasamo19
1
Lo que tienes que hacer es capturar el "id" o código del cliente (por lo visto tu tabla tiene dos campos solamente: ape_nom, distrito, para este caso capturas "ape_nom") cuando selecciones un usuario y con una consulta traes su dirección.
1. En tu ventana ubicas un control Static Text llamado st_1.text //Aquí se mostrara su dirección
2. Te ubicas en tu control Ddlb_usuario y haces lo siguiente:
//Te ubicas en el Evento Modified() del Control Ddlb_usuario y escribes este código:
//definimos dos variables
string ls_cliente,ls_direccion
ls_cliente=this.text //obtenemos el cliente seleccionado en el control Ddlb_usuario
//Hacemos una consulta a tu tabla clientes
select distrito into :ls_direccion from clientes where ape_nom=:ls_cliente
using sqlca;
st_1.text=ls_direccion //Asignamos la direccion obtenida al control st_1.text
/*********************************************/
Suerte
1. En tu ventana ubicas un control Static Text llamado st_1.text //Aquí se mostrara su dirección
2. Te ubicas en tu control Ddlb_usuario y haces lo siguiente:
//Te ubicas en el Evento Modified() del Control Ddlb_usuario y escribes este código:
//definimos dos variables
string ls_cliente,ls_direccion
ls_cliente=this.text //obtenemos el cliente seleccionado en el control Ddlb_usuario
//Hacemos una consulta a tu tabla clientes
select distrito into :ls_direccion from clientes where ape_nom=:ls_cliente
using sqlca;
st_1.text=ls_direccion //Asignamos la direccion obtenida al control st_1.text
/*********************************************/
Suerte