🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi.bazy-danych
Article #82829

Problem z wpisaniem sql-a

#82829
From: konsul41
Date: Fri, 28 Jul 2017 09:12
56 lines
2571 bytes
Delphi XE2
Zeosy

Mam dziwny problem z wpisywaniem SQL do Query

CREATE OR REPLACE FUNCTION dajmiesieczneodpisyzarok(
     IN rok character varying,
     IN id_srodektrwaly integer)
   RETURNS TABLE(id_srodektrwaly numeric, "styczeń" numeric, luty 
numeric, marzec numeric, "kwiecień" numeric, maj numeric, czerwiec 
numeric, lipiec numeric, "sierpień" numeric, "wrzesień" numeric, 
"październik" numeric, listopad numeric, "grudzień" numeric) AS
$BODY$
        SELECT *
          FROM crosstab( 'select 
id_srodektrwaly::numeric,miesiac::numeric,miesodpis::numeric from 
planamortyzacji where rok='''||$1||''' and id_srodektrwaly='''||$2||''' 
order by id_srodektrwaly')
             AS final_result(id_srodektrwaly numeric,styczeń 
numeric,luty numeric,marzec numeric,kwiecień numeric,maj 
numeric,czerwiec numeric,lipiec numeric,sierpień numeric,wrzesień 
numeric,październik numeric,listopad numeric,grudzień numeric);
        $BODY$
   LANGUAGE sql VOLATILE
   COST 100
   ROWS 1000;
ALTER FUNCTION dajmiesieczneodpisyzarok(character varying, integer)
   OWNER TO wij;


W PGadmin funkcja zapisuje się prawidłowo i działa zgodnie z moimi 
oczekiwaniami.

Niestety map problem aby wpisać ją do bazy za pomocą Zeosów
nie zależnie czy wpisuję ją bespośrednio
Query.SQl.text:='...';

czy za pomocą resource string
resourcestring
   sql='...';
Query.SQL.Text:=sql;

czy za pomocą
Query.Close;
Query.SQL.Clear;
Query.SQL.add('...');

ciągle dostaję Access Violation
to
Query.SQL.add('SELECT * FROM planamortyzacji;');
oczywiście nie przynosi błędów.



Co jest nie tak w powyższym SQl, że nie chce wejść?
Ewentualnie jak ominąć problem czyli tworzyć ją poza zeosami?
Technical Details
Message-ID: <olev57$9cf$1@portraits.wsisiz.edu.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!wsisiz.edu.pl!.POSTED.jue163.internetdsl.tpnet.pl!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!wsisiz.edu.pl!.POSTED.jue163.internetdsl.tpnet.pl!not-for-mail
From: "konsul41@wp.pl" <konsul41@wp.pl>
Newsgroups: pl.comp.lang.delphi.bazy-danych
Subject: Problem z wpisaniem sql-a
Date: Fri, 28 Jul 2017 11:12:09 +0200
Organization: http://www.wit.edu.pl
Message-ID: <olev57$9cf$1@portraits.wsisiz.edu.pl>
Mime-Version: 1.0
Injection-Date: Fri, 28 Jul 2017 09:12:08 -0000 (UTC)
Injection-Info: portraits.wsisiz.edu.pl; posting-host="jue163.internetdsl.tpnet.pl:95.48.160.163"; logging-data="9615"; mail-complaints-to="abuse@wsisiz.edu.pl"
User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:52.0) Gecko/20100101 Thunderbird/52.2.1
X-Mozilla-News-Host: news://pl.comp.lang.delphi:119
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit