#Iner_ID : Main or Sub or if -1 user menu func list
%FUNCTIONS_LIST = ("01:0:Internet:dv_users_list:"             => 11,
                   "02:0:Internet:dv_user:UID"                => 20,
                   "03:2:$_TARIF_PLANS:dv_chg_tp:UID"         => 11,
                   "04:2:$_STATS:dv_stats:UID"                => 11,
                   "05:2:$_ERROR:dv_error:UID"                => 11,
                   "06:2:$_SHEDULE:dv_form_shedule:UID"       => 11,
                   "07:2:$_COMPENSATION:dv_compensation:UID"  => 11,
                   "10:0:Internet:null:"                      => 5,
                   "11:10:$_TARIF_PLANS:dv_tp:"               => 5,
                   "12:11:$_ADD:dv_tp:"                       => 5,
                   "13:11:$_INTERVALS:form_intervals:TP_ID"   => 5,
                   "14:11:$_NASS:form_nas_allow:TP_ID"        => 5,
                   "15:11:$_USERS:dv_users_list:TP_ID"        => 5,
                   "17:11:$_GROUPS:form_tp_groups:"           => 5,
                   "18:11:$_TRAFFIC_CLASS:dv_traffic_classes:"=> 5,
                   "19:0:Internet:null:"                      => 4,
                   "22:19:$_ERROR:dv_error:"                  => 4,
                   "23:19:$_LAST:dv_sessions:"                => 4,
                   "24:19:$_USED:dv_use:"                     => 4,
                   "25:24:$_MONTH:dv_use_allmonthes:"         => 4,
                   "26:19:$_DEBETORS:dv_report_debetors:"     => 4,

                   "36:0:Internet:dv_online:"                 => 6,
                   "38:0:$_DV $_STATS:dv_use:COMPANY_ID"      => 13
                   );



if ($conf{DV_TURBO_MODE}) {
  $FUNCTIONS_LIST{"37:0:Turbo:dv_turbo_mode:"}=6;
  $FUNCTIONS_LIST{"26:19:Turbo:dv_turbo_mode_report:"}=4;
 }


if ($permissions{0} && $permissions{0}{1}) {
  $FUNCTIONS_LIST{"20:1:$_USERS $_ADD:dv_wizard_user:"} = 11;
  if (in_array('Cards', \@MODULES)) {
    $FUNCTIONS_LIST{"21:1:$_ICARDS:dv_cards:"} = 11;
   }   
}

%USER_FUNCTION_LIST = ("01:0:Internet:dv_user_info:"     => 0,
                       "03:1:$_STATS:dv_user_stats:"     => 0
                      );

if ($conf{DV_ISG}) {
  delete $USER_FUNCTION_LIST{"01:0:Internet:dv_user_info:"};
  $USER_FUNCTION_LIST{"01:0:Internet:dv_user_info:defaultindex"}=0;
}
elsif ($conf{DV_IP_DISCOVERY}) {
  delete $USER_FUNCTION_LIST{"01:0:Internet:dv_user_info:"};
  $USER_FUNCTION_LIST{"01:0:Internet:dv_user_info:defaultindex"}=0;
}


$USER_FUNCTION_LIST{"04:1:$_TARIF_PLAN:dv_user_chg_tp:"}=0 if ($conf{DV_USER_CHG_TP});

%PERIODIC = (daily   => [ 'dv_daily_fees', 'dv_users_warning_messages', 'dv_holdup_fees' ],
             monthly => [ 'dv_monthly_fees', 'dv_periodic_logrotate'  ],
             report  => [ 'dv_report'       ]);


if ($conf{DV_BONUS}) {
  $FUNCTIONS_LIST{"16:11:$_BONUS:dv_rating_tp:TP_ID"} = 5;
  $FUNCTIONS_LIST{"8:2:$_BONUS:dv_rating_user:UID"} = 11;
  
  $USER_FUNCTION_LIST{"05:1:Bonus:dv_rating_user:"}=0;
  
  $PERIODIC{daily} = [ @{ $PERIODIC{daily} }, 'dv_rating_periodic' ];
 }


1
