CREATE OR REPLACE PROCEDURE public."Prc_P_PurchaseRfqFromAgreement"(p_id uuid)
LANGUAGE plpgsql AS $$
DECLARE v_agr uuid; v_tenant uuid;
BEGIN
  SELECT "AgreementId", "TenantId" INTO v_agr, v_tenant FROM "Prc_T_PurchaseRfq" WHERE "Id" = p_id AND "Status" IN ('Draft', 'Sent');
  IF v_agr IS NULL THEN RETURN; END IF;
  IF EXISTS (SELECT 1 FROM "Prc_T_PurchaseRfqLine" WHERE "PurchaseRfqId" = p_id AND "IsDeleted" = false) THEN RETURN; END IF;

  INSERT INTO "Prc_T_PurchaseRfqLine" ("Id", "TenantId", "PurchaseRfqId", "ProductId", "Description", "Quantity", "UomId",
         "UnitPrice", "TaxRate", "Amount", "CreationTime", "IsDeleted")
  SELECT gen_random_uuid(), v_tenant, p_id, al."ProductId", al."Description", al."Quantity" - al."OrderedQuantity",
         al."UomId", al."UnitPrice", COALESCE(p."PurchaseTaxRate", 0), 0, NOW() AT TIME ZONE 'UTC', false
    FROM "Prc_V_PurchaseAgreementLine" al
    LEFT JOIN "Stk_T_Product" p ON p."Id" = al."ProductId"
   WHERE al."AgreementId" = v_agr AND al."IsDeleted" = false
     AND al."Quantity" - al."OrderedQuantity" > 0;
END;
$$;