Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 58b14f96

Von Stephan Köhler vor fast 19 Jahren hinzugefügt

  • ID 58b14f96d6a7aab3bad2ffac3f8930793cf15a09
  • Vorgänger 7933b6bd
  • Nachfolger 5b9f9bd6

Preisgruppen Kommentar entfernt, nach Perltidy formatiert

Unterschiede anzeigen:

SL/PE.pm
332 332
	        WHERE $where
333 333
		ORDER BY $sortorder|;
334 334
  }
335
print STDERR "asdfasdf-$query\n";
336 335

  
337 336
  $sth = $dbh->prepare($query);
338 337
  $sth->execute || $form->dberror($query);
......
385 384
#
386 385
sub get_pricegroup {
387 386
  $main::lxdebug->enter_sub();
388
print STDERR "PE.pm-get_pricegroup\n";
387

  
389 388
  my ($self, $myconfig, $form) = @_;
390 389

  
391 390
  # connect to database
......
416 415
  $sth->finish;
417 416

  
418 417
  $dbh->disconnect;
419
#print (STDERR "   ", Dumper($form));
418

  
420 419
  $main::lxdebug->leave_sub();
421 420
}
422 421

  

Auch abrufbar als: Unified diff