maltes
committed
on 05 May 06
Added upgrdae script
openacs-4/.../postgresql/upgrade-0.3b3-0.4.sql (+35)
  1 create index acs_mail_log_object_idx on acs_mail_log(object_id);
  2 create index acs_mail_log_recipient_idx on acs_mail_log(recipient_id);
  3 create index acs_mail_log_sender_idx on acs_mail_log(sender_id);
  4 alter table acs_mail_log add column cc varchar(4000);
  5
  6 create or replace function acs_mail_log__new (integer,varchar, integer, integer, integer, varchar, varchar,integer,varchar,integer,integer,varchar)
  7 returns integer as '
  8 declare 
  9         p_log_id alias for $1;
  10         p_message_id alias for $2;
  11         p_recipient_id alias for $3;
  12         p_sender_id alias for $4;
  13         p_package_id alias for $5;
  14         p_subject alias for $6;
  15         p_body alias for $7;
  16         p_creation_user alias for $8;
  17         p_creation_ip alias for $9;
  18         p_context_id alias for $10;
  19         p_object_id alias for $11;
  20         p_cc alias for $11;
  21         v_log_id acs_mail_log.log_id%TYPE;
  22 begin
  23         v_log_id := acs_object__new (
  24                 p_log_id,         -- object_id
  25                 ''mail_log'' -- object_type
  26         );
  27
  28         insert into acs_mail_log
  29                 (log_id, message_id, recipient_id, sender_id, package_id, subject, body, sent_date, object_id, cc)
  30         values
  31                 (v_log_id, p_message_id, p_recipient_id, p_sender_id, p_package_id, p_subject, p_body, now(), p_object_id, p_cc);
  32
  33         return v_log_id;
  34
  35 end;' language 'plpgsql';