X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0f1fb486c8585007607f30b9f9adfe5f4e9df3c3..dda4cde1bf8901c87c6bbd27192f6296af2400ff:/doc/html/ch04.html diff --git a/doc/html/ch04.html b/doc/html/ch04.html index cd3fd0e65..b9e344211 100644 --- a/doc/html/ch04.html +++ b/doc/html/ch04.html @@ -70,87 +70,69 @@ heißt, alles was einem lieb ist (alle Variablen die einem ans Herz gewachsen sind), sollte man vor einem Aufruf (!) von zum Beispiel IS->retrieve_customer() in - Sicherheit bringen.

- Z.B. das vom Benutzer eingestellte Zahlenformat, bevor man Berechnung in einem - bestimmten Format durchführt (SL/Form.pm Zeile 3552, Stand version 2.7beta), um - dies hinterher wieder auf den richtigen Wert zu setzen: -
-            my $saved_numberformat    = $::myconfig{numberformat};
-            $::myconfig{numberformat} = $numberformat;
-            # (...) div Berechnungen
-            $::myconfig{numberformat} = $saved_numberformat;
-          

Das Objekt der Klasse Form hat leider im Moment noch viele - zentrale Funktionen die vom internen Zustand abhängen, deshalb - bitte nie einfach zerstören oder überschreiben (zumindestens nicht kurz - vor einem Release oder in Absprache über bspw. die devel-Liste ;-). - Es geht ziemlich sicher etwas kaputt.

- $::form ist gleichzeitig der Standard Scope - in den Template::Toolkit™ Templates - außerhalb der Controller: der Ausdruck [% var - %] greift auf $::form->{var} zu. - Unter Controllern ist der Standard Scope anders, da lautet der - Zugriff [% FORM.var %]. In Druckvorlagen sind - normale Variablen ebenfall im $::form Scope, d.h. - <%var%> zeigt auf - $::form->{var}. - Nochmal von der anderen Seite erläutert, innerhalb von (Web-)Templates sieht - man häufiger solche Konstrukte: -

-            [%- IF business %]
-            # (... Zeig die Auswahlliste Kunden-/Lieferantentyp an
-            [%- END %]
-         

- Entweder wird hier dann $::form->{business} ausgewertet oder aber der Funktion - $form->parse_html_template wird explizit noch ein zusätzlicher Hash - übergeben, der dann auch in den (Web-)Templates zu Verfügung steht, bspw. so: - $form->parse_html_template("is/form_header", \%TMPL_VAR); - - Innerhalb von Schleifen wird - $::form->{TEMPLATE_ARRAYS}{var}[$index] - bevorzugt, wenn vorhanden.

- Zum Beispiel in SL/DO.pm welche über alle Positionen eines Lieferscheins - in Schleife läuft: -
-            for $i (1 .. $form->{rowcount}) {
-              (...)
-              push @{ $form->{TEMPLATE_ARRAYS}{runningnumber} },   $position;
-              push @{ $form->{TEMPLATE_ARRAYS}{number} },          $form->{"partnumber_$i"};
-              push @{ $form->{TEMPLATE_ARRAYS}{description} },     $form->{"description_$i"};
-         

4.1.3.2. %::myconfig

4.1.3.2. %::myconfig

  • Das einzige Hash unter den globalen Variablen

  • Wird spätestens benötigt wenn auf die Datenbank zugegriffen wird

  • Wird bei jedem Request neu erstellt.

  • Enthält die Userdaten des aktuellen Logins

  • Sollte nicht ohne Filterung irgendwo gedumpt werden oder extern serialisiert werden, weil da auch der Datenbankzugriff für diesen user drinsteht.

  • Enthält unter anderem Listenbegrenzung vclimit, Datumsformat dateformat und Nummernformat numberformat

  • Enthält Datenbankzugriffinformationen

- %::myconfig ist im Moment der Ersatz für - ein Userobjekt. Die meisten Funktionen, die etwas anhand des - aktuellen Users entscheiden müssen, befragen - %::myconfig. - Innerhalb der Anwendungen sind dies überwiegend die Daten, die sich - unter Programm->Einstellungen befinden, bzw. die Informationen über den - Benutzer die über die Administrator-Schnittstelle (admin.pl) eingegeben wurden. -

4.1.3.3. $::locale

  • Objekt der Klasse "Locale"

  • Wird pro Request erstellt

  • Muss auch für Tests und Scripte immer verfügbar + + %::myconfig ist im Moment der Ersatz für ein Userobjekt. Die meisten Funktionen, die etwas anhand des + aktuellen Users entscheiden müssen, befragen %::myconfig. Innerhalb der Anwendungen sind dies überwiegend die + Daten, die sich unter Programm -> Einstellungen befinden, bzw. die Informationen + über den Benutzer die über die Administrator-Schnittstelle (admin.pl) eingegeben wurden. +

4.1.3.3. $::locale

  • Objekt der Klasse "Locale"

  • Wird pro Request erstellt

  • Muss auch für Tests und Scripte immer verfügbar sein.

  • Cached intern über Requestgrenzen hinweg benutzte Locales

Lokalisierung für den aktuellen User. Alle Übersetzungen, - Zahlen- und Datumsformatierungen laufen über dieses Objekt.

4.1.3.4. $::lxdebug

  • Objekt der Klasse "LXDebug"

  • Wird global gecached

  • Muss immer verfügbar sein, in nahezu allen + Zahlen- und Datumsformatierungen laufen über dieses Objekt.

4.1.3.4. $::lxdebug

  • Objekt der Klasse "LXDebug"

  • Wird global gecached

  • Muss immer verfügbar sein, in nahezu allen Funktionen

- $::lxdebug stellt Debuggingfunktionen - bereit, wie "enter_sub" und - "leave_sub", mit denen in den alten Modulen ein - brauchbares Tracing gebaut ist, "log_time", mit - der man die Wallclockzeit seit Requeststart loggen kann, sowie - "message" und "dump" mit - denen man flott Informationen ins Log (tmp/lx-office-debug.log) packen kann.

- Beispielsweise so: -
-            $main::lxdebug->message(0, 'Meine Konfig:' . Dumper (%::myconfig));
-            $main::lxdebug->message(0, 'Wer bin ich? Kunde oder Lieferant:' . $form->{vc});
-
-          

4.1.3.5. $::auth

  • Objekt der Klasse "SL::Auth"

  • Wird global gecached

  • Hat eine permanente DB Verbindung zur Authdatenbank

  • Wird nach jedem Request resettet.

+ + $::lxdebug stellt Debuggingfunktionen bereit, wie "enter_sub" und + "leave_sub", mit denen in den alten Modulen ein brauchbares Tracing gebaut ist, + "log_time", mit der man die Wallclockzeit seit Requeststart loggen kann, sowie + "message" und "dump" mit denen man flott Informationen ins Log + (tmp/lx-office-debug.log) packen kann. +

+ Beispielsweise so: +

$main::lxdebug->message(0, 'Meine Konfig:' . Dumper (%::myconfig));
+$main::lxdebug->message(0, 'Wer bin ich? Kunde oder Lieferant:' . $form->{vc});

4.1.3.5. $::auth

  • Objekt der Klasse "SL::Auth"

  • Wird global gecached

  • Hat eine permanente DB Verbindung zur Authdatenbank

  • Wird nach jedem Request resettet.

$::auth stellt Funktionen bereit um die Rechte des aktuellen Users abzufragen. Obwohl diese Informationen vom aktuellen User abhängen wird das Objekt aus Geschwindigkeitsgründen nur einmal angelegt und dann nach jedem - Request kurz resettet.

4.1.3.6. $::lx_office_conf

  • Objekt der Klasse + Request kurz resettet.

4.1.3.6. $::lx_office_conf

  • Objekt der Klasse "SL::LxOfficeConf"

  • Global gecached

  • Repräsentation der config/lx_office.conf[.default]-Dateien

Globale Konfiguration. Configdateien werden zum Start gelesen und danach nicht mehr angefasst. Es ist derzeit nicht geplant, dass das @@ -159,17 +141,17 @@ file = /tmp/lx-office-debug.log

ist der Key file im Programm als $::lx_office_conf->{debug}{file} erreichbar.

[Warnung]Warnung

Zugriff auf die Konfiguration erfolgt im Moment über - Hashkeys, sind also nicht gegen Tippfehler abgesichert.

4.1.3.7. $::instance_conf

  • Objekt der Klasse + Hashkeys, sind also nicht gegen Tippfehler abgesichert.

4.1.3.7. $::instance_conf

  • Objekt der Klasse "SL::InstanceConfiguration"

  • wird pro Request neu erstellt

Funktioniert wie $::lx_office_conf, speichert aber Daten die von der Instanz abhängig sind. Eine Instanz ist hier eine Mandantendatenbank. Beispielsweise überprüft

$::instance_conf->get_inventory_system eq 'perpetual'

- ob die berüchtigte Bestandsmethode zur Anwendung kommt.

4.1.3.8. $::dispatcher

  • Objekt der Klasse + ob die berüchtigte Bestandsmethode zur Anwendung kommt.

4.1.3.8. $::dispatcher

  • Objekt der Klasse "SL::Dispatcher"

  • wird pro Serverprozess erstellt.

  • enthält Informationen über die technische Verbindung zum Server

Der dritte Punkt ist auch der einzige Grund warum das Objekt global gespeichert wird. Wird vermutlich irgendwann in einem anderen - Objekt untergebracht.

4.1.3.9. $::request

  • Hashref (evtl später Objekt)

  • Wird pro Request neu initialisiert.

  • Keine Unterstruktur garantiert.

+ Objekt untergebracht.

4.1.3.9. $::request

  • Hashref (evtl später Objekt)

  • Wird pro Request neu initialisiert.

  • Keine Unterstruktur garantiert.

$::request ist ein generischer Platz um Daten "für den aktuellen Request" abzulegen. Sollte nicht für action at a distance benutzt werden, sondern um lokales memoizing zu @@ -179,20 +161,20 @@ file = /tmp/lx-office-debug.log

ist der Key file

  • Kommt es vom User, und soll unverändert wieder an den User? Dann $::form, steht da eh schon

  • Sind es Daten aus der Datenbank, die nur bis zum Ende des Requests gebraucht werden? Dann $::request

  • Muss ich von anderen Teilen des Programms lesend drauf zugreifen? Dann $::request, aber Zugriff über - Wrappermethode

4.1.4. Ehemalige globale Variablen

Die folgenden Variablen waren einmal im Programm, und wurden - entfernt.

4.1.4.1. $::cgi

  • war nötig, weil cookie Methoden nicht als + Wrappermethode

4.1.4. Ehemalige globale Variablen

Die folgenden Variablen waren einmal im Programm, und wurden + entfernt.

4.1.4.1. $::cgi

  • war nötig, weil cookie Methoden nicht als Klassenfunktionen funktionieren

  • Aufruf als Klasse erzeugt Dummyobjekt was im Klassennamespace gehalten wird und über Requestgrenzen leaked

  • liegt jetzt unter $::request->{cgi} -

4.1.4.2. $::all_units

  • war nötig, weil einige Funktionen in Schleifen zum Teil +

4.1.4.2. $::all_units

  • war nötig, weil einige Funktionen in Schleifen zum Teil ein paar hundert mal pro Request eine Liste der Einheiten brauchen, und de als Parameter durch einen Riesenstack von Funktionen geschleift werden müssten.

  • Liegt jetzt unter $::request->{cache}{all_units}

  • Wird nur in AM->retrieve_all_units() gesetzt oder - gelesen.

4.1.4.3. %::called_subs

  • wurde benutzt um callsub deep recursions + gelesen.

4.1.4.3. %::called_subs

  • wurde benutzt um callsub deep recursions abzufangen.

  • Wurde entfernt, weil callsub nur einen Bruchteil der möglichen Rekursioenen darstellt, und da nie welche auftreten.

  • komplette recursion protection wurde entfernt.

\ No newline at end of file