DW Composite (2 dw filtrados)
Publicado por Leonardo (482 intervenciones) el 26/10/2009 22:16:22
Hola que tal, necesito hacer un reporte compuesto, el cual lleva dentro 3 DW, los cuales tienen sus parametros de entrada, pero no se como hacer para que haga los retrieve en cada uno
ya intente lo sig. en el informe principal coloque los parametros y luego en cada dw anidado asigne esos valores ( del inform principal) a cada uno de los parametros del de anidado, y solo lo hace para el primer DW, para los otros 2 nop, en modo de ejecucion del sistema, porque si lo hago en el preview del diseñador, si los muestra como es.!
2da. sin parametros en el contenedor de los dw, pero los dw anidados si con sus argumentos de consulta
e intente hacerlo con Getchild, pero solo me lo hace para el primer dw
para los otros 2, se los brinca y me muestra la ventana para que yo meta los valores..!!
s_reporte ls_reporte
string ls_orden
datawindowchild dw_rep1, dw_rep2
integer li_rtn, li_año, li_qna
string ls_qna
ls_reporte = Message.PowerObjectParm
this.title = ls_reporte.s_titulo
if ls_reporte.s_size = "C" then
st_size.Text = "Carta"
else
st_size.Text = "Oficio"
end if
dw_reporte.Object.DataWindow.Print.Preview = "yes"
dw_reporte.SetTransObject(sqlca)
string ls_er
if ls_reporte.s_size = "C" then
ls_er = dw_reporte.modify("datawindow.print.paper.size=1")
else
ls_er=dw_reporte.modify("datawindow.print.paper.size=5")
end if
dw_reporte.SetRedraw(false)
li_año = Integer( w_rep_comb.em_año.Text )
li_qna = Integer( w_rep_comb.em_qna.Text )
ls_qna = String(li_año)+"01"
//dw_reporte.Retrieve( li_año, li_qna, Integer(ls_qna) )
li_rtn = dw_reporte.GetChild('dw_1', dw_rep1)
dw_rep1.Settransobject( sqlca )
li_rtn = dw_reporte.GetChild('dw_2', dw_rep2)
dw_rep2.Settransobject( sqlca )
dw_rep2.Retrieve( li_año, li_qna, Integer(ls_qna) )
dw_rep1.Retrieve( li_año, li_qna, Integer(ls_qna) )
//if dw_reporte.Retrieve() = 0 then
// Messagebox("Aviso", "No existe Información Solicitada")
// close(this)
// return
//end if
//
//
dw_reporte.SetRedraw(true)
ya intente lo sig. en el informe principal coloque los parametros y luego en cada dw anidado asigne esos valores ( del inform principal) a cada uno de los parametros del de anidado, y solo lo hace para el primer DW, para los otros 2 nop, en modo de ejecucion del sistema, porque si lo hago en el preview del diseñador, si los muestra como es.!
2da. sin parametros en el contenedor de los dw, pero los dw anidados si con sus argumentos de consulta
e intente hacerlo con Getchild, pero solo me lo hace para el primer dw
para los otros 2, se los brinca y me muestra la ventana para que yo meta los valores..!!
s_reporte ls_reporte
string ls_orden
datawindowchild dw_rep1, dw_rep2
integer li_rtn, li_año, li_qna
string ls_qna
ls_reporte = Message.PowerObjectParm
this.title = ls_reporte.s_titulo
if ls_reporte.s_size = "C" then
st_size.Text = "Carta"
else
st_size.Text = "Oficio"
end if
dw_reporte.Object.DataWindow.Print.Preview = "yes"
dw_reporte.SetTransObject(sqlca)
string ls_er
if ls_reporte.s_size = "C" then
ls_er = dw_reporte.modify("datawindow.print.paper.size=1")
else
ls_er=dw_reporte.modify("datawindow.print.paper.size=5")
end if
dw_reporte.SetRedraw(false)
li_año = Integer( w_rep_comb.em_año.Text )
li_qna = Integer( w_rep_comb.em_qna.Text )
ls_qna = String(li_año)+"01"
//dw_reporte.Retrieve( li_año, li_qna, Integer(ls_qna) )
li_rtn = dw_reporte.GetChild('dw_1', dw_rep1)
dw_rep1.Settransobject( sqlca )
li_rtn = dw_reporte.GetChild('dw_2', dw_rep2)
dw_rep2.Settransobject( sqlca )
dw_rep2.Retrieve( li_año, li_qna, Integer(ls_qna) )
dw_rep1.Retrieve( li_año, li_qna, Integer(ls_qna) )
//if dw_reporte.Retrieve() = 0 then
// Messagebox("Aviso", "No existe Información Solicitada")
// close(this)
// return
//end if
//
//
dw_reporte.SetRedraw(true)
Valora esta pregunta


0