[calc] $CGI->{mv_data_table} = $Config->{ProductFiles}[0]; if ($CGI->{item_id} eq 'new') { $CGI->{ui_new_item} = 1; } else { $CGI->{ui_hide_key} = 1 unless $CGI->{item_id} eq 'new'; } if(! $CGI->{ui_data_fields}) { $CGI->{ui_data_fields} = $Variable->{UI_ITEM_FIELDS} || 'sku description category comment price image weight size color'; } if(! $CGI->{ui_break_before}) { $CGI->{ui_break_before} = $Variable->{UI_ITEM_BREAK} || 'image size'; } if(! $CGI->{ui_break_before_label}) { $CGI->{ui_break_before_label} = $Variable->{UI_ITEM_BREAK_LABEL}; } my @args = ( '__UI_BASE__/item', "item_id_left=$CGI->{item_id_left}", "ui_sequence_edit=$CGI->{ui_sequence_edit}", ); $CGI->{ui_return_to} = join "\0", @args; return; [/calc] [if cgi ui_new_item] [calc] $CGI->{item_id} = q{[counter file="__UI_PRODUCT_DIR__/__UI_PRODUCT_DIR__.autonumber" start=new0000]}; return; [/calc] [/if] [perl tables="[cgi mv_data_table]"] my $tab = $CGI->{mv_data_table}; my $db = $Db{$tab}; if(! ref $db) { $Scratch->{error_message} = "Error: no $tab database.
"; $Scratch->{ui_location} = "__UI_BASE__/error"; return; } if ($CGI->{ui_new_item} && $db->config('AUTO_INCREMENT')) { $CGI->{item_id} = ''; } [/perl] [if scratch ui_location] [bounce href=`delete $Scratch->{ui_location}`] [/if] @_UI_STD_DBEDIT_HEAD_@ [seti page_title]Item editor: [cgi item_id][/seti] [seti page_banner]Item editor: edit item [cgi item_id][/seti] [set help_name]edit.item[/set] [set icon_name]admin/icon_item.gif[/set] @_UI_STD_HEAD_@

[related table=`$Config->{ProductFiles}[0]`] @_UI_STD_DBEDIT_TABLE_@ [if-mm super] No meta display [/if-mm] @_UI_STD_FOOTER_@