| Pregunta: | 48155 - COMO MIGRAR UN REPORTE DATAWINDOW A EXCEL EXCATAMENTE IGUAL? |
| Autor: | Fredy M. Rojas vasquez |
| hola amigo programadores trabajo con la version de power builder 7.0 Necesito ayuda como dice el titulo de mi pregunta, lo que deseo es migrar un objeto datawindow de tipo reporte a un archivo en excel pero debo pasarlo exactamente igual no de forma de datos en cada una de las celdas de la hoja de excel sino que tiene que ser como se ve en el objeto datawindow exactamente igual. Si alguien puede ayudarme a resolver esta duda por favor responderme a la brevedad posible acudo a uds. gracias por su tiempo Saludos. | |
| Respuesta: | Gabriel Manilla |
| TE ENVIO LAS DOS FORMAS CON LAS CUALES YO HE TRABAJADO Y ME HAN FUNCIONADO BIEN , SOLO RECUERDA Q' EL DW NO DEBERA DE CONTENER DATOS CONPUTADOS, COMO SUMAS, MULTIPLICACIONES Y ALGO ASI POR EL ESTILI YA QUE ESTOS DATOS NO LOS GUARDA Y LO QUE GUARDARA SERA BASURA O ALGUN DATO ASI MEDIO RRARO, LO QUE TENDRAS QUE HACER PARA ESTOS CALCULES ES O CALCULARLOS EN EL MISMO QUERY O HACER UN DW COPOSITE EL CUAL OBTENGA LOS DATOS DEL PRIMERO Y LOS COPIE Y CALCULE A SELDAS ESPECIFICAS SCRIP P/ GUARDAR DATOS DW EN ARCHIVO ESPECIFICADO string docname, named integer value value = GetFileSaveName("Seleciona la Ruta", docname, named, "TXT","Text Files (*.TXT),*.TXT, All Files (*.*),*.*") // docname = RUTA DE ARCHIVO // named = NOMBRE DE ARCHIVO IF value = 1 THEN //ASIGNAMOS PAHT A VARIABLE GLOBAL gs_path = "d:\temp\TEMPORAL.TXT" //ARCHIVO DE LEECTURA gs_path_org = docname //ARCHIVO ORIGINAL //"d:\temp\"+gs_nomclas+".TXT" //CREACION DEL ARCHIVO TXT w_rep2_varios.dw_clasif.SaveAsAscii("d:\temp\TEMPORAL.TXT",";","") w_rep2_varios.dw_clasif.SaveAsAscii("d:\temp\"+named,"","") f_lee_txtcrostab() MessageBox("Aviso", "Archivo de TEXTO creado con exito! +r Archivo delimitado por punto y coma. ( ; ) ") end if -------------------------------------------------------------------------------------------------- Exporta DW a Excel Cuando se exporta el contenido de una datawindow a formato excel, muchas veces el formato que tiene se pierde. Para evitar que se pierda el formato existe una alternativa Esto es guardarlo como tabla de html con un 'saveas' asi: dw_salida.saveas("c:salida.xls", HTMLtable!, false) Truco obtenido en la versión 7 de Power Builder. | |
| Respuesta: | Gabriel Manilla |
| SCRIP P/ GUARDAR DATOS DW EN ARCHIVO ESPECIFICADO string docname, named integer value value = GetFileSaveName("Seleciona la Ruta", docname, named, "TXT","Text Files (*.TXT),*.TXT, All Files (*.*),*.*") // docname = RUTA DE ARCHIVO // named = NOMBRE DE ARCHIVO IF value = 1 THEN //ASIGNAMOS PAHT A VARIABLE GLOBAL gs_path = "d:\temp\TEMPORAL.TXT" //ARCHIVO DE LEECTURA gs_path_org = docname //ARCHIVO ORIGINAL //"d:\temp\"+gs_nomclas+".TXT" //CREACION DEL ARCHIVO TXT w_rep2_varios.dw_clasif.SaveAsAscii("d:\temp\TEMPORAL.TXT",";","") w_rep2_varios.dw_clasif.SaveAsAscii("d:\temp\"+named,"","") f_lee_txtcrostab() MessageBox("Aviso", "Archivo de TEXTO creado con exito! +r Archivo delimitado por punto y coma. ( ; ) ") end if -------------------------------------------------------------------------------------------------- Exporta DW a Excel Cuando se exporta el contenido de una datawindow a formato excel, muchas veces el formato que tiene se pierde. Para evitar que se pierda el formato existe una alternativa Esto es guardarlo como tabla de html con un 'saveas' asi: dw_salida.saveas("c:salida.xls", HTMLtable!, false) Truco obtenido en la versión 7 de Power Builder. | |
| Respuesta: | Gabriel Manilla |
| SCRIP P/ GUARDAR DATOS DW EN ARCHIVO ESPECIFICADO string docname, named integer value value = GetFileSaveName("Seleciona la Ruta", docname, named, "TXT","Text Files (*.TXT),*.TXT, All Files (*.*),*.*") // docname = RUTA DE ARCHIVO // named = NOMBRE DE ARCHIVO IF value = 1 THEN //ASIGNAMOS PAHT A VARIABLE GLOBAL gs_path = "d:\temp\TEMPORAL.TXT" //ARCHIVO DE LEECTURA gs_path_org = docname //ARCHIVO ORIGINAL //"d:\temp\"+gs_nomclas+".TXT" //CREACION DEL ARCHIVO TXT w_rep2_varios.dw_clasif.SaveAsAscii("d:\temp\TEMPORAL.TXT",";","") w_rep2_varios.dw_clasif.SaveAsAscii("d:\temp\"+named,"","") f_lee_txtcrostab() MessageBox("Aviso", "Archivo de TEXTO creado con exito! +r Archivo delimitado por punto y coma. ( ; ) ") end if -------------------------------------------------------------------------------------------------- Exporta DW a Excel Cuando se exporta el contenido de una datawindow a formato excel, muchas veces el formato que tiene se pierde. Para evitar que se pierda el formato existe una alternativa Esto es guardarlo como tabla de html con un 'saveas' asi: dw_salida.saveas("c:salida.xls", HTMLtable!, false) Truco obtenido en la versión 7 de Power Builder. | |