summaryrefslogtreecommitdiff
path: root/httemplate/misc/location.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/misc/location.cgi')
-rw-r--r--httemplate/misc/location.cgi30
1 files changed, 0 insertions, 30 deletions
diff --git a/httemplate/misc/location.cgi b/httemplate/misc/location.cgi
deleted file mode 100644
index 82ad636..0000000
--- a/httemplate/misc/location.cgi
+++ /dev/null
@@ -1,30 +0,0 @@
-<% objToJson(\%hash) %>
-<%init>
-
-my $locationnum = $cgi->param('arg');
-
-my $curuser = $FS::CurrentUser::CurrentUser;
-
-my $cust_location = qsearchs({
- 'select' => 'cust_location.*',
- 'table' => 'cust_location',
- 'hashref' => { 'locationnum' => $locationnum },
- 'addl_from' => ' LEFT JOIN cust_main USING ( custnum ) ',
- ' LEFT JOIN prospect_main USING ( prospectnum ) ',
- 'extra_sql' => ' AND ( '.
- ' ( custnum IS NOT NULL AND '.
- $curuser->agentnums_sql( table=>'cust_main' ).
- ' ) '.
- ' OR '.
- ' ( prospectnum IS NOT NULL AND '.
- $curuser->agentnums_sql( table=>'prospect_main' ).
- ' ) '.
- ' )',
-});
-
-my %hash = ();
-%hash = map { $_ => $cust_location->$_() }
- qw( address1 address2 city county state zip country )
- if $cust_location;
-
-</%init>