<font size=2 face="sans-serif">Hola de nuevo:</font>
<br>
<br><font size=2 face="sans-serif">Ahora creo que he conseguido explicarme
bien, esos </font><tt><font size=2>callbacks</font></tt><font size=2 face="sans-serif">
de RODBC a R era justo lo que necesitaba para mostrar el progreso.</font>
<br><font size=2 face="sans-serif">Pero como RODBC no los tiene, mi gozo
en un pozo :-(</font>
<br>
<br><font size=2 face="sans-serif">La opción de partir los datos en varios
lotes ya la había sopesado pero teniendo en cuenta que esto era una especie
de <i>refinamiento</i> del código no me merece la pena.</font>
<br><font size=2 face="sans-serif">Seguiré ejecutando la query directamente
en el MSSQL para saber cuantos registros han subido como hacia hasta ahora.</font>
<br>
<br>
<br><font size=2 face="sans-serif">Muchas gracias por vuestra ayuda.</font>
<br>
<br><font size=2 face="sans-serif">Un saludete</font>
<br>
<br>
<br>
<br>
<br>
<table width=100%>
<tr>
<td><img src=cid:_1_07185AA0071856A00032D106C1257B44 width=80 height=1>
<td width=100%>
<table width=100%>
<tr valign=top>
<td width=100%><font size=2 face="sans-serif"><b>Re: [R-es] Barra de progreso
en RODBC</b></font></table>
<br>
<table width=100%>
<tr>
<td><font size=2 color=#e26200 face="sans-serif"><b>(Internet)</b></font>
<br><font size=2 color=#e26200 face="sans-serif"><b>cgb </b></font>
<td>
<td valign=top>
<table width=100%>
<tr valign=top>
<td><font size=2 color=#8f8f8f face="sans-serif">To:</font>
<td><font size=2 face="sans-serif">Jluis GILSANZ</font>
<tr valign=top>
<td><font size=1 color=#8f8f8f face="sans-serif">Cc:</font>
<td><font size=1 face="sans-serif">r-help-es</font></table>
<br>
<td>
<div align=right><font size=1 face="sans-serif">04/04/2013 16:14</font></div></table>
<br>
<table width=100%>
<tr>
<td><font size=2 color=#8f8f8f face="sans-serif">Sent by : </font><font size=2 color=#e26200 face="sans-serif"><b>gilbellosta@gmail.com</b></font>
<td>
<div align=right></div></table>
<br></table>
<br>
<br>
<hr>
<br>
<br>
<br><tt><font size=2>Hola, ¿qué tal?<br>
<br>
La única manera en que podrías conseguir lo que quieres es que el<br>
_driver_ de ODBC proporcionara _callbacks_ a R (para indicarle, por<br>
ejemplo, por dónde va en la tarea encomendada). Pero no es el caso.<br>
<br>
Una vez que llamas a sqlFetch o sqlSave, R pierde el control de lo que<br>
pasa hasta que el _driver_ decide que ha terminado de hacer lo que se<br>
le ha encomendado.<br>
<br>
La única manera de disponer de barras de progreso sería partiendo la<br>
captura e inserción de datos en bloques para actualizarla tú a mano.<br>
<br>
Un saludo,<br>
<br>
Carlos J. Gil Bellosta<br>
</font></tt><a href=http://www.datanalytics.com/><tt><font size=2>http://www.datanalytics.com</font></tt></a><tt><font size=2><br>
<br>
<br>
<br>
El día 4 de abril de 2013 10:34,  <jluis.gilsanz@tasacionesh.com>
escribió:<br>
> Hola de nuevo a todos:<br>
><br>
> Soy José Luis, Miguel Ángel ;-)<br>
><br>
><br>
> En las tres opciones que me habéis proporcionado tanto tu mismo como
Carlos,<br>
> las barras de progreso se aplican a procesos iterativos bien sean
bucles o<br>
> bien funciones tipo apply.<br>
><br>
><br>
> En mi caso tanto la importación de la Excel como la exportación al
MSSQL se<br>
> hacen en una sola instrucción sin utilizar ni bucles ni funciones
tipo<br>
> apply.Aunque supongo que internamente RODBC leerá/escribirá los datos
de<br>
> forma iterativa en ambas instrucciones la subida/bajada de datos en
R se<br>
> hace "del tirón".<br>
><br>
> Es decir la primera barra de progreso debería mostrar el progreso
del numero<br>
> de registros leídos hasta ese momento vs el numero total de registros
en la<br>
> instruccion:<br>
> XLS2010 <- sqlFetch(xls, "2010")<br>
><br>
> La segunda barra de progreso debería mostrar el progreso del numero
de<br>
> registros insertados en la tabla SQL  hasta ese momento vs el
numero total<br>
> de registros del df datos en la instrucción:<br>
> sqlSave(channel,datos,tablename ="Poblacion", rownames =
FALSE, append=TRUE,<br>
> fast=TRUE )<br>
><br>
> No sé si consigo explicarme con propiedad.<br>
><br>
> Muchas gracias por los aportes<br>
><br>
> Un saludo<br>
><br>
><br>
><br>
><br>
><br>
><br>
> Re: [R-es] Barra de progreso en RODBC<br>
><br>
> (Internet)<br>
> cof<br>
> To: miguel.angel.rodriguez.muinos<br>
> Cc: Jluis GILSANZ, r-help-es<br>
><br>
> 03/04/2013 17:02<br>
><br>
><br>
><br>
> ________________________________<br>
><br>
><br>
><br>
> Hola,<br>
><br>
> Hay alguna más...:<br>
><br>
> </font></tt><a href="http://cran.r-project.org/web/packages/pbapply/pbapply.pdf"><tt><font size=2>http://cran.r-project.org/web/packages/pbapply/pbapply.pdf</font></tt></a><tt><font size=2><br>
><br>
> Y otra en el paquete plyr:<br>
><br>
> </font></tt><a href="http://cran.r-project.org/web/packages/plyr/plyr.pdf"><tt><font size=2>http://cran.r-project.org/web/packages/plyr/plyr.pdf</font></tt></a><tt><font size=2><br>
><br>
> Saludos,<br>
> Carlos Ortega<br>
> </font></tt><a href=www.qualityexcellence.es><tt><font size=2>www.qualityexcellence.es</font></tt></a><tt><font size=2><br>
><br>
><br>
> El 3 de abril de 2013 14:33, <miguel.angel.rodriguez.muinos@sergas.es><br>
> escribió:<br>
> Hola jluis (probablemente, José o Juan Luis).<br>
><br>
> A ver si esto te sirve...<br>
><br>
> </font></tt><a href="http://ryouready.wordpress.com/2009/03/16/r-monitor-function-progress-with-a-progress-bar/"><tt><font size=2>http://ryouready.wordpress.com/2009/03/16/r-monitor-function-progress-with-a-progress-bar/</font></tt></a><tt><font size=2><br>
><br>
> Un saludo,<br>
> _____________________________<br>
> Miguel Ángel Rodríguez Muíños<br>
> Dirección Xeral de Innovación e Xestión da Saúde Pública<br>
> Consellería de Sanidade<br>
> Xunta de Galicia<br>
> </font></tt><a href=http://dxsp.sergas.es/><tt><font size=2>http://dxsp.sergas.es</font></tt></a><tt><font size=2><br>
><br>
><br>
><br>
><br>
><br>
><br>
> De: r-help-es-bounces@r-project.org [</font></tt><a href="mailto:r-help-es-bounces@r-project.org"><tt><font size=2>mailto:r-help-es-bounces@r-project.org</font></tt></a><tt><font size=2>]<br>
> En nombre de jluis.gilsanz@tasacionesh.com<br>
> Enviado el: miércoles, 03 de abril de 2013 13:40<br>
> Para: r-help-es@r-project.org<br>
> Asunto: [R-es] Barra de progreso en RODBC<br>
><br>
> Hola:<br>
><br>
> Me encuentro en la tesitura de hacer el siguiente proceso:<br>
> 1-.Leer una excel e importar los datos a R<br>
> 2-.Transformar esos datos mediante R<br>
> 3.-Subir esos datos transformados a MS SQL server.<br>
><br>
> El proceso en si lo tengo completado sin problemas, pero me gustaria
afinar<br>
> un poco mas el codigo y poner una barra de progreso en los pasos 1
y 3.<br>
> En ambos pasos utilizo RODBC para hacer la conexion:<br>
><br>
> En 1- el codigo seria<br>
> xls   <- odbcConnectExcel("Poblacion.xls")<br>
> XLS2010 <- sqlFetch(xls, "2010")<br>
><br>
> Pues bien la instruccion sqlFetch tarda unos 3 o 4 minutos en leer
la excel<br>
> y me gustaria mostrar una barra de progreso o similar mientras se
ejecuta.<br>
><br>
><br>
> Tras importar la excel, y luego de varias transformaciones subo el
df<br>
> resultante (llamado datos) mediante<br>
> channel <- odbcDriverConnect( "case=nochange; Driver=SQL Server;<br>
> Server=XXXXXXXX; Database=XXXXXXX; uid=XXXXt; pwd=XXXXt; wsid=XXXXXX;")<br>
> sqlSave(channel,datos,tablename ="Poblacion", rownames =
FALSE, append=TRUE,<br>
> fast=TRUE )<br>
><br>
> En este caso tarda aproximadamente una hora en la que R parece "muerto".<br>
> Haciendo una consulta contra la tabla Poblacion (en el analizador
de<br>
> consultas de MSSQL) puedo ver en cada momento cuantos registros se
han<br>
> insertado hasta ese momento pero me gustaria que R mostrara una indicacion<br>
> del estado de la insercion de datos en el Servidor.<br>
><br>
> Muchas gracias<br>
><br>
> ________________________________<br>
> Nota: A información contida nesta mensaxe e os seus posibles documentos<br>
> adxuntos é privada e confidencial e está dirixida únicamente ó seu<br>
> destinatario/a. Se vostede non é o/a destinatario/a orixinal desta
mensaxe,<br>
> por favor elimínea. A distribución ou copia desta mensaxe non está<br>
> autorizada.<br>
><br>
> Nota: La información contenida en este mensaje y sus posibles documentos<br>
> adjuntos es privada y confidencial y está dirigida únicamente a su<br>
> destinatario/a. Si usted no es el/la destinatario/a original de este<br>
> mensaje, por favor elimínelo. La distribución o copia de este mensaje
no<br>
> está autorizada.<br>
><br>
> See more languages: </font></tt><a href=http://www.sergas.es/aviso_confidencialidad.htm><tt><font size=2>http://www.sergas.es/aviso_confidencialidad.htm</font></tt></a><tt><font size=2><br>
><br>
>         [[alternative HTML version deleted]]<br>
><br>
><br>
> _______________________________________________<br>
> R-help-es mailing list<br>
> R-help-es@r-project.org<br>
> </font></tt><a href="https://stat.ethz.ch/mailman/listinfo/r-help-es"><tt><font size=2>https://stat.ethz.ch/mailman/listinfo/r-help-es</font></tt></a><tt><font size=2><br>
><br>
><br>
><br>
><br>
> --<br>
> Saludos,<br>
> Carlos Ortega<br>
> </font></tt><a href=www.qualityexcellence.es><tt><font size=2>www.qualityexcellence.es</font></tt></a><tt><font size=2><br>
><br>
><br>
> -- AVISO LEGAL --<br>
><br>
> Los datos personales que en esta comunicación aparecen, así como los
que<br>
> nuestra<br>
> empresa mantiene de Vd. y de su empresa, son tratados con la finalidad
de<br>
> mantener<br>
> el contacto así como realizar las gestiones que en esta aparecen (Ley<br>
> Orgánica<br>
> 15/1999, de 13 de diciembre, de Protección de Datos de Carácter Personal).<br>
> Puede ejercer sus derechos de acceso, rectificación, cancelación y
oposición<br>
> dirigiéndose a atencion.clientes@tasacionesh.com<br>
> La utilización de su dirección de correo electrónico por parte de
nuestra<br>
> empresa<br>
> queda sujeta a las disposiciones de la Ley 34/2002, de Servicios de
la<br>
> Sociedad de<br>
> la Información y el Comercio Electrónico. Si Vd. recibe comunicación<br>
> comercial por<br>
> nuestra parte y desea dejar de recibirla, rogamos nos lo comunique
por vía<br>
> electrónica<br>
> a través de la dirección atencion.clientes@tasacionesh.com<br>
><br>
><br>
> _______________________________________________<br>
> R-help-es mailing list<br>
> R-help-es@r-project.org<br>
> </font></tt><a href="https://stat.ethz.ch/mailman/listinfo/r-help-es"><tt><font size=2>https://stat.ethz.ch/mailman/listinfo/r-help-es</font></tt></a><tt><font size=2><br>
><br>
</font></tt>
<br><p><br>
-- AVISO LEGAL -- </p>

<p>Los datos personales que en esta comunicación aparecen, así como los que nuestra <br>
empresa mantiene de Vd. y de su empresa, son tratados con la finalidad de mantener <br>
el contacto así como realizar las gestiones que en esta aparecen (Ley Orgánica <br>
15/1999, de 13 de diciembre, de Protección de Datos de Carácter Personal).   <br>
Puede ejercer sus derechos de acceso, rectificación, cancelación y oposición <br>
dirigiéndose a atencion.clientes@tasacionesh.com <br>
La utilización de su dirección de correo electrónico por parte de nuestra empresa <br>
queda sujeta a las disposiciones de la Ley 34/2002, de Servicios de la Sociedad de <br>
la Información y el Comercio Electrónico. Si Vd. recibe comunicación comercial por <br>
nuestra parte y desea dejar de recibirla, rogamos nos lo comunique por vía electrónica <br>
a través de la dirección atencion.clientes@tasacionesh.com</p>