X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Felements%2Ftr-select-part_referral.html;fp=httemplate%2Felements%2Ftr-select-part_referral.html;h=0108388bc36a1f9a11d3dd4c6e1aaec1ae3e36f8;hb=e47e9758f480c664bfc3917d798cd69c7d354999;hp=0000000000000000000000000000000000000000;hpb=dbc120189697e8306f62349c310f5410f8382491;p=freeside.git

diff --git a/httemplate/elements/tr-select-part_referral.html b/httemplate/elements/tr-select-part_referral.html
new file mode 100644
index 000000000..0108388bc
--- /dev/null
+++ b/httemplate/elements/tr-select-part_referral.html
@@ -0,0 +1,30 @@
+<%
+  my( $refnum, %opt ) = @_;
+
+  $opt{'part_referrals'} ||=
+    [ FS::part_referral->all_part_referral( 1 ) ]; #1: include global
+
+  my $r = qq!<font color="#ff0000">*</font>&nbsp;!;
+
+%>
+
+<% if ( scalar( @{$opt{'part_referrals'}} ) == 0 ) {
+     eidiot "You have not created any advertising sources.  You must create at least one advertising source before adding a customer.  Go to ". popurl(2). "browse/part_referral.html and create one or more advertising sources.";
+   } elsif ( scalar( @{$opt{'part_referrals'}} ) == 1 ) {
+%>
+
+     <INPUT TYPE="hidden" NAME="refnum" VALUE="<%= $opt{'part_referrals'}->[0]->refnum %>">
+
+<% } else { %>
+
+     <TR>
+       <TH ALIGN="right"><%=$r%>Advertising source</TH>
+       <TD>
+         <%= include( '/elements/select-part_referral.html', $refnum,
+                        'part_referrals' => $opt{'part_referrals'},
+                    )
+         %>
+       </TD>
+     </TR>
+
+<% } %>