[set violation]1[/set] [perl] my $arg = $Session->{arg} || $Values->{mvc_data_table}; $Values->{mvc_data_table} = $arg; my $allowed = $Scratch->{dbs_to_edit}; my $configured = $Tag->list_databases(); if($allowed =~ /\b$arg\b/ and $configured =~ /\b$arg\b/) { undef $Scratch->{violation}; $Values->{mv_data_table} = $arg; $Values->{mvc_data_table} = $arg; } else { undef $Values->{mv_data_table}; undef $Values->{mvc_data_table}; } return ''; [/perl] [bounce href="[area special/violation]" if="[scratch violation]"]
[L]Upload/Download/Export Menu for table[/L] [value mv_data_table]
[scratch menu]
[L]Change to[/L]: [loop arg="[list-databases]"][loop-code] [/loop]
[value name=mvc_dbedit_autoshow set="[if value mvc_too_large]0[else]1[/else][/if]" hide=1] [if value mvc_dbedit_autoshow] [title-bar][L]Edit Existing Key[/L][/title-bar]
[/if][title-bar][L]New or Existing Key to edit/insert[/L][/title-bar]
[if value mvc_too_large][set Spreadsheet][/set] [else] [title-bar][L]Spreadsheet edit[/L][/title-bar] [set Spreadsheet] mv_todo=return mv_nextpage=config/spread [/set] [/else] [/if] [title-bar][L]Search by keyword for records[/L][/title-bar] [if type=explicit compare="[calc] q{[dbinfo table='[value mv_data_table]' attribute=type]} eq '8'; [/calc]"] [title-bar][L]Search in SQL[/L][/title-bar] [/if]
[L]Upload/Download/Export Menu for table[/L] [value mv_data_table]
[scratch menu]