[FKF2016] Dodanie zapisu do dokumentu w buforze
Problem wydaje się pozornie trywialny, ale po kilku godzinach prób wywieszam białą flagę.
Mam istniejący dokument DP i jedynie potrzebuję dodać 1 prosty zapis na końcu.
Oto kod:
Kod:
#include "fkutil.sci"
#include "dbnames.sci"
InfoDok dok
dok.bDok = dbOpenDokBase( indeksRoku(), ZRODLO_BUFOR, true )
dok.bZap = dbOpenZapBase( indeksRoku(), ZRODLO_BUFOR, true )
dok.bKsie = dbOpenDokBase( indeksRoku(), ZRODLO_KSIEGI, true )
dok.setkey("id")
dok.setkeyseg("id",72)
if dok.getrec(EQ) then error "nie znaleziono dokumentu"
dok.Insert(1)
dok.SetField(1, "kwota", 1002)
dok.SetField(1, "strona", 0)
dok.SetField(1, "idDlaRozliczen", 2)
dok.SetField(1, "synt", 100)
dok.SetField(1, "pozycja", 0)
dok.Insert(1)
dok.SetField(1, "kwota", 1002)
dok.SetField(1, "strona", 1)
dok.SetField(1, "synt", 200)
dok.SetField(1, "idDlaRozliczen", 1)
dok.SetField(1, "pozycja", 0)
dok.putRec()
Nie dostaję żadnych komunikatów błędu, Putrec zwraca 0, ale dokument ani drgnął.
Co ciekawe jak nie robię getrec-a, daję jakieś podstawowe dane w nagłówku dokumentu i insrec to dzieje się na odwrót - dostaję dziwny komunikat błędu*, ale się dodaje dokument :D
* -
https://www.toadworld.com/platforms/sql ... en-startedPS.
Jakby to było premium to bym się nie pierdzielił tylko insert zrobił, ale tutaj trochę się boję
