sub getAllAttrUsingMemberId{
   local($key,*foundflag,*attrArray,*dbh,$database,$hostname,$port,$user,$password,*rc) = @_;
   local($return);

   $foundflag = 0;

   use DBI;
   use DBD;
   if(!$key){
      print "SWERR: Key is not provided...";
      }

   else { #if-key-is-sent.

      #-- Connect to database ---
      &connectDB(*dbh,$database,$hostname,$port,$user,$password);

      #------------ Build your database statement -----------------------
      $statement = "SELECT * FROM approvedMember where memberId = '$memberId'";

      #-- Execute statement and disconnect from database ---
      &execSTH(*sth,*rv,$dbh,$statement);

      if($rv > 0){ # start member is found.
         $foundflag = 1;
         @attrArray = $sth->fetchrow_array();
         &disConnectDB(*rc,$sth,$dbh);
         } # end member is found

      else{
         $foundflag = 0; # This entry is not found in the Member database
         }
      } #if-key-is-sent-to-function..

   } #end-function.


sub getSpecificAttrUsingMemberId{
   local($key,*foundflag,*attrKeyArr,*dbh,$database,$hostname,$port,$user,$password,*rc) = @_;
   local($return,$attrKeys,$attr,$i,@valueArray);

   $foundflag = 0;

   use DBI;
   use DBD;
   if(!$key){
      print "SWERR: Key is not provided...";
      }
   
   else { #if-key-is-sent.
      $attrKeys = "";
      foreach $attr (@attrKeyArr){
         $attrKeys .= $attr.",";
         }
      chop($attrKeys); #to remove the ","

      #-- Connect to database ---
      &connectDB(*dbh,$database,$hostname,$port,$user,$password);

      #------------ Build your database statement -----------------------
      $statement = "SELECT $attrKeys FROM approvedMember where memberId = '$memberId'";

      #-- Execute statement and disconnect from database ---
      &execSTH(*sth,*rv,$dbh,$statement);

      if($rv > 0){ # start member is found.
         $foundflag = 1;
         @valueArray = $sth->fetchrow_array();

         for($i=0; $i <= $#attrKeyArr; $i++){
            $valueAssoArray{$attrKeyArr[$i]} = $valueArray[$i];
            }

         &disConnectDB(*rc,$sth,$dbh);
         } # end member is found

      else{
         $foundflag = 0; # This entry is not found in the Member database
         }
      } #if-key-is-sent-to-function..
   %valueAssoArray;
   } #end-function.

sub setSpecificAttrUsingMemberId{
   local($key,*updatedflag,$attrKey,$attrVal,*dbh,$database,$hostname,$port,$user,$password,*rc) = @_;
   local($return,$attrKeys,$attr,$i,@valueArray);

   $updatedflag = 0;

   use DBI;
   use DBD;
   if(!$key){
      print "SWERR: Key is not provided...";
      }
   
   else { #if-key-is-sent.
      # $attrKeys = "";
      # foreach $attr (@attrKeyArr){
      #    $attrKeys .= $attr.",";
      #    }
      # chop($attrKeys); #to remove the ","

      #-- Connect to database ---
      &connectDB(*dbh,$database,$hostname,$port,$user,$password);

      #------------ Build your database statement -----------------------
      $statement = "UPDATE approvedMember SET $attrKey = '$attrVal' WHERE memberId = '$memberId'";

      #-- Execute statement and disconnect from database ---
      &execSTH(*sth,*rv,$dbh,$statement);

      if ($rv < 0){
         $updatedflag = 0; # This entry is not updated
         }
      else{
         $updatedflag = 1; # This entry is updated
         #print "$statement";
         }
      &disConnectDB(*rc,$sth,$dbh);

      } #if-key-is-sent-to-function..

   } #end-function.

return 1;  #return true