-
Wenn du die PI-Variable mit Varying definierst, werden dir ja nur so viele Zeichen übergeben, wie die Quelle lang ist. Du arbeitest ja eben keine 5000 Zeichen durch!
Außerdem musst du folgendes beachten:
Der Aufruf kopiert deine Quelle in ein 5K-Feld und füllt mit Leerzeichen auf.
Die %trim() entfernt die Leerzeichen wieder, %Len() gibt dir die Länge, anschließend verwirfst du das Trim-Ergebnis wieder.
Übergibst du also z.B. " A", gibt deine Routine nur das Leerzeichen zurück.
Also:
Definiere PR/PI mit "varying const" und arbeite ohne Trim die Zeichen ab.
-
 Zitat von Fuerchau
Wenn du die PI-Variable mit Varying definierst, werden dir ja nur so viele Zeichen übergeben, wie die Quelle lang ist. Du arbeitest ja eben keine 5000 Zeichen durch!
Außerdem musst du folgendes beachten:
Der Aufruf kopiert deine Quelle in ein 5K-Feld und füllt mit Leerzeichen auf.
Die %trim() entfernt die Leerzeichen wieder, %Len() gibt dir die Länge, anschließend verwirfst du das Trim-Ergebnis wieder.
Übergibst du also z.B. " A", gibt deine Routine nur das Leerzeichen zurück.
Also:
Definiere PR/PI mit "varying const" und arbeite ohne Trim die Zeichen ab.
@1: Nur wenn ein Parameter im Prototyp/Procedure Interface mit VALUE definiert ist, werden Zeichen überbeben.
Sofern der Parameter by Reference übergeben wird (mit Schlüssel-Wort const oder ohne wie in dem Beispiel) wird nur die Adresse des Parameter-Feldes übergeben unabhängig davon, ob es mit fixer oder variabler Länge definiert wurde.
Die Angabe CONST bewirkt lediglich, dass bei abweichender Parameter-Definition ein zusätzliches Feld mit der erwarteten Parameter-Definition (bei UCS2(5000) sind das 10000 Byte und bei VarUCS2(100002) Byte erstellt wird und dann die Adresse dieses Hilfsfeldes an die rufende Prozedur übergeben wird.
Bei Feldern mit variabler Länge sollte man nicht nur CONST, sondern auch OPTIONS(*TRIM) angeben, damit führende und folgende Blanks gleich abgetrimmt werden.
Die Daten-Länge wird in den beiden führenden Bytes hinterlegt und beim Verarbeiten von Feldern mit variabler Länge geprüft.
Birgitta
-
Const und Value sind quasi gleicharbeitend mit dem Unterschied das Const nicht geändert werden darf.
In beiden Fällen wird ein Variable (bereits im Compiler generiert) vor der Übergabe gefüllt.
Options(*trim) ist ganz nett sollte aber nicht grundsätzlich verwendet werden:
a) zusätzliche Laufzeit (@D*B: ja im Nanobereich)
b) kommt halt auf die Anwendung an
Leerzeichen (vor allem am Anfang) sind schon manchmal erforderlich.
Was die Performance angeht so sollte die Runtime so intelligent sein nur die benötigte Länge zu übertragen und nicht immer mit Leerzeichen auffüllen.
Aber das bleibt auszuprobieren.
-
Baldur,
Lies doch mal die Dokumentation!
Es gibt sehr wohl einen Unterschied zwischen CONST und VALUE!
Parameter, die mit CONST übergeben wurden dürfen deshalb nicht geändert werden, weil nie sicher ist, ob der übergebene Pointer auf das Original-Feld oder das Duplikat zeigt.
Sofern keine abweichende Parameter-Defintion festgestellt wird, wird der Pointer auf das Original-Feld übergeben.
Bei VALUE wird IMMER eine Kopie des Original-Feldes erzeugt und dieses an die aufgerufene Prozedur übergeben.
Es wird immer die maximale Länge reserviert, das heißt jedoch nicht, dass diese komplett übergeben oder mit Blanks aufgefüllt wird.
Wie gesagt, die Übergabe erfolgt nur bei VALUE und dann die komplette Länge, was sich bei großen Feldern negativ auf die Performance auswirken kann.
Das bedeutet jedoch nicht, dass der reservierte Speicher mit *Blanks aufgefüllt wird.
Bei Feldern mit variabler Länge, wird die Länge aus den führenden Bytes ermittelt, ob und was im Anschluss daran steht ist irrelevant und wird auch in keiner Form initialisiert.
Ob man Options(*TRIM) verwendet oder nicht kommt auf die Anwendung an. In diesem Fall würde ich die Option setzen, aber nicht kategorisch ablehenen.
Birgitta
-
Ich fasse mal zusammen: :-D
- $string ucs2(5000) options(*trim);
- Wird schon vom RDP nicht zugelassen:
- RNF3379E: OPTONS(*TRIM) ist für den Parameter ungültig.
- $string ucs2(5000) options(*trim) const;
- Geht zwar, aber der Parameter wird als Konstante übergeben, d.h. ich kann den geänderten Wert nicht zurück geben. Hilft mir also nicht.
- $string ucs2(5000) options(*varsize);
- Die Länge der Variablen in der Funktion ist bei 5000 - es wird also das gesamte Feld übergeben. Bringt also nix.
- $string varchar(5000);
- $string varchar(5000) options(*varsize);
- Compilerfehler:
- RNF7535: Art und Attribut stimmen nicht mit dem Prototyp überein.
Ergo: ich lasse es so, wie es ist, denn so funktioniert es :-)
Similar Threads
-
By Robi in forum NEWSboard Programmierung
Antworten: 4
Letzter Beitrag: 07-01-16, 08:40
-
By ILEMax in forum NEWSboard Programmierung
Antworten: 6
Letzter Beitrag: 11-01-14, 10:32
-
By heynem in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 20-03-03, 10:15
-
By LaLeLi in forum IBM i Hauptforum
Antworten: 2
Letzter Beitrag: 19-06-02, 09:38
-
By AS-Trade in forum NEWSboard Server & Hardware Markt
Antworten: 0
Letzter Beitrag: 08-09-01, 13:29
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks