TT#104850 support "lines" in header&footer format

Change-Id: If082b79094a157fe92e88c91cfd9422f40277aa2
5 years ago · dd3390c144
parent 3703c16d06
commit dd3390c144
2 changed files with 3 additions and 1 deletions
--- a/NGCP/CDR/Export.pm
+++ b/NGCP/CDR/Export.pm
@ -144,6 +144,7 @@ sub write_file {
        my $str =
            apply_format($csv_header, {
                            rows      => $num,
+                            lines     => $num,
                            version   => $version,
                            checksum  => undef,
                            first_seq => $lastseq,
@ -169,6 +170,7 @@ sub write_file {
        my $str =
            apply_format($csv_footer, {
                            rows      => $num,
+                            lines     => $num,
                            version   => $version,
                            checksum  => $md5,
                            first_seq => $lastseq,
--- a/NGCP/CDR/Exporter.pm
+++ b/NGCP/CDR/Exporter.pm
@ -90,7 +90,7 @@ my %config = (
    'default.QUOTES' => "'",
    'default.CSV_SEP' => ',',
    'default.CSV_ESC' => "\\",
-    'default.CSV_HEADER' => '${version},${rows,%04i}',
+    'default.CSV_HEADER' => '${version},${lines,%04i}',
    'default.CSV_FOOTER' => '${checksum}',
    'default.WRITE_EMPTY' => "yes",
 );