X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=eg%2FTEMPLATE_cust_main.import;h=4ac7efdc72faf2b5cb3d6f124eae1f8fa5c05d6c;hp=39a5785db62377185daf3e10456648d8ff746ef5;hb=c0552e0f27038eb05002e224fa3c88afeadbc39f;hpb=7678d3ee6ea69741060539ab79946555228a07e5 diff --git a/eg/TEMPLATE_cust_main.import b/eg/TEMPLATE_cust_main.import index 39a5785db..4ac7efdc7 100755 --- a/eg/TEMPLATE_cust_main.import +++ b/eg/TEMPLATE_cust_main.import @@ -2,7 +2,14 @@ # 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 +# +# $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); @@ -11,7 +18,8 @@ use FS::cust_main; 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) @@ -187,3 +195,8 @@ while () { warn "\n$link of $line lines linked\n"; +# --- + +sub usage { + die "Usage:\n\n cust_main.import user\n"; +}