[freeside-commits] freeside/bin import-did-inventory, 1.1.2.16, 1.1.2.17

Erik Levinson levinse at wavetail.420.am
Wed Jun 15 17:33:32 PDT 2011


Update of /home/cvs/cvsroot/freeside/bin
In directory wavetail.420.am:/tmp/cvs-serv10632/bin

Modified Files:
      Tag: FREESIDE_2_1_BRANCH
	import-did-inventory 
Log Message:
DID inventory/import / bulk DID orders - phase 2, RT12754

Index: import-did-inventory
===================================================================
RCS file: /home/cvs/cvsroot/freeside/bin/import-did-inventory,v
retrieving revision 1.1.2.16
retrieving revision 1.1.2.17
diff -u -w -d -r1.1.2.16 -r1.1.2.17
--- import-did-inventory	15 Jun 2011 23:44:49 -0000	1.1.2.16
+++ import-did-inventory	16 Jun 2011 00:33:30 -0000	1.1.2.17
@@ -94,11 +94,12 @@
 $latas{952} = 'TAMPA FLORIDA';
 $latas{524} = 'KANSAS CITY';
 
+my $parser = new DateTime::Format::Natural( 'time_zone' => 'local' );
 sub parsedt {
     my ($dt,$min,$max) = (shift,shift,shift);
-    my $parser = new DateTime::Format::Natural( 'time_zone' => 'local' );
+    $dt = "$dt 00:00:00";
     my $epoch = $parser->parse_datetime($dt);
-    warn "dt=$dt min=$min max=$max epoch=$epoch\n";
+    warn "dt='$dt' min=$min max=$max epoch=$epoch\n";
     return $epoch->epoch 
         if ($parser->success && $epoch->epoch >= $min && $epoch->epoch <= $max);
     fatal("invalid date $dt (min=$min, max=$max)");



More information about the freeside-commits mailing list