| 
						
						
							
								
							
						
						
					 | 
				
				 | 
				
					@ -3,12 +3,12 @@ source("sqlFunctions.R") | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					## Asegurarse de que la variable file sea la que nos corresponde: | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					file | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					
 | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					# Crear copia de seguridad | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					sqlBackUp(bu.dir="BU_OVARIO") | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					
 | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					# Cargar dependencias | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					sqlInitialize() | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					
 | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					# Crear copia de seguridad | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					sqlBackUp(bu.dir="BU_OVARIO") | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					
 | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					# Inicializar conexión | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					dta<-odbcConnectAccess2007(access.file = file,  | 
				
			
			
		
	
		
			
				
					 | 
					 | 
				
				 | 
				
					                           pwd = .rs.askForPassword("Enter password:")) | 
				
			
			
		
	
	
		
			
				
					| 
						
							
								
							
						
						
						
					 | 
				
				 | 
				
					
 |