🚀 go-pugleaf

W dniu 2017-07-13 o 13:33, immo pisze:
> W dniu czwartek, 13 lipca 2017 13:13:17 UTC+2 użytkownik Pancio napisał:
>>>> Czasami numerację rekordów pokazuję w aplikacji, aby użytkownik miał wgląd w numer rekordu. I już kilku userów zgłosiło mi, że nagle "zginęło im" 1000
>>>
>>> I choćby z tego powodu nigdy tego nie robię :) ID jest wewnętrzną sprawą programu :P Jak chcesz mieć numerację dla człowieka to trzeba ją zrobić.
>>
>> A tak swoją drogą w jaki sposób to robisz? Trigery czy sam to obsługujesz z poziomu aplikacji? Bo chyba też będę musiał się z tym zmierzyć i szukam jakiegoś sprawdzonego, sprawnego rozwiązania.
> 
> Mówisz o logowaniu operacji?
Mowa chyba o nadawaniu numerków :)
Ja rozwiązałem to w ten sposób, że dostarczyłem nową funkcję do 
preprocesora FireDAC, która jest wywoływana jako DefaultExpression 
danego pola, które chce dostać nową wartość przy dodaniu rekordu.
Ta funkcja zwraca odpowiednią wartość i w ten sposób obsługuje ID i 
numeratory - np. numer jakiegoś dokumentu.

> Hmm... Ogólnie z poziomu aplikacji. Ale - ja nie koduje w sposób Click and Code :) Mam framework, gdzie definicje SQLi sobie siedzą np. w bazie, dana forma wie co ma obsługiwać. SQLe są obsługiwane przez odpowiednią klasę nimi zarządzającą. Przez co ma ona wiedzę o jej stanie przed i po aktualizacji i potrafi automatycznie logować to do np. bazy/ pliku / czy w jakiekolwiek inne miejsce. Core aplikacji ma też informacje o sesji, użytkownikach, uprawnieniach itd itp, więc log może być bardzo szczegółowy.

To się da zrobić w FireDAC/AnyDAC by design, ale trzeba ciut niżej 
zejść. Lepiej kod pokażę:
<code>
function TADAdaptedDataSetHelper.GetChangesAsXML: string;
var
   lXMLStorage  : TADStorage;
   lStringStream: TStringStream;
   lTable       : TADDatSTable;
   lEncoder     : TADEncoder;
begin
   lEncoder          := TADEncoder.Create(nil);
   //-- kododwanie XML dla typu danych XML w MSSQL musi być UTF-16!
   lEncoder.Encoding := ecUTF16;

   lTable        := Self.Table.GetChanges();
   lXMLStorage   := ADStorageManager().GetStorage('', sfXML, 
Self.ResourceOptions, lEncoder);
   lStringStream := TStringStream.Create();
   try
     lXMLStorage.Open('', lStringStream, smWrite);
     lTable.SaveToStorage(lXMLStorage);
     lXMLStorage.Close;
     Result := lStringStream.DataString;
   finally
     lTable.Free;
     lXMLStorage.Free;
     lStringStream.Free;
     lEncoder.Free;
   end;
end;
</code>

Kod jest prosty nie wymaga tłumaczenia, raczej...
Warunek jest jeden - DataSet z którego pobieramy zmiany musi działać w 
trybie CachedUpdates.
Natomiast sam XML zwraca dla każdego zmienionego wiersza jego stan przed 
i po zmianach - wystarczy spojrzeć na tak wygenerowanego XMLa i wszystko 
będzie jasne.
Można sobie tego XMLa sparsować i wydłubać z niego tylko np. zmiany.
Kod jest na tyle ogólny, że zadziała z dowolnym DataSetem.

> Gdybym tego nie miał to poszedł bym (jako że nie używam Expressa) w kierunku obsługi logów przez SQLServer - bo tak jest najprościej nie dotykając kodu.
Ale zdajesz sobie sprawę, że CDC to tylko w wersji Enterprise?
A ta wersja MSSQLa z definicji będzie tylko w bardzo dużych organizacjach...

> Pytanie jest zawsze takie samo - chcesz zapłacić i się mniej narobić (kupując gotowe rozwiązanie, lepszą wersję SQLServera itd itp), czy zaoszczędzić (teoretycznie) i mieć więcej roboty tworząc swoje rozwiązanie.
Mam zupełnie inną opinię w tej kwestii.
Żaden gotowiec po stronie bazy danych nie da Ci wszystkiego, co jest 
potrzebne Twojej aplikacji.
No chyba, ze ta aplikacja jest prosta i realizuje dostęp do danych 
table-by-table - to może, ale i to nie zawsze...

Jest jeszcze inne podejście, po bandzie - ale to wymaga zmiany podejścia 
do programowania o 180 stopni ;-)
http://blog.synopse.info/post/2014/06/22/Audit-trail-for-ORM-change-tracking

-- 
wloochacz