Versions Compared

Version Old Version 32 New Version 33
Changes made by

Mika Koistinen

Kaj Bjork

Saved on

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.
Info

https://stash.skj.fi/projects/SKRIP

...

  • function TTbTable.TryPost (ms_viive: integer);

    • tTbTable-luokan menetelmä. Yrittää saada muokkausoikeuden taulun nykyiseen tietueeseen ja yritetään korkeintaan ms_viiveen ajan. Aika on millisekunteina. Palauttaa false jos epäonnistui, esim.

      Code Block
      languagedelphi
      if varsaldo.tryEdit(2000) then
begin
  varsaldo.fieldbyname('saldo').asfloat := 0;
  varsaldo.fieldbyname('muutosklo').asdatetime := now;
  if not varsaldo.trypost(2000) then
  begin
    logentry('Varsaldoa ei voi tallentaa');
    varsaldo.cancel;
  end;
end
else
  showmessage('Saldoa ei voi muokata');

Pervasive sql

Hakuindeksin vaihtaminen; esim toimittajataulussa key0=tunnus, key1 nimi, jos halutaan hakea nimellä vaihdetaan haun kohdistuminen taul.indexname := '1';

Tällä voi tarkistaa onko joku taulu olemassa: Select count(*) from X$File where Xf$Name = 'taulunnimi' , palauttaa 1 jos taulu olemassa


Koska pervasiven PDAC komponenttikirjastoista ei ole saatavilla lähdekoodeja, siitä emme ole voineet tuottaa titan rajanpinnan kaltaista liittymää. Sql rajapinta on tehty omilla rutiineilla jotka ovat

...