| 
																	
																	
																		
																			
																		
																	
																	
																 | 
																@ -54,7 +54,7 @@ ui <- fluidPage( | 
															
														
														
													
														
															
																 | 
																 | 
																                             choices = list("NHC" = 1, "UMID/OVID" = 2, "UM/OV"=3),  | 
																 | 
																 | 
																                             choices = list("NHC" = 1, "UMID/OVID" = 2, "UM/OV"=3),  | 
															
														
														
													
														
															
																 | 
																 | 
																                             selected = 2), | 
																 | 
																 | 
																                             selected = 2), | 
															
														
														
													
														
															
																 | 
																 | 
																                textInput("id", label = "ID", value = ""), | 
																 | 
																 | 
																                textInput("id", label = "ID", value = ""), | 
															
														
														
													
														
															
																 | 
																 | 
																                actionButton("nitrosync", "Sincroniza Nitrógeno") | 
																 | 
																 | 
																 | 
															
														
														
													
														
															
																 | 
																 | 
																 | 
																 | 
																 | 
																                actionButton("nitrosync", "Actualiza Nitrógeno") | 
															
														
														
													
														
															
																 | 
																 | 
																            ), | 
																 | 
																 | 
																            ), | 
															
														
														
													
														
															
																 | 
																 | 
																            mainPanel( | 
																 | 
																 | 
																            mainPanel( | 
															
														
														
													
														
															
																 | 
																 | 
																                htmlOutput("report"), | 
																 | 
																 | 
																                htmlOutput("report"), | 
															
														
														
													
												
													
														
															
																| 
																	
																		
																			
																		
																	
																	
																	
																 | 
																
 |