X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fsvc_broadband.cgi;h=9e064c5c8b0aaa08763b771f02ae5dcceddec8d0;hp=f017d7a6eca3c09f7efec6aa184547f9c28ed20c;hb=a800fde5d31fb9b9cfe46b1ce2f68ea8e56bff53;hpb=0354f39ed0e74fd2eae1d9da13906625b4f56591 diff --git a/httemplate/edit/svc_broadband.cgi b/httemplate/edit/svc_broadband.cgi index f017d7a6e..9e064c5c8 100644 --- a/httemplate/edit/svc_broadband.cgi +++ b/httemplate/edit/svc_broadband.cgi @@ -11,11 +11,11 @@ use Tie::IxHash; my( $svcnum, $pkgnum, $svcpart, $part_svc, $svc_broadband ); if ( $cgi->param('error') ) { $svc_broadband = new FS::svc_broadband ( { - map { $_, scalar($cgi->param($_)) } fields('svc_broadband') + map { $_, scalar($cgi->param($_)) } fields('svc_broadband'), qw(svcpart) } ); $svcnum = $svc_broadband->svcnum; $pkgnum = $cgi->param('pkgnum'); - $svcpart = $cgi->param('svcpart'); + $svcpart = $svc_broadband->svcpart; $part_svc=qsearchs('part_svc',{'svcpart'=>$svcpart}); die "No part_svc entry!" unless $part_svc; } else { @@ -36,8 +36,6 @@ if ( $cgi->param('error') ) { } else { #adding - $svc_broadband = new FS::svc_broadband({}); - foreach $_ (split(/-/,$query)) { #get & untaint pkgnum & svcpart $pkgnum=$1 if /^pkgnum(\d+)$/; $svcpart=$1 if /^svcpart(\d+)$/; @@ -45,7 +43,7 @@ if ( $cgi->param('error') ) { $part_svc=qsearchs('part_svc',{'svcpart'=>$svcpart}); die "No part_svc entry!" unless $part_svc; - $svc_broadband->setfield('svcpart', $svcpart); + $svc_broadband = new FS::svc_broadband({ svcpart => $svcpart }); $svcnum=''; @@ -96,10 +94,18 @@ Service #<%=$svcnum ? $svcnum : "(NEW)"%>

- <%=&ntable("#cccccc",2)%> - + + IP Address + +<% if ( $part_svc->part_svc_column('ip_addr')->columnflag eq 'F' ) { %> + <%=$ip_addr%> +<% } else { %> + +<% } %> + + Download speed @@ -126,7 +132,9 @@ Service #<%=$svcnum ? $svcnum : "(NEW)"%>

<% - foreach $opt (@opts) { %> - <% - } %> - <% } else { %> - length ? 'SIZE="'.$_->length.'"' : ''%>> - <% } %> - - -<% } %> +foreach my $field ($svc_broadband->virtual_fields) { + if ( $part_svc->part_svc_column($field)->columnflag ne 'F' && + $part_svc->part_svc_column($field)->columnflag ne 'X') { + print $svc_broadband->pvf($field)->widget('HTML', 'edit', + $svc_broadband->getfield($field)); + } +} %>