Projekt

Allgemein

Profil

Herunterladen (9,42 KB)

Fehler #416 » datev_tests.diff

Bernd Bleßmann, 24.01.2020 18:24

Unterschiede anzeigen:

t/datev/datev_format_2018.t
130 130 
$datev4->to($enddate);
131 131 
$datev4->generate_datev_data;
132 132 
$datev4->generate_datev_lines;
133 

  		




  133
  134
  
    
my ($datev_csv4, $die_message3, $lines_aref);

  		




  134
  135
  
    
eval {

  		




  135
  136
  
    
  $datev_csv4 = SL::DATEV::CSV->new(datev_lines  => $datev4->generate_datev_lines,

  		




  ......




  160
  161
  
    
                            '', '', '', '', '', '', '', '', '',

  		




  161
  162
  
    
                            '', '', '', '', '', '', '', '', '',

  		




  162
  163
  
    
                            '', '', '', '', '', '', '', '', '',

  		




  163
  
  
    
                            '', '', '', '', '', '', '', '', '',

  		




  164
  
  
    
                            '',

  		




  
  164
  
    
                            '', '', '', '', '', '', '', '1', '',

  		




  
  165
  
    
                            '', '', '', '', '',

  		




  165
  166
  
    
                          ];

  		




  166
  167
  
    
cmp_deeply $sorted[1],     [ '535', 'S', 'EUR', '', '', '',

  		




  167
  168
  
    
                             '1400', '8300', '', '1907','meine muh',

  		




  ......




  176
  177
  
    
                            '', '', '', '', '', '', '', '', '',

  		




  177
  178
  
    
                            '', '', '', '', '', '', '', '', '',

  		




  178
  179
  
    
                            '', '', '', '', '', '', '', '', '',

  		




  179
  
  
    
                            '', '', '', '', '', '', '', '', '',

  		




  180
  
  
    
                            '',

  		




  
  180
  
    
                            '', '', '', '', '', '', '', '1', '',

  		




  
  181
  
    
                            '', '', '', '', '',

  		




  181
  182
  
    
                          ];

  		




  182
  183
  
    
# create one haben buchung with GLTransaction today

  		




  183
  184
  
    

  		




  ......




  229
  230
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  230
  231
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  231
  232
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  232
  
  
    
                     '', '', '', '', '' ]

  		




  
  233
  
    
                     '', '', '1', '', '', '', '', '', '', ]

  		




  233
  234
  
    
       );

  		




  234
  235
  
    

  		




  235
  236
  
    
# TODO warnings are not yet tested

  		












  

    
      t/datev/invoices.t
    
  





  73
  73
  
    
                                           'konto'        => '1400',

  		




  74
  74
  
    
                                           'kost1'        => 'Kostenstelle DATEV-Schnittstelle 2018',

  		




  75
  75
  
    
                                           'kost2'        => 'Crowd-Funding September 2017',

  		




  
  76
  
    
                                           'locked'       => undef,

  		




  76
  77
  
    
                                           'umsatz'       => '249.9',

  		




  77
  78
  
    
                                           'waehrung'     => 'EUR',

  		




  78
  79
  
    
                                         },

  		




  ......




  84
  85
  
    
                                           'konto'        => '1400',

  		




  85
  86
  
    
                                           'kost1'        => 'Kostenstelle DATEV-Schnittstelle 2018',

  		




  86
  87
  
    
                                           'kost2'        => 'Crowd-Funding September 2017',

  		




  
  88
  
    
                                           'locked'       => undef,

  		




  87
  89
  
    
                                           'umsatz'       => 535,

  		




  88
  90
  
    
                                           'waehrung'     => 'EUR',

  		




  89
  91
  
    
                                         },

  		




  ......




  97
  99
  
    
                                           'kost1'        => 'Kostenstelle DATEV-Schnittstelle 2018',

  		




  98
  100
  
    
                                           'kost2'        => 'Crowd-Funding September 2017',

  		




  99
  101
  
    
                                           'umsatz'       => '784.9',

  		




  
  102
  
    
                                           'locked'       => undef,

  		




  100
  103
  
    
                                           'waehrung'     => 'EUR',

  		




  101
  104
  
    
                                         },

  		




  102
  105
  
    
                                       ], "trans_id datev check ok";

  		




  ......




  114
  117
  
    
                                           'kost1'        => 'Kostenstelle DATEV-Schnittstelle 2018',

  		




  115
  118
  
    
                                           'kost2'        => 'Crowd-Funding September 2017',

  		




  116
  119
  
    
                                           'umsatz'       => '249.9',

  		




  
  120
  
    
                                           'locked'       => undef,

  		




  117
  121
  
    
                                           'waehrung'     => 'EUR',

  		




  118
  122
  
    
                                         },

  		




  119
  123
  
    
                                         {

  		




  ......




  125
  129
  
    
                                           'kost1'        => 'Kostenstelle DATEV-Schnittstelle 2018',

  		




  126
  130
  
    
                                           'kost2'        => 'Crowd-Funding September 2017',

  		




  127
  131
  
    
                                           'umsatz'       => 535,

  		




  
  132
  
    
                                           'locked'       => undef,

  		




  128
  133
  
    
                                           'waehrung'     => 'EUR',

  		




  129
  134
  
    
                                         },

  		




  130
  135
  
    
                                         {

  		




  ......




  136
  141
  
    
                                           'kost1'        => 'Kostenstelle DATEV-Schnittstelle 2018',

  		




  137
  142
  
    
                                           'kost2'        => 'Crowd-Funding September 2017',

  		




  138
  143
  
    
                                           'umsatz'       => '784.9',

  		




  
  144
  
    
                                           'locked'       => undef,

  		




  139
  145
  
    
                                           'waehrung'     => 'EUR',

  		




  140
  146
  
    
                                         },

  		




  141
  147
  
    
                                       ], "trans_id datev check use_pk ok";

  		




  ......




  175
  181
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  176
  182
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  177
  183
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  178
  
  
    
                     '', '', '', '', '' ]

  		




  
  184
  
    
                     '', '', '1', '', '', '', '', '', '' ]

  		




  179
  185
  
    
       );

  		




  180
  186
  
    

  		




  181
  187
  
    
cmp_deeply($data_csv[0], [ '249,9', 'S', 'EUR', '', '', '', '1400', '8400', '', '0101', "\x{de} sales \x{a5}& i",

  		




  ......




  187
  193
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  188
  194
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  189
  195
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  190
  
  
    
                     '', '', '', '', '' ]

  		




  
  196
  
    
                     '', '', '1', '', '', '', '', '', '' ]

  		




  191
  197
  
    
       );

  		




  192
  198
  
    
cmp_deeply($data_csv[2], [ '784,9', 'S', 'EUR', '', '', '', '1200', '1400', '', '0501', "\x{de} sales \x{a5}& i",

  		




  193
  199
  
    
                     '', '', 'Testcustomer', '', '', '', '', '', '', '', '',

  		




  ......




  198
  204
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  199
  205
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  200
  206
  
    
                     '', '', '', '', '', '', '', '', '', '', '', '', '',

  		




  201
  
  
    
                     '', '', '', '', '' ]

  		




  
  207
  
    
                     '', '', '1', '', '', '', '', '', '' ]

  		




  202
  208
  
    
        );

  		




  203
  209
  
    
my $march_9 = DateTime->new(year => 2017, month =>  3, day => 9);

  		




  204
  210
  
    
my $invoice2 = create_sales_invoice(

  		




  ......




  278
  284
  
    
                                          'kost1'                  => undef,

  		




  279
  285
  
    
                                          'kost2'                  => undef,

  		




  280
  286
  
    
                                          'umsatz'                 => 119,

  		




  
  287
  
    
                                          'locked'                 => undef,

  		




  281
  288
  
    
                                          'waehrung'               => 'EUR'

  		




  282
  289
  
    
                                        },

  		




  283
  290
  
    
                                        {

  		




  ......




  289
  296
  
    
                                          'kost1'                  => undef,

  		




  290
  297
  
    
                                          'kost2'                  => undef,

  		




  291
  298
  
    
                                          'umsatz'                 => 107,

  		




  
  299
  
    
                                          'locked'                 => undef,

  		




  292
  300
  
    
                                          'waehrung'               => 'EUR'

  		




  293
  301
  
    
                                        }

  		




  294
  302
  
    
                                       ], "trans_id datev check purchase_invoice ok";

  		




  ......




  304
  312
  
    
                                          'kost1'                  => undef,

  		




  305
  313
  
    
                                          'kost2'                  => undef,

  		




  306
  314
  
    
                                          'umsatz'                 => 119,

  		




  
  315
  
    
                                          'locked'                 => undef,

  		




  307
  316
  
    
                                          'waehrung'               => 'EUR'

  		




  308
  317
  
    
                                        },

  		




  309
  318
  
    
                                        {

  		




  ......




  315
  324
  
    
                                          'kost1'                  => undef,

  		




  316
  325
  
    
                                          'kost2'                  => undef,

  		




  317
  326
  
    
                                          'umsatz'                 => 107,

  		




  
  327
  
    
                                          'locked'                 => undef,

  		




  318
  328
  
    
                                          'waehrung'               => 'EUR'

  		




  319
  329
  
    
                                        }

  		




  320
  330
  
    
                                       ], "trans_id datev check purchase_invoice use_pk ok";

  		















  
    (1-1/1)