ROracle

Question

如何使用 dbWriteTable 将带有日期列的数据框写入 Oracle 数据库？我正在尝试：

df <-read.table(header = TRUE, sep = ',', stringsAsFactors = FALSE,
text="
id,product,origination_date,repayment_date
1,A,2012-01-01,2012-02-01
2,A,2012-01-01,2012-04-01
3,A,2012-01-01,NA
4,A,2012-02-01,2012-03-01
")

df$origination_date <- as.Date(df$origination_date, format = '%Y-%d-%m')
df$repayment_date <- as.Date(df$repayment_date, format = '%Y-%d-%m')
names(df) <- toupper(names(df))

dbWriteTable(oraCon, 'TMP', df)

这是数据库中的结果：

1   A   31-DEC-11 11.00.00.000000 PM    01-JAN-12 11.00.00.000000 PM
2   A   31-DEC-11 11.00.00.000000 PM    03-JAN-12 11.00.00.000000 PM
3   A   31-DEC-11 11.00.00.000000 PM    
4   A   01-JAN-12 11.00.00.000000 PM    02-JAN-12 11.00.00.000000 PM

我也许可以理解我得到的是时间戳而不是日期，但不明白为什么 31-DEC-11 我想要 01-JAN-12.

Answer 1

此问题是由于您的操作系统和 Oracle 会话的时区设置所致。您可以按如下方式更改这些设置：

Sys.setenv(TZ='CET')
Sys.setenv(ORA_SDTZ='CET')

显然，您可能需要选择不同的时区。我将这些设置包含在我所有 R 脚本的开头，但可能有一种方法可以将这些设置设为新的默认设置。

有关 Oracle 时区参数的详细信息，请参阅 here。

ROracle - dbWriteTable，日期列

ROracle - dbWriteTable, date columns

oracle

r