X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fview%2Felements%2Fsvc_Common.html;h=852640e0c49341d7139aee4a5ecdc39086273493;hp=92eef2dad07f52fbec8f3dcbf8dc4b85f1e9c1b5;hb=74a3083375ccc3a0dc8b74f9b39392989d088656;hpb=be10e7a1421c13eec4b1bb3676eaf5c84344e601
diff --git a/httemplate/view/elements/svc_Common.html b/httemplate/view/elements/svc_Common.html
index 92eef2dad..852640e0c 100644
--- a/httemplate/view/elements/svc_Common.html
+++ b/httemplate/view/elements/svc_Common.html
@@ -1,66 +1,40 @@
-%
-%
-% # options example...
-% #
-% # 'table' => 'svc_something'
-% #
-% # 'labels' => {
-% # 'column' => 'Label',
-% # },
-% #
-% # listref - each item is a literal column name (or method) or (notyet) coderef
-% # if not specified all columns (except for the primary key) will be viewable
-% # 'fields' => [
-% # ]
-% #
-% # # defaults to "edit/$table.cgi?", will have svcnum appended
-% # 'edit_url' =>
-%
-% my(%opt) = @_;
-%
-% my $table = $opt{'table'};
-%
-% my $fields = $opt{'fields'}
-% #|| [ grep { $_ ne 'svcnum' } dbdef->table($table)->columns ];
-% || [ grep { $_ ne 'svcnum' } fields($table) ];
-%
-% my $svcnum;
-% if ( $cgi->param('svcnum') ) {
-% $cgi->param('svcnum') =~ /^(\d+)$/ or die "unparsable svcnum";
-% $svcnum = $1;
-% } else {
-% my($query) = $cgi->keywords;
-% $query =~ /^(\d+)$/ or die "no svcnum";
-% $svcnum = $1;
-% }
-% my $svc_x = qsearchs( $opt{'table'}, { 'svcnum' => $svcnum } )
-% or die "Unknown svcnum $svcnum in ". $opt{'table'}. " table\n";
-%
-% my $cust_svc = $svc_x->cust_svc;
-% my($label, $value, $svcdb) = $cust_svc->label;
-%
-% my $pkgnum = $cust_svc->pkgnum;
-%
-% my($cust_pkg, $custnum);
-% if ($pkgnum) {
-% $cust_pkg = $cust_svc->cust_pkg;
-% $custnum = $cust_pkg->custnum;
-% } else {
-% $cust_pkg = '';
-% $custnum = '';
-% }
-%
-%
-% if ( $custnum ) {
+<%doc>
+
+#Example:
+
+ include( 'elements/svc_Common.html,
+
+ 'table' => 'svc_something'
+
+ 'labels' => {
+ 'column' => 'Label',
+ },
+
+ #listref - each item is a literal column name (or method) or
+ # (notyet) coderef. if not specified all columns (except for the
+ #primary key) will be viewable
+ 'fields' => [
+ ]
+ # defaults to "edit/$table.cgi?", will have svcnum appended
+ 'edit_url' =>
+ )
+
+%doc>
+% if ( $custnum ) {
<% include("/elements/header.html","View $label: $value") %>
<% include( '/elements/small_custview.html', $custnum, '', 1,
"${p}view/cust_main.cgi") %>
+
% } else {
+ <% include("/elements/header.html","View $label: $value", menubar(
+ "Cancel this (unaudited) $label" =>
+ "javascript:areyousure(\'${p}misc/cancel-unaudited.cgi?$svcnum\')"
+ )) %>
- <% include("/elements/header.html","View $label: $value", menubar(
- "Cancel this (unaudited) $label" =>
- "javascript:areyousure(\'${p}misc/cancel-unaudited.cgi?$svcnum\')"
- )) %>
% }
-
Service #<% $svcnum %>
% my $url = $opt{'edit_url'} || $p. 'edit/'. $opt{'table'}. '.cgi?';
| Edit this <% $label %>
<% ntable("#cccccc") %>