[set page_title]Individual Table Import[/set] [set table_perm]=i[/set] [set help_name]import.main[/set] [set ui_class]Admin[/set] [set icon_name]admin/icon_config.gif[/set] @_UI_STD_HEAD_@ [if cgi ui_allow_multiple] [calc] my @tables = grep /\S/, split /[\s,\0]+/, q{[list-databases extended="i"]}; for(@tables) { #Log("tagging write $_"); $Tag->flag( { type => 'write', table => $_ } ); } return; [/calc] [/if] [if type=explicit compare="[value-extended name=upload_file test=isfile]"] [title-bar]Import of table [cgi mv_data_file]: [value-extended name=upload_file outfile="upload/[cgi mv_data_table].[cgi ui_upload_ext]" yes=Succeeded no=FAILED ][/title-bar]
[if type=file term="upload/[cgi mv_data_table].[cgi ui_upload_ext]"] [check-upload file="[cgi mv_data_table].[cgi ui_upload_ext]" same=1] [/if] [if type=file term="__UI_PRODUCT_DIR__/[cgi mv_data_table].[cgi ui_upload_ext]"] [flag type=write table="[cgi mv_data_table]"] [/if] [if cgi ui_upload_ext eq add] [import-fields table="[cgi mv_data_table]" file="__UI_PRODUCT_DIR__/[cgi mv_data_table].add" multiple="[cgi ui_allow_multiple]" delete="[cgi ui_allow_delete]" quiet="[cgi ui_import_quiet]" move=1 add=1 dir=backup] [elsif cgi ui_upload_ext eq update] [import-fields table="[cgi mv_data_table]" multiple="[cgi ui_allow_multiple]" delete="[cgi ui_allow_delete]" quiet="[cgi ui_import_quiet]" file="__UI_PRODUCT_DIR__/[cgi mv_data_table].update" move=1 dir=backup] [/elsif] [/if] [/if] [calc] return if ! $CGI->{mv_data_table}; $Values->{mv_data_table} = $CGI->{mv_data_table}; return; [/calc]
@_UI_STD_FOOTER_@