
interchange-cvs at icdevgroup
May 1, 2009, 9:02 AM
Post #1 of 1
(343 views)
Permalink
|
|
interchange - heins modified 2 files
|
|
User: heins Date: 2009-05-01 16:02:50 GMT Modified: dist/lib/UI/pages/admin db_metaconfig.html Modified: code/UI_Tag flex_select.coretag Log: * table_editor/flex_select: Add ability to link "edit record" to custom page with custom parameter. Also can now change "edit record to something else like "view user". Revision Changes Path 2.24 interchange/dist/lib/UI/pages/admin/db_metaconfig.html rev 2.24, prev_rev 2.23 Index: db_metaconfig.html =================================================================== RCS file: /var/cvs/interchange/dist/lib/UI/pages/admin/db_metaconfig.html,v retrieving revision 2.23 retrieving revision 2.24 diff -u -r2.23 -r2.24 --- db_metaconfig.html 1 Sep 2006 07:46:29 -0000 2.23 +++ db_metaconfig.html 1 May 2009 16:02:50 -0000 2.24 @@ -75,8 +75,9 @@ height extended.explicit_edit extended.number_list + extended.explicit_edit_page extended.explicit_edit_form + extended.explicit_edit_anchor extended.check_uncheck_all extended.no_code_link extended.no_checkbox - extended.check_uncheck_all extended.radio_box extended.user_merge extended.ui_sort_field extended.ui_sort_option @@ -151,6 +152,9 @@ 'extended.bottom_buttons' => 'Buttons only on bottom', 'extended.restrict_allow' => 'Allow these ITL tags', 'extended.explicit_edit' => 'Show "edit record" link', + 'extended.explicit_edit_page' => 'Destination for explicit edit', + 'extended.explicit_edit_form' => 'Form for explicit edit', + 'extended.explicit_edit_anchor' => 'Anchor for explicit edit', 'extended.no_code_link' => "Don't link key column to editor", 'extended.no_checkbox' => "No checkbox for group ops", 'extended.check_uncheck_all' => 'Links to check/uncheck all', @@ -250,6 +254,9 @@ </pre> </blockquote>}, 'extended.display_type' => "Sets the general style of column edit areas", + 'extended.explicit_edit_page' => 'Landing page when clicking explicit edit.', + 'extended.explicit_edit_form' => 'Form string for explicit edit, code will be appended', + 'extended.explicit_edit_anchor' => 'Anchor to link for explicit edit', 'extended.link_rows_blank' => 'default 1', 'extended.link_row_qual' => 'Default is key field, needs to be different field if auto-numbering. Must not be same as Foreign Key if in auto mode.', 'extended.link_blank_auto' => 'Requires link row qualifier be separate from primary key and foreign key in linked table.', @@ -407,4 +414,4 @@ ] @_UI_STD_FOOTER_@ -<!-- page: @@MV_PAGE@@ version: $Revision: 2.23 $ --> +<!-- page: @@MV_PAGE@@ version: $Revision: 2.24 $ --> 1.18 interchange/code/UI_Tag/flex_select.coretag rev 1.18, prev_rev 1.17 Index: flex_select.coretag =================================================================== RCS file: /var/cvs/interchange/code/UI_Tag/flex_select.coretag,v retrieving revision 1.17 retrieving revision 1.18 diff -u -r1.17 -r1.18 --- flex_select.coretag 6 Jul 2007 08:54:20 -0000 1.17 +++ flex_select.coretag 1 May 2009 16:02:50 -0000 1.18 @@ -5,13 +5,13 @@ # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. See the LICENSE file for details. # -# $Id: flex_select.coretag,v 1.17 2007-07-06 08:54:20 racke Exp $ +# $Id: flex_select.coretag,v 1.18 2009-05-01 16:02:50 mheins Exp $ UserTag flex-select Order table UserTag flex-select addAttr UserTag flex-select attrAlias ml height UserTag flex-select hasEndTag -UserTag flex-select Version $Revision: 1.17 $ +UserTag flex-select Version $Revision: 1.18 $ UserTag flex-select Routine <<EOR use vars qw/$CGI $Tmp $Tag/; my @fs_more = qw/ @@ -661,6 +661,9 @@ data_row_style_odd => '', form_method => 'GET', explicit_edit => '', + explicit_edit_page => '', + explicit_edit_form => '', + explicit_edit_anchor => '', no_code_link => '', group_image => 'smindex.gif', group_class => 'rhead', @@ -1114,7 +1117,7 @@ my $edit_anchor; my $ee_extra; if($opt->{explicit_edit}) { - $edit_anchor = errmsg('edit record'); + $edit_anchor = $opt->{explicit_edit_anchor} || errmsg('edit record'); $edit_anchor =~ s/ / /g; $ee_extra = ''; for(qw/ class style width align valign /) { @@ -1135,6 +1138,7 @@ my $out = qq{<tr class="$rc">\n}; my $code_pre; my $code_post; + my $ep_string = ''; if($opt->{no_code_link} and ! $opt->{explicit_edit}) { $code_pre = $code_post = ''; } @@ -1149,7 +1153,7 @@ } - my $ep_string = join "\n", @what, $edit_extra; + $ep_string = join "\n", @what, $edit_extra; my $edit_url = $Tag->area({ href => $edit_page, @@ -1176,8 +1180,17 @@ } if($opt->{explicit_edit}) { - $out .= qq{<td$ee_extra> $code_pre$edit_anchor$code_post </td>}; - $opt->{no_code_link} and $code_pre = $code_post = ''; + my $form = $opt->{explicit_edit_form} || ''; + if($form) { + $form .= $ecode; + } + my $url = $Tag->area({ + href => $opt->{explicit_edit_page} || $edit_page, + form => $form || $ep_string, + }); + my $msg = errmsg('process %s', $ecode); + my $pre = qq{<a href="$url" title="$msg">}; + $out .= qq{<td$ee_extra> $pre$edit_anchor$code_post </td>}; } #::logDebug("keyname=$ts->{keyname}"); _______________________________________________ interchange-cvs mailing list interchange-cvs [at] icdevgroup http://www.icdevgroup.org/mailman/listinfo/interchange-cvs
|