X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=scripts%2Fconsole;h=f7b0a0e891c1a089503978065a4350397399271f;hb=75855995cd0b3213b764b2b54fe1d2c18d4b7fde;hp=8ce978346329df8645bc85bd65d879012b211a8f;hpb=841d44c00aae1166a0721e40dc2f9ffb7b9ac5b5;p=kivitendo-erp.git diff --git a/scripts/console b/scripts/console index 8ce978346..f7b0a0e89 100755 --- a/scripts/console +++ b/scripts/console @@ -14,7 +14,6 @@ use Devel::REPL 1.002001; use File::Slurp; use Getopt::Long; use Pod::Usage; -use Term::ReadLine::Perl::Bind; # use sane key binding for rxvt users use SL::LxOfficeConf; SL::LxOfficeConf->read; @@ -160,6 +159,11 @@ Spezielle Kommandos: pp DATA - zeigt die Datenstruktur mit Data::Dumper an. quit - beendet die Konsole + part - shortcuts auf die jeweilige SL::DB::{...}::find_by + customer, vendor, + order, invoice, + chart + EOL # load 'module' - läd das angegebene Modul, d.h. bin/mozilla/module.pl und SL/Module.pm. } @@ -208,6 +212,36 @@ sub sql { } } +sub part { + require SL::DB::Part; + SL::DB::Manager::Part->find_by(@_) +} + +sub order { + require SL::DB::Order; + SL::DB::Manager::Order->find_by(@_) +} + +sub invoice { + require SL::DB::Invoice; + SL::DB::Manager::Invoice->find_by(@_) +} + +sub customer { + require SL::DB::Customer; + SL::DB::Manager::Customer->find_by(@_) +} + +sub vendor { + require SL::DB::Vendor; + SL::DB::Manager::Vendor->find_by(@_) +} + +sub chart { + require SL::DB::Chart; + SL::DB::Manager::Chart->find_by(@_) +} + 1; __END__