\n"; # Make the table data @fields = &list_custom_fields(); $i = 0; @table = ( ); foreach $f (@fields, { }, { }) { push(@table, [ &ui_textbox("name_$i", $f->{'name'}, 15), &ui_textbox("desc_$i", $f->{'desc'}, 45), &ui_select("type_$i", $f->{'type'}, [ map { [ $_, $text{'newfields_type'.$_} ] } (0, 1, 2, 3, 4, 5, 6, 7, 11, 8, 9, 10) ]). &ui_textbox("opts_$i", $f->{'opts'}, 25), &ui_checkbox("show_$i", 1, $text{'newfields_show2'}, $f->{'show'}), &ui_select("visible_$i", int($f->{'visible'}), [ [ 0, $text{'newfields_visible0'} ], [ 1, $text{'newfields_visible1'} ], [ 2, $text{'newfields_visible2'} ] ]), ]); $i++; } # Render it print &ui_form_columns_table( "save_newfields.cgi", [ [ "save", $text{'save'} ] ], 0, undef, undef, [ $text{'newfields_name'}, $text{'newfields_desc'}, $text{'newfields_type'}, $text{'newfields_show'}, $text{'newfields_visible'}, ], 100, \@table, undef, 1); &ui_print_footer("", $text{'index_return'});