7ges ERP Client/Server

💻 Main Function

CREATE OR REPLACE FUNCTION llx_societe_before_insert()
RETURNS trigger AS $$
BEGIN
    -- Validate required name
    IF NEW.nom IS NULL OR trim(NEW.nom) = '' THEN
        RAISE EXCEPTION 'ErrorFieldRequired: nom';
    END IF;
    
    -- Validate email if present
    IF NEW.email IS NOT NULL AND NEW.email != '' THEN
        NEW.email = trim(lower(NEW.email));
        IF NOT (NEW.email ~* '^[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Za-z]{2,}$') THEN
            RAISE EXCEPTION 'ErrorBadEMail: %', NEW.email;
        END IF;
    END IF;
    
    -- Generate client code automatically
    IF NEW.client = 1 AND (NEW.code_client IS NULL OR trim(NEW.code_client) = '') THEN
        NEW.code_client := llx_societe_get_next_code('C', NEW.entity);
    END IF;
    
    -- Set default values
    NEW.entity := COALESCE(NEW.entity, 1);
    NEW.status := COALESCE(NEW.status, 1);
    NEW.datec := COALESCE(NEW.datec, NOW());
    
    RETURN NEW;
END;
$$ LANGUAGE plpgsql;