RT# 82949 - changes section name from fees to pricing, better opiton
[freeside.git] / httemplate / edit / part_svc.cgi
1 <& /elements/header.html, "$action Service Definition" &>
2 <& /elements/menubar.html,
3   'View all service definitions' => "${p}browse/part_svc.cgi"
4            #" onLoad=\"visualize()\""
5 &>
6
7 <& /elements/init_overlib.html &>
8
9 <BR><BR>
10
11 <STYLE TYPE="text/css">
12 .disabled {
13   background-color: #dddddd;
14 }
15 .hidden {
16   display: none;
17 }
18 .enabled {
19   background-color: #ffffff;
20 }
21 .row0 TD {
22   background-color: #eeeeee;
23 }
24 .row1 TD {
25   background-color: #ffffff;
26 }
27 .def_info {
28   text-align: center;
29   padding: 0px;
30   border-top: none;
31   font-size: smaller;
32   font-style: italic;
33 }
34 .selectrole {
35   font-size: small
36 }
37 </STYLE>
38 <SCRIPT TYPE="text/javascript">
39 // copy all fields from the outer form (svc and its localizations, plus
40 // preserve, selfservice_access, etc.) into the inner form, creating hidden
41 // inputs if needed
42 function fixup_submit(layer) {
43   var layer_form = $(document.forms[layer]);
44   var main_form = $(document.forms['SvcEditMain']);
45   var data = main_form.serializeArray();
46   for (var i = 0; i < data.length; i++) {
47     var input = layer_form.children('[name=' + data[i].name + ']');
48     if (input[0]) {
49       input.prop('value', data[i].value);
50     } else {
51       $( '<input type="hidden">' )
52         .attr('name', data[i].name)
53         .prop('value', data[i].value)
54         .appendTo(layer_form);
55     }
56   }
57   layer_form[0]['submit'].disabled = true;
58   //fixup(document.forms[layer]);
59   window[layer+'process'].call();
60 }
61
62 function flag_changed(obj) {
63   var newflag = obj.value;
64   var a = obj.name.match(/(.*)__(.*)_flag/);
65   var layer = a[1];
66   var field = a[2];
67   var input = document.getElementById(layer + '__' + field);
68   // for fields that have both 'input' and 'select', 'select' is 'select from
69   // inventory class'.
70   var select = document.getElementById(layer + '__' + field + '_select');
71   if (newflag == "" || newflag == "X") { // disable
72     if ( input ) {
73       input.disabled = true;
74       input.className = 'disabled';
75     }
76     if ( select ) {
77       select.disabled = true;
78       select.className = 'hidden';
79     }
80   } else if ( newflag == 'D' || newflag == 'F' || newflag == 'S' ) {
81     if ( input ) {
82       // enable text box, disable inventory select
83       input.disabled = false;
84       input.className = 'enabled';
85       if ( select ) {
86         select.disabled = false;
87         select.className = 'hidden';
88       }
89     } else if ( select ) {
90       // enable select
91       select.disabled = false;
92       select.className = 'enabled';
93       if ( newflag == 'S' || select.getAttribute('should_be_multiple') ) {
94         select.multiple = true;
95         var defaults = select.getAttribute('default');
96         if ( defaults ) {
97           defaults = defaults.split(',');
98           for (var i = 0; i < defaults.length; i++) {
99             for (j = 0; j < select.options.length; j++ ) {
100               if ( defaults[i] == select.options[j].value ) {
101                 select.options[j].selected = true;
102               }
103             }
104           }
105         }
106       } else {
107         select.multiple = false;
108       }
109     }
110   } else if ( newflag == 'M' || newflag == 'A' || newflag == 'H' || newflag == 'P' ) {
111     // these all require a class selection
112     if ( select ) {
113       select.disabled = false;
114       select.className = 'enabled';
115       if ( input ) {
116         input.disabled = false;
117         input.className = 'hidden';
118       }
119     }
120   }
121   var required = document.getElementById(layer + '__' + field + '_required');
122   if (required && !required.disabledinit) {
123     if (newflag == "F" || newflag =="P") {
124       required.checked = false;
125       required.disabled = true;
126     } else {
127       required.disabled = false;
128     }
129   }
130 }
131
132 window.onload = function() {
133   var selects = document.getElementsByTagName('SELECT');
134   for(i = 0; i < selects.length; i++) {
135     var obj = selects[i];
136     if ( obj.multiple ) {
137       obj.setAttribute('should_be_multiple', true);
138     }
139   }
140   var inputs = document.getElementsByTagName('INPUT');
141   for(i = 0; i < inputs.length; i++) {
142     var obj = inputs[i];
143     if (obj.type == 'checkbox') {
144       if ( obj.name.match(/_required$/) ) {
145         if ( obj.disabled ) {
146           obj.disabledinit = 1;
147         }
148       }
149     }
150   }
151   for(i = 0; i < selects.length; i++) {
152     var obj = selects[i];
153     if ( obj.name.match(/_flag$/) ) {
154       flag_changed(obj);
155     }
156   }
157 };
158
159 </SCRIPT>
160
161 <FORM NAME="SvcEditMain">
162
163 <FONT CLASS="fsinnerbox-title">Service Part #<% $part_svc->svcpart ? $part_svc->svcpart : "(NEW)" %></FONT>
164 <TABLE CLASS="fsinnerbox">
165 <& /elements/tr-input-locale-text.html,
166   'object' => $part_svc,
167   'cgi'    => $cgi,
168   'field'  => 'svc',
169   'label'  => 'Service',
170   'curr_value' => $hashref->{svc},
171 &>
172 %#<TR>
173 %#  <TD ALIGN="right">Service</TD>
174 %#  <TD><INPUT TYPE="text" NAME="svc" VALUE="<% $hashref->{svc} %>"></TD>
175 %#<TR>
176
177 <& /elements/tr-select-part_svc_class.html, curr_value=>$hashref->{classnum} &>
178
179 <TR>
180   <TH ALIGN="right">Self-service access</TD>
181   <TD>
182     <SELECT NAME="selfservice_access">
183 % tie my %selfservice_access, 'Tie::IxHash', #false laziness w/browse/part_svc
184 %   ''         => 'Yes',
185 %   'hidden'   => 'Hidden',
186 %   'readonly' => 'Read-only',
187 % ;
188 % for (keys %selfservice_access) {
189   <OPTION VALUE="<% $_ %>"
190           <% $_ eq $hashref->{'selfservice_access'} ? 'SELECTED' : '' %>
191   ><% $selfservice_access{$_} %>
192 % }
193     </SELECT>
194   </TD>
195 </TR>
196
197
198 <TR>
199   <TH ALIGN="right">Disable new orders</TD>
200   <TD><INPUT TYPE="checkbox" NAME="disabled" VALUE="Y"<% $hashref->{disabled} eq 'Y' ? ' CHECKED' : '' %>></TD>
201 </TR>
202
203 <TR>
204   <TH ALIGN="right">Preserve this service on package cancellation</TD>
205   <TD><INPUT TYPE="checkbox" NAME="preserve" VALUE="Y"<% $hashref->{'preserve'} eq 'Y' ? ' CHECKED' : '' %>>&nbsp;</TD>
206 </TR>
207
208 </TABLE>
209
210 <INPUT TYPE="hidden" NAME="svcpart" VALUE="<% $hashref->{svcpart} %>">
211
212 <BR>
213
214 <FONT SIZE="+1"><B>Table</B></FONT> <% $widget->html %>
215
216 <& /elements/footer.html &>
217
218 <%init>
219
220 die "access denied"
221   unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
222
223 my $conf = FS::Conf->new;
224 my $part_svc;
225 my $clone = '';
226 if ( $cgi->param('clone') && $cgi->param('clone') =~ /^(\d+)$/ ) {#clone
227   #$cgi->param('clone') =~ /^(\d+)$/ or die "malformed query: $query";
228   $part_svc = qsearchs('part_svc', { 'svcpart'=>$1 } )
229     or die "unknown svcpart: $1";
230   $clone = $part_svc->svcpart;
231   $part_svc->svcpart('');
232 } elsif ( $cgi->keywords ) { #edit
233   my($query) = $cgi->keywords;
234   $query =~ /^(\d+)$/ or die "malformed query: $query";
235   $part_svc=qsearchs('part_svc', { 'svcpart'=>$1 } )
236     or die "unknown svcpart: $1";
237 } else { #adding
238   $part_svc = new FS::part_svc {};
239 }
240
241 my $action = $part_svc->svcpart ? 'Edit' : 'Add';
242 my $hashref = $part_svc->hashref;
243 #   my $p_svcdb = $part_svc->svcdb || 'svc_acct';
244
245
246 my @dbs = $hashref->{svcdb}
247            ? ( $hashref->{svcdb} )
248            : FS::part_svc->svc_tables();
249
250 my $help = '';
251 unless ( $hashref->{svcpart} ) {
252   $help = '&nbsp;'.
253           include('/elements/popup_link.html',
254                     'action'      => $p.'docs/part_svc-table.html',
255                     'label'       => 'help',
256                     'actionlabel' => 'Service table help',
257                     'width'       => 960,
258                     'height'      => 400,
259                   );
260 }
261
262 tie my %svcdb, 'Tie::IxHash', map { $_=>$_ } grep dbdef->table($_), @dbs;
263 my $widget = new HTML::Widgets::SelectLayers(
264   #'selected_layer' => $p_svcdb,
265   'selected_layer' => $hashref->{svcdb} || 'svc_acct',
266   'options'        => \%svcdb,
267   'form_name'      => 'SvcEditMain',
268   #'form_action'    => 'process/part_svc.cgi',
269   'form_action'    => 'part_svc.cgi', #self
270 #  'form_elements'  => [qw( svc svcpart classnum selfservice_access
271 #                           disabled preserve
272 #                      )],
273   'html_between'   => $help,
274   'layer_callback' => sub {
275     include('elements/part_svc_column.html',
276               shift,
277               'part_svc' => $part_svc,
278               'clone' => $clone
279     )
280   }
281 );
282 </%init>
283
284
285