[if !cgi item_id] [bounce page="__UI_BASE__/gentable"] [/if] [calc] my $location = $CGI->{item_id}; my @parts = split /::/, $location; if($Config->{Database}{$parts[0]}) { ($m_table, $m_col, $m_key) = @parts; } else { ($m_view, $m_table, $m_col, $m_key) = @parts; } my @frags; push(@frags,errmsg('Meta field edit') . ':'); push(@frags,errmsg('view=%s', $m_view)) if $m_view; push(@frags,errmsg('table=%s column=%s', $m_table, $m_col)); push(@frags,errmsg('key=%s', $m_key)) if $m_key; $Scratch->{page_title} = join(' ',@frags); my $string = <Meta information edit   
EOF $string .= < EOF $string .= <
view: $m_view
table: $m_table
column: $m_col
EOF $Scratch->{page_banner} = $string; $CGI->{ui_meta_view} = 'metaconfig'; if(! $CGI->{mv_data_table}) { $CGI->{mv_data_table} = '__UI_META_TABLE__'; } if(! $CGI->{ui_data_fields}) { $CGI->{ui_data_fields} = 'code label help help_url type width height options filter lookup field db lookup_exclude outboard pre_filter prepend append'; } if(! $CGI->{ui_break_before}) { $CGI->{ui_break_before} = 'help type lookup outboard prepend'; $CGI->{ui_break_before_label} = 'type=Display control, help=Help information, lookup=Database lookup, outboard=Advanced'; } return; [/calc] [set ui_class]Admin[/set] [set help_name]meta.edit[/set] [set icon_name][/set] @_UI_STD_HEAD_@ [table-editor cgi=1] @_UI_STD_FOOTER_@