[freeside-commits] freeside/httemplate/misc part_svc-columns.cgi, NONE, 1.1

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/httemplate/misc
In directory wavetail.420.am:/tmp/cvs-serv9781/httemplate/misc

Added Files:
	part_svc-columns.cgi 
Log Message:
add svc_phone on new customer first package, RT#4315

--- NEW FILE: part_svc-columns.cgi ---
<% objToJson(\@output) %>
<%init>

my $conf = new FS::Conf;

my $pkgpart_svcpart = $cgi->param('arg');
$pkgpart_svcpart =~ /^\d+_(\d+)$/;
my $part_svc = qsearchs('part_svc', { 'svcpart' => $1 }) if $1;

my @output = map { ( $_->columnname, $_->columnflag, $_->columnvalue ) }
                 $part_svc->all_part_svc_column;

</%init>