projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
7678d3e
)
adminsuidsetup now need user
author
ivan
<ivan>
Wed, 16 Dec 1998 05:29:45 +0000
(
05:29
+0000)
committer
ivan
<ivan>
Wed, 16 Dec 1998 05:29:45 +0000
(
05:29
+0000)
eg/TEMPLATE_cust_main.import
patch
|
blob
|
history
diff --git
a/eg/TEMPLATE_cust_main.import
b/eg/TEMPLATE_cust_main.import
index
39a5785
..
4ac7efd
100755
(executable)
--- a/
eg/TEMPLATE_cust_main.import
+++ b/
eg/TEMPLATE_cust_main.import
@@
-2,7
+2,14
@@
# Template for importing legacy customer data
#
# Template for importing legacy customer data
#
+# $Id: TEMPLATE_cust_main.import,v 1.2 1998-12-16 05:29:45 ivan Exp $
+#
# ivan@sisd.com 98-aug-17 - 20
# ivan@sisd.com 98-aug-17 - 20
+#
+# $Log: TEMPLATE_cust_main.import,v $
+# Revision 1.2 1998-12-16 05:29:45 ivan
+# adminsuidsetup now need user
+#
use strict;
use FS::UID qw(adminsuidsetup datasrc);
use strict;
use FS::UID qw(adminsuidsetup datasrc);
@@
-11,7
+18,8
@@
use FS::cust_main;
use FS::cust_pkg;
use Date::Parse;
use FS::cust_pkg;
use Date::Parse;
-adminsuidsetup;
+my $user = shift or die &usage;
+adminsuidsetup $user;
# use these for the imported cust_main records (unless you have these in legacy
# data)
# use these for the imported cust_main records (unless you have these in legacy
# data)
@@
-187,3
+195,8
@@
while (<CLIENT>) {
warn "\n$link of $line lines linked\n";
warn "\n$link of $line lines linked\n";
+# ---
+
+sub usage {
+ die "Usage:\n\n cust_main.import user\n";
+}