7ges ERP Cliente/Servidor

💻 Función Principal

CREATE OR REPLACE FUNCTION llx_societe_before_insert()
RETURNS trigger AS $$
BEGIN
    -- Validar nombre obligatorio
    IF NEW.nom IS NULL OR trim(NEW.nom) = '' THEN
        RAISE EXCEPTION 'ErrorFieldRequired: nom';
    END IF;
    
    -- Validar email si está presente
    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;
    
    -- Generar código cliente automáticamente
    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;
    
    -- Establecer valores por defecto
    NEW.entity := COALESCE(NEW.entity, 1);
    NEW.status := COALESCE(NEW.status, 1);
    NEW.datec := COALESCE(NEW.datec, NOW());
    
    RETURN NEW;
END;
$$ LANGUAGE plpgsql;