Reference

LedgerSMB::User(3pm)

Provides user support and database management functions.

NAME

LedgerSMB::User - Provides user support and database management functions.

SYNOPSIS

This module provides user support and database management functions.

STATUS

Deprecated

COPYRIGHT

 #====================================================================
 # LedgerSMB
 # Small Medium Business Accounting software
 # http://www.ledgersmb.org/
 #
 # Copyright (C) 2006
 # This work contains copyrighted information from a number of sources
 # all used with permission.
 #
 # This file contains source code included with or based on SQL-Ledger
 # which is Copyright Dieter Simader and DWS Systems Inc. 2000-2005
 # and licensed under the GNU General Public License version 2 or, at
 # your option, any later version.  For a full list including contact
 # information of contributors, maintainers, and copyright holders,
 # see the CONTRIBUTORS file.
 #
 # Original Copyright Notice from SQL-Ledger 2.6.17 (before the fork):
 # Copyright (C) 2000
 #
 #  Author: DWS Systems Inc.
 #     Web: http://www.sql-ledger.org
 #
 #  Contributors: Jim Rawlings <[email protected]>
 #
 #====================================================================
 #
 # This file has undergone whitespace cleanup.
 #
 #====================================================================
 #
 # user related functions
 #
 #====================================================================

METHODS

LedgerSMB::User->new($login);

Create a LedgerSMB::User object. If the user $login exists, set the fields with values retrieved from the database.

LedgerSMB::User->country_codes();

Returns a hash where the keys are registered locales and the values are the textual representation of the locale name.

LedgerSMB::User->fetch_config($login);

Returns a reference to a hash that contains the user config for the user $login. If that user does not exist, output 'Access denied' if in CGI and die in all cases.

LedgerSMB::User->check_recurring($form);

Disused function to return the number of current recurring events.

LedgerSMB::User::dbconnect_vars($form, $db);

Converts individual $form values into $form->{dboptions} and $form->{dbconnect}.

LedgerSMB::User->dbdrivers();

Returns a list of all drivers set up with DBI whose names end in 'Pg'.

LedgerSMB::User->dbsources($form);

Returns a list of all databases in the same cluster as the database that $form is set to. If $form->{only_acc_db} is set, only non-template databases that have a defaults table owned by $form->{dbuser} are returned.

LedgerSMB::User->dbcreate($form);

Create the database indicated by $form->{db} and load Pg-database.sql, the chart indicated by $form->{chart} and custom tables and functions (Pg-custom_tables.sql and Pg-custom_functions).

LedgerSMB::User->process_query($form, $dbh, $filename);

Load the file $filename into the database indicated through form using psql. $dbh is ignored.

LedgerSMB::User->dbdelete($form);

Disused function to drop the database $form->{db}.

LedgerSMB::User->dbsources_unused($form, $memfile);

Disused function to identify all databases in a cluster with a defaults table that are not mentioned in the memberfile $memfile.

LedgerSMB::User->dbneedsupdate($form);

Disused function to locate all databases owned by $form->{dbuser} that are not a template* database which have a defaults table with a version entry.

LedgerSMB::User->dbupdate($form);

Applies database upgrade scripts to upgrade the database to the current level.

calc_version($version);

Returns a numeric form for the version passed in. The numeric form is derived by converting each dotted portion of the version to a three-digit number and appending them.

 +----------+------------+
 | $version |   returned |
 +----------+------------+
 |   1.0.0  |    1000000 |
 |   1.2.33 |    1002033 |
 | 189.2.33 |  189002033 |
 |  1.2.3.4 | 1002003004 |
 +----------+------------+
script_version

Sorting function for database upgrade scripts.

$user->save_member();

Updates the user config in the database for the user $user. If no config for the user exists, the user to the database.

LedgerSMB::User->delete_login($form);

Disused function to delete the user $form->{login}.

LedgerSMB::User->config_vars();

Disused function that returns a list of user config variable names.

$self->error($msg);

Privately used error function. Used in places where the more typically used $form->error cannot be used. Always dies.

History