STORINGREMINDER

"localhost:/firebird/data/ILICHEVSK2.FDB". Процедуры

STORINGREMINDER_WEIGHT

Входные параметры

Параметр	Тип	Описание
ATYPE	INTEGER
WEIGHT	INTEGER

Выходные параметры

Параметр	Тип	Описание
WEIGHT0	INTEGER
WEIGHT1	INTEGER

Описание

(Нет описания для процедуры STORINGREMINDER_WEIGHT)

Определение

CREATE PROCEDURE STORINGREMINDER_WEIGHT(
    ATYPE INTEGER,
    WEIGHT INTEGER)
RETURNS (
    WEIGHT0 INTEGER,
    WEIGHT1 INTEGER)
AS
begin
  if (:ATYPE = 0) then begin
    WEIGHT0 = :WEIGHT;
    WEIGHT1 = 0;
  end
  else
  if (:ATYPE = 1) then begin
    WEIGHT0 = 0;
    WEIGHT1 = :WEIGHT;
  end
  suspend;
end