19 lines
813 B
PL/PgSQL
19 lines
813 B
PL/PgSQL
-- Hareket satırı kaydı sonrası: satırın araç çubuğu işlemi (GenerateLots = Lot/Seri Oluştur, AssignLots = Otomatik Ata) ve belge özeti.
|
||
CREATE OR REPLACE PROCEDURE public."Stk_P_TransferLineAfterSave"(p_id uuid, p_user_id uuid DEFAULT NULL)
|
||
LANGUAGE plpgsql AS $$
|
||
DECLARE v_act varchar(16); v_doc uuid;
|
||
BEGIN
|
||
SELECT "PendingAction", "TransferId" INTO v_act, v_doc FROM "Stk_T_TransferLine" WHERE "Id" = p_id;
|
||
|
||
IF v_act IS NOT NULL THEN
|
||
UPDATE "Stk_T_TransferLine" SET "PendingAction" = NULL WHERE "Id" = p_id;
|
||
IF v_act = 'GenerateLots' THEN
|
||
CALL public."Stk_P_TransferLineLotGenerate"(p_id, p_user_id);
|
||
ELSIF v_act = 'AssignLots' THEN
|
||
CALL public."Stk_P_TransferLineLotAssign"(p_id, p_user_id);
|
||
END IF;
|
||
END IF;
|
||
|
||
CALL public."Stk_P_TransferRecalc"(v_doc);
|
||
END;
|
||
$$;
|