[BACK]Return to pta.pl CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / pta

Diff for /pta/pta.pl between version 1.1 and 1.3

version 1.1, 2020/09/27 14:35:34 version 1.3, 2020/10/18 23:47:35
Line 507  for my $cc (sort keys %cclist) {
Line 507  for my $cc (sort keys %cclist) {
   
         # --- Cost center profits and losses. --------------------------          # --- Cost center profits and losses. --------------------------
   
         if ($opt_p) {          if ($opt_p && $profit{$cc}) {
                 printf "\n%s [%s] %s\n", (translate 'Cost center'), $cc,                  printf "\n%s [%s] %s\n", (translate 'Cost center'), $cc,
                     (translate 'Profits and losses');                      (translate 'Profits and losses');
                 my $pr = 0;                  my $pr = 0;
Line 554  for my $cc (sort keys %cclist) {
Line 554  for my $cc (sort keys %cclist) {
   
 # --- Global list of profits and losses. -------------------------------  # --- Global list of profits and losses. -------------------------------
   
 if ($opt_p) {  if ($opt_p && %ptot) {
         my $pr = 0;          my $pr = 0;
         my $capital = 0;          my $capital = 0;
         my $maxd = 0;          my $maxd = 0;
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.3
CVSweb