Displaying 2 results from an estimated 2 matches for "policita".
2019 Sep 23
5
Consulta
...9;],'.pdf',sep='')?
if (!file.exists(pto)){?
file.copy(from = pfrom,to=pto)?
}?
}?
}?
?
salida <- "/Renombra/Grupos/"?
dirActual <- getwd()?
polizas_con_grupos <- as.character(sqldf("select poliza from ungrupo")$poliza)?
setwd(ruta)?
for (policita in polizas_con_grupos){?
archivos <- as.character(sqldf(paste("select archivo from renglones where poliza like '%",policita,"%'",sep=''))$archivo)?
staple_pdf(input_files = archivos,output_filepath = paste(ruta,salida,policita,".pdf",sep='...
2019 Sep 24
2
Consulta
...le.exists(pto)){?
> file.copy(from = pfrom,to=pto)?
> }?
> }?
> }?
> ?
> salida <- "/Renombra/Grupos/"?
> dirActual <- getwd()?
> polizas_con_grupos <- as.character(sqldf("select poliza from ungrupo")$poliza)?
> setwd(ruta)?
> for (policita in polizas_con_grupos){?
> archivos <- as.character(sqldf(paste("select archivo from renglones where poliza like '%",policita,"%'",sep=''))$archivo)?
> staple_pdf(input_files = archivos,output_filepath = paste(ruta,salida,policita,".pdf",sep=...