diff --git a/Modules/mip_parties.pck b/Modules/mip_parties.pck
index 770ccc1..40d2de3 100644
--- a/Modules/mip_parties.pck
+++ b/Modules/mip_parties.pck
@@ -91,7 +91,7 @@ CREATE OR REPLACE PACKAGE mip_parties AS
                          p_prty_type                IN VARCHAR2,
                          p_tripartite_member        IN VARCHAR2,
                          p_password                 IN VARCHAR2,
-                         p_expire_pword             IN NUMBER);
+                         p_expire_pword             IN VARCHAR2);
    --
    
    /**
@@ -630,7 +630,7 @@ CREATE OR REPLACE PACKAGE BODY mip_parties AS
                          p_prty_type                IN VARCHAR2,
                          p_tripartite_member        IN VARCHAR2,
                          p_password                 IN VARCHAR2,
-                         p_expire_pword             IN NUMBER) IS
+                         p_expire_pword             IN VARCHAR2) IS
     --
   BEGIN
     --
@@ -680,7 +680,7 @@ CREATE OR REPLACE PACKAGE BODY mip_parties AS
                                        p_password => p_password);
     
       -- set the user's status
-      IF p_expire_pword IS NOT NULL THEN
+      IF upper(p_expire_pword) = 'YES' THEN
         mip_security.set_user_status(p_username => p_username,
                                      p_status   => 'EXPIRED');
       ELSE
diff --git a/Modules/mip_security.pck b/Modules/mip_security.pck
index 93b3d70..d09332c 100644
--- a/Modules/mip_security.pck
+++ b/Modules/mip_security.pck
@@ -131,7 +131,6 @@ CREATE OR REPLACE PACKAGE BODY mip_security AS
        SET prty.status = upper(p_status)
      WHERE upper(prty.username) = upper(p_username);
     
-    COMMIT;
   END;
   
   PROCEDURE update_status_on_login(p_uname IN VARCHAR2, p_password IN VARCHAR2) IS