|
|
|
|
@ -20,7 +20,7 @@ our @EXPORT_OK = qw(
|
|
|
|
|
check_table
|
|
|
|
|
|
|
|
|
|
findby_setid_name
|
|
|
|
|
|
|
|
|
|
findby_id
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
my $tablename = 'voip_subscriber_profiles';
|
|
|
|
|
@ -48,6 +48,23 @@ sub new {
|
|
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
sub findby_id {
|
|
|
|
|
|
|
|
|
|
my ($id,$load_recursive) = @_;
|
|
|
|
|
|
|
|
|
|
check_table();
|
|
|
|
|
my $db = &$get_db();
|
|
|
|
|
my $table = $db->tableidentifier($tablename);
|
|
|
|
|
|
|
|
|
|
my $stmt = 'SELECT * FROM ' . $table . ' WHERE ' .
|
|
|
|
|
$db->columnidentifier('id') . ' = ?';
|
|
|
|
|
my @params = ($id);
|
|
|
|
|
my $rows = $db->db_get_all_arrayref($stmt,@params);
|
|
|
|
|
|
|
|
|
|
return buildrecords_fromrows($rows,$load_recursive)->[0];
|
|
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
sub findby_setid_name {
|
|
|
|
|
|
|
|
|
|
my ($set_id,$name,$load_recursive) = @_;
|
|
|
|
|
|