Campos de un DW + Inherit
Publicado por Kevin (6 intervenciones) el 30/09/2008 07:03:56
Hola!! Saludos con tod@s!!!
Estaba haciendo una ventana de mantenimiento el cúal próximamente voy a aplicarle herencia para poder reutilizar código, pero, me di con la sorpresa de algo. Procederé a explicarles:
Tengo una ventana que contiene un objeto datawindows, el cúal, jala datos de una determinada tabla. Ademas, hay un botón "Nuevo" para ingresar un nuevo registro. Los códigos de esta ventana son estos
Evento Open de la ventana:
dw_1.settransobject(sqlca)
dw_1.retrieve( )
Evento Clicked del botón "Nuevo"
dw_1.reset( )
dw_1.insertrow(0)
dw_1.setfocus( )
dw_1.setcolumn(1)
Y un Evento de Usuario en el objeto datawindows de nombre "tecla_enter" cuyo Event ID es "pbm_dwnprocessenter" que contiene este código:
string ls_campo
dw_1.accepttext( )
ls_campo = dw_1.object.id_clie[dw_1.getrow()]
//Ahora verificamos el valor q contiene la variable
If isnull(ls_campo) or trim(ls_campo)="" then
messagebox("","Ingrese un código")
else
Send(Handle(this),256,9,Long(0,0))
end if
El código precedente me permite capturar el contenido del campo "ide_clie" el cúal verifico si es un espacio en blanco o es nulo. Si es asÃ, me manda un mensaje indicamdome aquello, sino, pasa al siguiente campo con la lÃnea de código despues del else.
Ahora, si esta ventana con todos estos controles deseo hacerle un Inherit, obviamente me funcionaria con un dw que contenga el campo "ide_clie". Y es aquà donde radica mi problema:
¿Cómo puedo implementar un código estandar que me permita verificar los campos en el que yo haya ingresado un dato? Es este código el que quisiera volver standar:
ls_campo = dw_1.object.id_clie[dw_1.getrow()]
Principalmente con el object.id_clie, volverlo object.nombre_del_campo_que_contiene_el_dw
Espero me hayan etendido y espero haber sido claro. De antemano les agradezco por la ayuda prestada.
Saludos desde Perú.
Estaba haciendo una ventana de mantenimiento el cúal próximamente voy a aplicarle herencia para poder reutilizar código, pero, me di con la sorpresa de algo. Procederé a explicarles:
Tengo una ventana que contiene un objeto datawindows, el cúal, jala datos de una determinada tabla. Ademas, hay un botón "Nuevo" para ingresar un nuevo registro. Los códigos de esta ventana son estos
Evento Open de la ventana:
dw_1.settransobject(sqlca)
dw_1.retrieve( )
Evento Clicked del botón "Nuevo"
dw_1.reset( )
dw_1.insertrow(0)
dw_1.setfocus( )
dw_1.setcolumn(1)
Y un Evento de Usuario en el objeto datawindows de nombre "tecla_enter" cuyo Event ID es "pbm_dwnprocessenter" que contiene este código:
string ls_campo
dw_1.accepttext( )
ls_campo = dw_1.object.id_clie[dw_1.getrow()]
//Ahora verificamos el valor q contiene la variable
If isnull(ls_campo) or trim(ls_campo)="" then
messagebox("","Ingrese un código")
else
Send(Handle(this),256,9,Long(0,0))
end if
El código precedente me permite capturar el contenido del campo "ide_clie" el cúal verifico si es un espacio en blanco o es nulo. Si es asÃ, me manda un mensaje indicamdome aquello, sino, pasa al siguiente campo con la lÃnea de código despues del else.
Ahora, si esta ventana con todos estos controles deseo hacerle un Inherit, obviamente me funcionaria con un dw que contenga el campo "ide_clie". Y es aquà donde radica mi problema:
¿Cómo puedo implementar un código estandar que me permita verificar los campos en el que yo haya ingresado un dato? Es este código el que quisiera volver standar:
ls_campo = dw_1.object.id_clie[dw_1.getrow()]
Principalmente con el object.id_clie, volverlo object.nombre_del_campo_que_contiene_el_dw
Espero me hayan etendido y espero haber sido claro. De antemano les agradezco por la ayuda prestada.
Saludos desde Perú.
Valora esta pregunta


0