[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';
}
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_@