Procedura-SaveUserCalcChartSettings

Parametry:

Název	Popis	Datový typ
AID		Char(10)
ASpecialBehaviour		Integer

Tělo:

begin
  SELECT count(*) FROM UserCalcChartSettings A WHERE (A.ID = :AID) into mCount;
  if (mCount = 1) then begin
    UPDATE UserCalcChartSettings SET SpecialBehaviour = :ASpecialBehaviour  WHERE ID = :AID;
  end
  if (mCount = 0) then begin
    INSERT INTO UserCalcChartSettings (ID, SpecialBehaviour) VALUES (:AID, :ASpecialBehaviour);
  end
end;

Generated by ABRA Software a.s. 27.10.2021 16:34:37