operator build debug and fix. Faktura warning state

This commit is contained in:
ragu 2022-11-16 21:22:00 +01:00
parent 2e2c824dbe
commit 5b32d2b7f5
40 changed files with 254 additions and 1203 deletions

View file

@ -139,7 +139,7 @@ sub tpl(){
if($main_id >= "100000"){
my $mstyle="";
my $dbh_primary = $dbt->dbconnect_extern("sharee_primary");
my $dbh_primary = $dbt->dbconnect_extern($dbt->{primary}->{sharee_primary}->{database}->{dbname});
my $users_dms_primary = { u_id => 0 };
$users_dms_primary = $dbt->select_users($dbh_primary,$users_dms->{u_id},"and int02 >= 1");
#print Dumper($users_dms_primary);
@ -267,7 +267,7 @@ sub tpl(){
###end bootstrap menue
#node_name=DMS
if($varenv->{dbname} eq "sharee_primary" && $main_id == "100002"){
if($varenv->{dbname} eq $dbt->{primary}->{sharee_primary}->{database}->{dbname} && $main_id == "100002"){
my $big2menu="";
#while (my ($key, $value) = each %{ $dbt->{operator} }) {
foreach my $key (sort keys (%{ $dbt->{operator} })) {