CREATE OR REPLACE PACKAGE efno_msgsubs IS

  -- Author  : LACEYK
  -- Created : 28/03/2007 17:43:01
  -- Purpose : Message Subscription routines

  --
  g_package_name CONSTANT VARCHAR2(30) := 'efno_msgsubs';
  g_header       CONSTANT VARCHAR2(160) := '$Header:   $';
  g_revision     CONSTANT VARCHAR2(160) := '$Revision: $ Patch 0.2';
  --
  g_vc_arr owa_util.vc_arr;
  --
  --
  FUNCTION get_suca_id ( p_suca_group IN VARCHAR2 DEFAULT NULL
                       , p_suca_name  IN VARCHAR2 DEFAULT NULL)
  RETURN subscription_categories.suca_id%TYPE;

  PROCEDURE send_messages(p_cust_id          IN customers.cust_id%TYPE
                         ,p_suca_id          IN subscription_categories.suca_id%TYPE
                         ,p_email_content_en IN VARCHAR2
                         ,p_email_content_hu IN VARCHAR2 DEFAULT NULL
                         ,p_email_subject_en IN VARCHAR2 DEFAULT NULL
                         ,p_email_subject_hu IN VARCHAR2 DEFAULT NULL
                         ,p_sms_content_en   IN VARCHAR2 DEFAULT NULL
                         ,p_sms_content_hu   IN VARCHAR2 DEFAULT NULL
                         ,p_file             IN BLOB DEFAULT NULL
                         ,p_filename         IN VARCHAR2 DEFAULT NULL
                         ,p_file_mime_type   IN VARCHAR2 DEFAULT NULL
                         );

  PROCEDURE send_messages(p_syus_id          IN system_users.syus_id%TYPE
                         ,p_suca_id          IN subscription_categories.suca_id%TYPE
                         ,p_email_content_en IN VARCHAR2
                         ,p_email_content_hu IN VARCHAR2 DEFAULT NULL
                         ,p_email_subject_en IN VARCHAR2 DEFAULT NULL
                         ,p_email_subject_hu IN VARCHAR2 DEFAULT NULL
                         ,p_sms_content_en   IN VARCHAR2 DEFAULT NULL
                         ,p_sms_content_hu   IN VARCHAR2 DEFAULT NULL
                         ,p_file             IN BLOB DEFAULT NULL
                         ,p_filename         IN VARCHAR2 DEFAULT NULL
                         ,p_file_mime_type   IN VARCHAR2 DEFAULT NULL
                         );

  PROCEDURE send_recorded_messages( p_cust_id           IN customers.cust_id%TYPE
                                  , p_message_type      IN VARCHAR2
                                  , p_message_id        IN VARCHAR2
                                  , p_suca_id           IN subscription_categories.suca_id%TYPE
                                  , p_email_content_en  IN VARCHAR2
                                  , p_email_content_hu  IN VARCHAR2 DEFAULT NULL
                                  , p_email_subject_en  IN VARCHAR2 DEFAULT NULL
                                  , p_email_subject_hu  IN VARCHAR2 DEFAULT NULL
                                  , p_sms_content_en    IN VARCHAR2 DEFAULT NULL
                                  , p_sms_content_hu    IN VARCHAR2 DEFAULT NULL
                                  , p_file              IN BLOB     DEFAULT NULL
                                  , p_filename          IN VARCHAR2 DEFAULT NULL
                                  , p_file_mime_type    IN VARCHAR2 DEFAULT NULL
                                  );

  FUNCTION count_suca RETURN NUMBER;

  FUNCTION check_msg_subscription( p_uscd_id IN user_contact_details.uscd_id%TYPE
                                 , p_suca_id IN subscription_categories.suca_id%TYPE
                                 , p_type    IN VARCHAR2
                                 ) RETURN BOOLEAN;

  PROCEDURE update_msg_subs( p_suca_count   IN NUMBER DEFAULT 0
                           , p_uscd         IN owa_util.vc_arr DEFAULT g_vc_arr
                           , p_type         IN owa_util.vc_arr DEFAULT g_vc_arr
                           , p_suca_id      IN owa_util.vc_arr DEFAULT g_vc_arr
                           , p_suca_checked IN owa_util.vc_arr DEFAULT g_vc_arr
                           );

  /**
  -- FUNCTION about
  --
  -- %return A textual description of the version number and VSS header for this package
  */
  FUNCTION about RETURN VARCHAR2;
  --
END efno_msgsubs;
/