Ошибка в result_create (conn @ ptr, оператор): рядом с "(": синтаксическая ошибка в R - PullRequest
Новая
       42

Ошибка в result_create (conn @ ptr, оператор): рядом с "(": синтаксическая ошибка в R

0 голосов
/ 18 октября 2018

Мой пост похож на этот SQLite в R - ошибка в result_create (conn @ ptr, оператор): рядом с ")" , но решение не работает 

library("RODBC")
library("sqldf")
library("dplyr")

#connect to sql

dbHandle <- odbcDriverConnect("driver={SQL Server};server=MYNAME;database=AOtest;trusted_connection=true")

sql <- paste0 ("select * from  [AOtest].dbo.basisload1


               order by doc_date") 

ao <- sqlQuery(dbHandle, sql)



sqldf(";With CTE
AS
(
  select *,
  row_number() over (partition by [product_id],shop_code order by [doc_date])-row_number() over (partition by [product_id],shop_code,mark_1 order by [doc_date]) as grp
  from ao
),
CTE1
AS
(
  SELECT *
    FROM CTE c
  OUTER APPLY
  (
    SELECT TOP 1 grp as prvgrp
    FROM CTE
    WHERE mark_1 = 0
    AND doc_date <= c.doc_date
    and [product_id] = c.[product_id]
    and shop_code = c.shop_code
    ORDER BY doc_date DESC
  ) prev
  OUTER APPLY
  (
    SELECT TOP 1 grp as nxtgrp
    FROM CTE
    WHERE mark_1 = 0
    and [product_id] = c.[product_id]
    and shop_code = c.shop_code
    AND doc_date >= c.doc_date
    ORDER BY doc_date 
  ) nxt
)

SELECT c.product_id,c.shop_code,c.doc_date,c.ship_count,c.mark_1,case when med < ship_count then med when ship_count < 0 then 0 else ship_count end as output,
c.ship_count - case when med < ship_count then med when ship_count < 0 then 0 else ship_count end as output1
into test2
FROM CTE1 c
OUTER APPLY (
  SELECT MAX(med) AS med
  FROM
  (
    SELECT PERCENTILE_DISC(0.5) WITHIN GROUP(ORDER BY CASE WHEN ship_count <= 0 THEN 0 ELSE ship_count END) OVER (PARTITION BY [product_id],shop_code,grp) AS med
    FROM CTE
    WHERE grp IN (nxtgrp,prvgrp)
    and [product_id] = c.[product_id]
    and shop_code = c.shop_code
  )r
)c2
order by doc_date")

, поэтомуошибка 

Error in result_create(conn@ptr, statement) : near "(": syntax error

Как избежать этой ошибки в моем случае.Конечно, я мог запустить этот код из SQL Server Management Studio, но сервер, на котором установлен sql, все время занятый другими экспертами и другими задачами, на моем сервере только R.

...