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

FILL_ITRETURNACT

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

(Нет входных параметров)

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

Описание

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

Определение

CREATE PROCEDURE FILL_ITRETURNACT
RETURNS (
    INVENTORYID INTEGER,
    TRANSPORTNUMBER VARCHAR(31))
AS
begin
  for
    select ITRETURNACT.INVENTORYID, ITTRANSPORT.TRANSPORTNUMBER
      from ITRETURNACT
        left join ITTRANSPORT on (ITTRANSPORT.INVENTORYID = ITRETURNACT.INVENTORYID)
    into :INVENTORYID, :TRANSPORTNUMBER

  do begin
--    if (TRANSPORTNUMBER is not null) then
      update ITRETURNACT
      set TRANSPORTNUMBER = :TRANSPORTNUMBER
      where (INVENTORYID = :INVENTORYID);

    suspend;
  end
end