X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcdr%2Fwip.pm;h=19c45c680ac076c0a3fdcda6cd18a6becff26f5e;hb=57bb423fe457ba4e13726877f53bcdf944f828f8;hp=070e253434ec60c7928773b57c933b50722d5747;hpb=01dbdf631092f7a56182d1cce6dde68de4e2516b;p=freeside.git

diff --git a/FS/FS/cdr/wip.pm b/FS/FS/cdr/wip.pm
index 070e25343..19c45c680 100644
--- a/FS/FS/cdr/wip.pm
+++ b/FS/FS/cdr/wip.pm
@@ -17,7 +17,10 @@ use FS::cdr qw(_cdr_date_parser_maker);
 # except that we assume that before all the fields mentioned in the
 # spec, there's a counter field.
     skip(4),          # counter, id, APCSJursID, RecordType
-    'unique_id',      # CDRID
+    sub { my($cdr, $data, $conf, $param) = @_;
+          $param->{skiprow} = 1 if $data == 1;
+          $cdr->uniqueid($data);
+    },      # CDRID; is 1 for line charge records
     skip(1),          # AccountNumber; empty
     'charged_party',  # ServiceNumber
     skip(1),          # ServiceNumberType
@@ -37,10 +40,6 @@ use FS::cdr qw(_cdr_date_parser_maker);
     'upstream_price', # ISPBuy
     skip(2),          # EUBuy, CDRFromCarrier
     ],
-# Need clarification on:
-# Values for RecordType, Jurisdiction, CompletionStatus, and ProviderClass
-# Do we care about the following:
-# AccountNumber, ServiceNumberType, CDRStatus
 
 );