Changes between Version 4 and Version 5 of Triggers

Timestamp:

08/21/25 00:49:39 (2 months ago)

Author:

221012

Comment:

--

Triggers

@@ -62 +62 @@
 EXECUTE FUNCTION suspend_rating_on_repeated_delinquency();
 }}}
+
+== 3. Тригер за закажување на инспекција на единицата веднаш по креирање на договор
+
+* Со овој тригер се креираат 3 инспекции на единицата веднаш по креирање на договорот, првата е пред да се всели изнајмувачот, втората се закажува за оние единици чии договор трае повеќе од 8 месеци и третата се закажува 7 дена пред да заврши договорот за да се направи финална проверка на единицата. Дополнително се прави проверка дали датумот за секоја од овие 3 инспекции е викенд, со што се прави поместување +1 за недела, +2дена за сабота со цел инспекциите да се одвиваат во работна недела.
+{{{
+CREATE OR REPLACE FUNCTION domify.f_schedule_mandatory_inspections()
+RETURNS TRIGGER AS $$
+DECLARE
+    lease_duration_months INT;
+    initial_inspection_date DATE;
+    midterm_inspection_date DATE;
+    final_inspection_date DATE;
+BEGIN
+    lease_duration_months := EXTRACT(MONTH FROM AGE(NEW.end_date, NEW.start_date)) + 
+                            EXTRACT(YEAR FROM AGE(NEW.end_date, NEW.start_date)) * 12;
+    
+    initial_inspection_date := domify.f_adjust_for_weekend((NEW.start_date - INTERVAL '1 day')::DATE);
+    midterm_inspection_date := domify.f_adjust_for_weekend((NEW.start_date + INTERVAL '6 months')::DATE);
+    final_inspection_date := domify.f_adjust_for_weekend((NEW.end_date - INTERVAL '7 days')::DATE);
+    
+    IF NEW.start_date > CURRENT_DATE + INTERVAL '1 day' THEN
+        INSERT INTO domify.Inspection (
+            inspection_date, 
+            notes, 
+            lease_id, 
+            landlord_id
+        ) VALUES (
+            initial_inspection_date,
+            'Почетна инспекција - проверка дали се е добро пред вселување' ||
+            CASE WHEN initial_inspection_date != (NEW.start_date - INTERVAL '1 day')::DATE 
+                 THEN ' (поместена од викенд)' 
+                 ELSE '' 
+            END,
+            NEW.id,
+            NEW.landlord_id
+        );
+    END IF;
+    
+    IF lease_duration_months >= 8 THEN
+        INSERT INTO domify.Inspection (
+            inspection_date, 
+            notes, 
+            lease_id, 
+            landlord_id
+        ) VALUES (
+            midterm_inspection_date,
+            'Полугодишна инспекција - проверка на состојбата во која се наоѓа единицата' ||
+            CASE WHEN midterm_inspection_date != (NEW.start_date + INTERVAL '6 months')::DATE 
+                 THEN ' (поместена од викенд)' 
+                 ELSE '' 
+            END,
+            NEW.id,
+            NEW.landlord_id
+        );
+    END IF;
+    
+    INSERT INTO domify.Inspection (
+        inspection_date, 
+        notes, 
+        lease_id, 
+        landlord_id
+    ) VALUES (
+        final_inspection_date,
+        'Финална инспекција - оценка на штети и депозит' ||
+        CASE WHEN final_inspection_date != (NEW.end_date - INTERVAL '7 days')::DATE 
+             THEN ' (поместена од викенд)' 
+             ELSE '' 
+        END,
+        NEW.id,
+        NEW.landlord_id
+    );
+    
+    RETURN NEW;
+END;
+$$ LANGUAGE plpgsql;
+
+CREATE TRIGGER t_schedule_mandatory_inspections
+    AFTER INSERT ON domify.Lease
+    FOR EACH ROW
+    EXECUTE FUNCTION domify.f_schedule_mandatory_inspections();
+}}}
+Функцијата која се користи за поместувањето:
+{{{
+CREATE OR REPLACE FUNCTION domify.f_adjust_for_weekend(input_date DATE) 
+RETURNS DATE AS $$
+BEGIN
+    CASE EXTRACT(DOW FROM input_date)
+        WHEN 0 THEN RETURN input_date + INTERVAL '1 day';
+        WHEN 6 THEN RETURN input_date + INTERVAL '2 days';
+        ELSE RETURN input_date;
+    END CASE;
+END;
+$$ LANGUAGE plpgsql;
+}}}