Removes from Database the last (or the amount specified) entry.
sqlDropLast(conn, tablename, droplast=1)
Argument | Description |
---|---|
conn | connection handle returned by odbcConnect. |
tablename | character: a database table name accessible from the connected DSN. |
droplast | the amount of lines to be removed from the table strating from tail. By default, it removes only 1 line. |
Removes from Database the last (or the amount specified) entry.
Invisibly for success (and failures cause errors).
dta<-odbcConnect("test")
sqlDropLast(dta, "TableTest")
sqlDropLast<-function(conn, tablename, droplast=1){
table<-sqlFetch(conn, tablename)
table<-table[1:(nrow(table)-droplast),]
sqlSave(conn, table, tablename = tablename, safer = F)
}
Loads required libraries and gets the db location.
sqlInitialize()
Argument | Description |
---|
Loads required libraries and gets the db location from “ruta_database.R” file.
Invisibly for success (and failures cause errors).
sqlInitialize()
sqlInitialize<-function(){
library(tidyverse)
library(RODBC)
library(openxlsx)
## Conexión a la base de datos
source("ruta_database.R", encoding = "UTF-8")
}