Tips und Techniken für die AS/400

  Der 9. Teil der jährlichen Tips und Techniken jetzt online:
Sonstige Tips

Blitz Links:
  Zeitersparnis durch Auslagerung von Informationen
  Schließen Sie eine Anfangsposition in den SEU-Scanvorgang ein
  Festlegung bedingter Teststops in ISDB

Sonstige Tips

  Zeitersparnis durch Auslagerung von Informationen
Speichern Sie alle Informationen, die sich ändern, außerhalb des Programms. Beispiel: Das Unternehmen, in dem Sie arbeiten, fusioniert, und alle Berichte müssen geändert werden, um den neuen Namen des Unternehmens zu verwenden. Wenn Sie die neuen Informationen in einer Datei oder einem Datenbereich speichern und dann eine Standardisierung für diese Datei oder den Bereich vornehmen, erscheint der neue Name beim Startvorgang in allen Programmen. Die Änderung dauert in diesem Falle statt der befürchteten Stunden, Tage oder Wochen nur einige Sekunden.

Schließen Sie eine Anfangsposition in den SEU-Scanvorgang ein
Sie können beim SEU eine Startposition einschließen. In RPG III können Sie beispielsweise die folgende Zeile eingeben, um den Start der Unterroutine SUB01 zu finden:

F	SUBØ1	18

18 ist die Spalte für das erste Zeichen von Faktor 1. (Normalerweise verwendet man Faktor 1, um nach dem Beginn einer Subroutine zu suchen. Sie können jedoch nach jeder beliebigen Position scannen.) Geben Sie folgendes ein, wenn Sie feststellen möchten, wo eine Variable in den C-Spezifikationen geändert wird:

F	VARØ1		43 F

Dadurch wird das erste Vorkommen von Variable VARO1 in Faktor 3 der C-Spezifikationen ermittelt. (Normalerweise verwendet man Faktor 3, um nach den Feldänderungen zu suchen.) Das F am Ende der Zeile steht für First (Erste). Sie können statt dessen jedoch auch P (Previous/Vorherige) oder L (Last/Letzte) verwenden. Für RPG IV-Programme gibt es ein ähnliches Verfahren. Der Ausgangspunkt ist dabei ein anderer, aber das Prinzip ist das gleiche.

Festlegung bedingter Teststops in ISDB
Im ISDB (Interaktive Source Debugger) von V3R1 und V3R2 können Sie mit folgender Syntax bedingte Trennstops festlegen:

break	1234ØØ when a = 1

Diese Syntax setzt einen Teststop in Zeile 1234.00, damit das Programm nur dann stoppt, wenn die Programmvariable „a" zum Zeitpunkt des Teststops während der Programmausführung 1 ist. Achten Sie darauf, daß Sie ein Leerzeichen vor und nach dem Gleichheitszeichen eingeben. Sie können auch andere Tests verwenden, z.B. größer als () oder kleiner als ().
Mit dieser Methode können Sie auch bedingte Teststops während der Quellcode-Testhilfesitzung für ILE-Programme mit dem Befehl STRDGB (Testhilfe starten) festlegen. Wenn Sie STRDBG verwenden, um ein Debugging auf Anweisungsebene durchzuführen, können Sie die bedingten Teststops setzen, indem Sie den Parameter BKPCOND im Befehl ADDBKP (Teststop hinzufügen) verwenden. In diesem Fall müssen Sie nicht auf die Eingabe von Leerzeichen zwischen den Variablen und dem Vergleich warten, da es sich bei der Syntax um eine gemischte Liste und nicht um ein freies Format handelt.

 

---

Dieser neunte Teil war der vorerst letzte Teil der Tips & Techniken – Reihe.
Mit freundlichen Grüßen

Ihr Burgy Zapp