X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fpart_svc.cgi;h=fae8961543ccb9370ed2247147d60830dd5958a6;hb=fb4ab1073f0d15d660c6cdc4e07afebf68ef3924;hp=4b8a2408037488038c1fdb5672d214c0ff4cff72;hpb=5e05724a635a22776f1b973f5d7e77989da4e048;p=freeside.git
diff --git a/httemplate/edit/part_svc.cgi b/httemplate/edit/part_svc.cgi
index 4b8a24080..fae896154 100755
--- a/httemplate/edit/part_svc.cgi
+++ b/httemplate/edit/part_svc.cgi
@@ -9,39 +9,31 @@
Service Part #<% $part_svc->svcpart ? $part_svc->svcpart : "(NEW)" %>
Service
-Disable new orders {disabled} eq 'Y' ? ' CHECKED' : '' %>>
+
+Self-service access:
+
+
+{disabled} eq 'Y' ? ' CHECKED' : '' %>> Disable new orders
+
+{'preserve'} eq 'Y' ? ' CHECKED' : '' %>> Preserve this service on package cancellation
+
+
+
-Service definitions are the templates for items you offer to your customers.
-
svc_acct - Accounts - anything with a username (Mailboxes, PPP accounts, shell accounts, RADIUS entries for broadband, etc.)
-
svc_domain - Domains
-
svc_forward - mail forwarding
-
svc_www - Virtual domain website
-
svc_broadband - Broadband/High-speed Internet service (always-on)
-
svc_phone - Customer phone numbers
-
svc_external - Externally-tracked service
-
-
-For the selected table, you can give fields default or fixed (unchangable)
-values, or select an inventory class to manually or automatically fill in
-that field.
-
-% #YUCK. false laziness w/part_svc.pm. go away virtual fields, please
% my %vfields;
-% foreach my $svcdb ( FS::part_svc->svc_tables() ) {
-% eval "use FS::$svcdb;";
-% my $self = "FS::$svcdb"->new;
-% $vfields{$svcdb} = {};
-% foreach my $field ($self->virtual_fields) { # svc_Common::virtual_fields with a null svcpart returns all of them
-% my $pvf = $self->pvf($field);
-% $vfields{$svcdb}->{$field} = $pvf;
-% #warn "\$vfields{$svcdb}->{$field} = $pvf";
-% } #next $field
-% } #next $svcdb
-%
% #code duplication w/ edit/part_svc.cgi, should move this hash to part_svc.pm
% # and generalize the subs
% # condition sub is tested to see whether to disable display of this choice
@@ -64,13 +56,15 @@ that field.
% 'condition' =>
% sub { !ref($_[0]) || $_[0]->{disable_select} },
% },
-%# need to template-ize httemplate/edit/svc_* first
-%# 'M' => { 'desc' => 'Manual selection from inventory',
-%# 'condition' => $inv_sub,
-%# },
+% 'M' => { 'desc' => 'Manual selection from inventory',
+% 'condition' => $inv_sub,
+% },
% 'A' => { 'desc' => 'Automatically fill in from inventory',
% 'condition' => $inv_sub,
% },
+% 'H' => { 'desc' => 'Select from hardware class',
+% 'condition' => sub { $_[0]->{type} ne 'select-hardware' },
+% },
% 'X' => { 'desc' => 'Excluded',
% 'condition' =>
% sub { ! $vfields{$_[1]}->{$_[2]} },
@@ -91,20 +85,25 @@ that field.
% #'form_action' => 'process/part_svc.cgi',
% 'form_action' => 'part_svc.cgi', #self
% 'form_text' => [ qw( svc svcpart ) ],
-% 'form_checkbox' => [ 'disabled' ],
+% 'form_select' => [ 'selfservice_access' ],
+% 'form_checkbox' => [ 'disabled', 'preserve' ],
% 'layer_callback' => sub {
% my $layer = shift;
%
% my $html = qq!!;
%
+% $html .= $svcdb_info;
+%
% my $columns = 3;
% my $count = 0;
+% my $communigate = 0;
% my @part_export =
% map { qsearch( 'part_export', {exporttype => $_ } ) }
% keys %{FS::part_export::export_info($layer)};
-% $html .= '
'. table().
+% $html .= '
'. include('/elements/table.html') .
% "
Exports
";
% foreach my $part_export ( @part_export ) {
+% $communigate++ if $part_export->exporttype =~ /^communigate/;
% $html .= '
svc_acct: Accounts - anything with a username (mailbox, shell, RADIUS, etc.)
+
svc_hardware: Equipment supplied to customers
+
svc_external: Externally-tracked service
+
+
+
+
+
svc_dsl: DSL
+
svc_broadband: Wireless broadband
+
svc_dish: DISH Network
+
+
+
+
+
svc_phone: Customer phone number
+
svc_pbx: Customer PBX
+
+
+
+
+
+
+
+
Hosting
+
Colocation
+
+
+
+
svc_domain: Domain
+
svc_cert: Certificate
+
svc_forward: Mail forwarding
+
svc_mailinglist: Mailing list
+
svc_www: Virtual domain website
+
+
+
+
+
svc_port: Customer router/switch port
+
+
+
+
+
+';
+my $mod_info = '
+For the selected table, you can give fields default or fixed (unchangable)
+values, or select an inventory class to manually or automatically fill in
+that field.
+';
%init>