Power Builder - Ayuda con error URGENTE

 
Vista:

Ayuda con error URGENTE

Publicado por JULIO JUNGBLUTH (13 intervenciones) el 03/10/2005 16:28:58
Tengo un error en los datawindos, son 4 ventanas c/u con DW relacionados. Es una aplicacio que presenta una ventana con la especialidad de los libros, cuando el usuario seleccione una especialidad, en otra ventana se debe mostrar todos los libros pertenecientes a dicha especialidad. Si el usuario selecciona un libro en otra ventana se debe de presentar los detalles de dicho libro y ademas imprimir la informacion presentada

PRIMERA VENTANA

En la ventana especialidad tengo 3 botones: 1) El que me recupera las especialidades en el DataWindows (ese boton trabaja bien). 2) Al hacer clik en el segundo debe enlazarme a la otra ventana y mostrame los libros de dicha especialidad pero me muestra todos los libros de las diferentes especialidades 3) El 3 boton es para salir

"Codigo para el 1er boton"

dw_especialidad.setTransObject(sqlca)
dw_especialidad.Retrieve()

"Codigo para el 2do boton"

integer nfila

nfila = dw_especialidad.GetRow()

if nfila > 0 then
scodigo = trim(dw_especialidad.GetItemString(nfila,"n_nombre_especialidad"))
OpenWithParm(w_prueba3,scodigo)
else
dw_especialidad.Reset()
end if

SEGUNDA VENTANA

"Evento Open" DE LA VENTANA

string ls_codigo_especialidad
//ls_codigo_especialidad = MessageBox.StringParm OJO ACA TAMBIEN TENGO ERROR
this.Title = This.Title + "Especialidad del Libro" +ls_codigo_especialidad
dw_libro.SetTransObject(sqlca)
dw_libro.Retrieve(ls_codigo_especialidad)


En la ventana LIBROS tengo 3 botones: 1) El que me refresca el DataWindows . 2) Al hacer clik en el segundo debe enlazarme a la otra ventana y mostrame el DETALLE de dicho LIBRO pero me muestra todos los DETTALLES de los diferentes LIBROS 3) El 3 boton es para salir

"Codigo para el 1er boton"

dw_libro.Reset()

"Codigo para el 2do boton"

Integer nFila
nFila = dw_libro.GetRow()
If nFila > 0 then
scodigo1 = trim(dw_libro.GetItemString(nFila,"n_titulo"))
openWithParm(w_prueba3b,scodigo1)
else
dw_libro.Reset()
end if

TERCERA VENTANA

"Evento Open" DE LA VENTANA

string ls_codigo_especialidad

//ls_codigo_especialidad=MessageBox.StringParm ACA TAMBIEN ME SALE WARNIG
this.title=this.title+"Detalle del Libro" +ls_codigo_especialidad
dw_libros.SetTransObject(sqlca)
dw_libros.Retrieve(ls_codigo_especialidad)

En la ventana DETALLE tengo 2 botones: 1) el que sirve para inprimir . 2) El 2 boton es para salir

"Codigo para el 1er boton"

integer nFila
nFila = dw_libros.GetRow()
if nFila > 0 then
scodigo = trim(dw_libros.GetItemString(nFila,"n_titulo"))
OpenWithParm(w_prueba3c,scodigo)
else
dw_libros.reset()
end if

CUARTA VENTANA

"Evento Open" DE LA VENTANA

string ls_codigo_especialidad

//ls_codigo_especialidad=MessageBox.StringParm //WARNIG
dw_reporte.SetTransObject(sqlca)
dw_reporte.Retrieve(ls_codigo_especialidad)

"Codigo para el 1er boton"

dw_reporte.print() //QUISIERA QE ME IMPRIMA SOLO EL DETALLE DEL
//LIBRO ESPECIFICO


POR FAVOR ESPERO SU AYUDA GRACIAS DE ANTEMANO
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda con error URGENTE

Publicado por karen (274 intervenciones) el 03/10/2005 16:56:23
en la ventana 2
ls_codigo_especialidad = message.powerobjectparm

this.title=this.title+"Detalle del Libro" +ls_codigo_especialidad
dw_libros.SetTransObject(sqlca)
dw_libros.Retrieve(ls_codigo_especialidad)

ventana 4
string ls_codigo_especialidad

//ls_codigo_especialidad= message.powerobjectparm
dw_reporte.SetTransObject(sqlca)
dw_reporte.Retrieve(ls_codigo_especialidad)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda con error URGENTE

Publicado por WEND (95 intervenciones) el 03/10/2005 20:36:20
Ok. solo que debe ser message.stringparm porque el valor que recibe es un string.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar