diff options
author | ivan <ivan> | 2002-07-04 10:35:43 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-07-04 10:35:43 +0000 |
commit | 6d02e527490b2f0cf080f7b519443caeecd76357 (patch) | |
tree | 9b338edf5411b6cc26039a72fd1e12a789cccabf /httemplate/browse/part_referral.cgi | |
parent | 50c327ded5ad9b96c5f5975643d46511abc01d49 (diff) |
move "add" links to the top
Diffstat (limited to 'httemplate/browse/part_referral.cgi')
-rwxr-xr-x | httemplate/browse/part_referral.cgi | 23 |
1 files changed, 12 insertions, 11 deletions
diff --git a/httemplate/browse/part_referral.cgi b/httemplate/browse/part_referral.cgi index 93a6976e1..084c21bd0 100755 --- a/httemplate/browse/part_referral.cgi +++ b/httemplate/browse/part_referral.cgi @@ -1,15 +1,19 @@ <!-- mason kludge --> -<% - -print header("Advertising source Listing", menubar( +<%= header("Advertising source Listing", menubar( 'Main Menu' => $p, # 'Add new referral' => "../edit/part_referral.cgi", -)), "Where a customer heard about your service. Tracked for informational purposes.<BR><BR>", &table(), <<END; - <TR> - <TH COLSPAN=2>Advertising source</TH> - </TR> -END +)) %> +Where a customer heard about your service. Tracked for informational purposes. +<BR><BR> +<A HREF="<%= $p %>edit/part_referral.cgi"><I>Add a new advertising source</I></A> +<BR><BR> +<%= table() %> +<TR> + <TH COLSPAN=2>Advertising source</TH> +</TR> + +<% foreach my $part_referral ( sort { $a->getfield('refnum') <=> $b->getfield('refnum') } qsearch('part_referral',{}) ) { @@ -26,9 +30,6 @@ END } print <<END; - <TR> - <TD COLSPAN=2><A HREF="${p}edit/part_referral.cgi"><I>Add a new advertising source</I></A></TD> - </TR> </TABLE> </BODY> </HTML> |