Verwendung von WRKSPLF, WRKOUTQ in VARPG

[ubas]

Hallo nochmal,

also mit den API's hat es bisher gut geklappt, zumal es ja auch super Musterroutinen der IBM gibt. Ich habe für das Holen der Spooldateiinformationen das API QUSLSPL verwendet. Es läuft auf der AS/400 super nur leider unter VARPG leider nicht. Hier bricht das Programm ab und ich bekomme in der Log-File FVDCERR.LOG folgenden Eintrag:
DRU01V2.EXE Mon Jun 7 08:57:53 2010 ** Error logging begins **
DRU01V2.EXE Mon Jun 7 08:57:53 2010 Environment variable not found
DRU01V2.EXE Mon Jun 7 08:57:55 2010 CPF3C18 Zeigerparameter nicht auf einer 16-Byte-Grenze.

Es scheint Problem mit einem Pointer zu geben. Diese sind in den D-Bestimmungen zu finden
DLSTPTR S *
DLSTPTR2 S *
DSPCPTR S *
Einer der Pointer wird als Parameter bei einem CALL mitgegeben.
C*
C* Get a resolved pointer to the User Space for performance
C*
C CALL 'QUSPTRUS'
C PARM SPC_NAME
C PARM SPCPTR
C PARM QUSEC
C*
Mir ist aufgefallen, das der Pointer in der Umwandlungsliste des ILE eine Größe von 16 hat und in der Umwandlungsliste des VARPG nur eine Größe von 4 hat.
Wie bekomme ich dieses Problem in den Griff?

[ubas]

Ich nochmal,

hatte vergessen mitzuteilen, dass im VARPG bei Verwendung eines Poiters als Parameter schon folgende Meldung kommt
C CALL CallName
RNV7810E Der Parameter SPCPTR darf keinen Zeiger enthalten; die Bestimmung für die Operation CALL wird ignoriert.

Habe dann versucht eine ganz normale 16Byte große Variable zu verwenden und bekam dann den vorhin schon genannten Fehler bei der Ausführung des Programms

[mk]

Hallo,

ich würde die Verarbeitung rein im RPG Programm auf dem
System machen. Nicht im VARPG direkt.

Also nach dem Motto:

1. Aufruf des Serverprogramms vom Client
2. Verarbeitung des Serverprogramms
3. Ergebnis auf dem Client verarbeiten

Wenn man das Serverprogramm dann noch so intelligent schreibt das z.B. XML, JSON oder Text als Ergebnis
verwendet werden kann, dann könnte die gleiche
Anwendung auch mit anderen Frontends laufen

Gruß
Michael

[BenderD]

... falls dein Pointer in einer Datenstruktur deklariert ist, datastructures are binary huddle, muss diese zumindest mit Schlüsselwort ALIGN deklariert werden. Es sieht mir aber so aus, als ob da nochmehr schräg ist, die fehlende Environment Variable, fraglich ist auch, ob und wie der Informationsfluss des Pointers ist...

D*B

Ich nochmal,

hatte vergessen mitzuteilen, dass im VARPG bei Verwendung eines Poiters als Parameter schon folgende Meldung kommt
C CALL CallName
RNV7810E Der Parameter SPCPTR darf keinen Zeiger enthalten; die Bestimmung für die Operation CALL wird ignoriert.

Habe dann versucht eine ganz normale 16Byte große Variable zu verwenden und bekam dann den vorhin schon genannten Fehler bei der Ausführung des Programms

[Pikachu]

Wenn das Programm nicht auf der Maschine selbst läuft, ist es vielleicht nicht möglich, mit Zeigern auf Speicherbereiche der Maschine zu arbeiten.

[Fuerchau]

Genau dies ist das Problem.
VARPG generiert eine .exe, die auf Windows läuft. Da kannst du nicht per Pointer direkt mit dem Speicher der AS/400 arbeiten.

Entweder, du schreibst Service-Programme für deine Zugriffe oder verwendest ausschließlich API's, die keine Pointer benötigen.

[ubas]

Das ist auch meine Vermutung, da die Umwandlungsliste des VARPG einen 4stelligen und die Umwandlungsliste des RPG auf der AS/400 einen 16stelligen Pointer bei selber Codierung ausgibt. Werde jetzt API auf der AS nutzen und die Ausgabe in eine Datei bringen und die dann einlesen. Hoffe das die Performence nicht drunter leidet. Sonst leide ich

[Pikachu]

Hol die Daten doch mit QUSRTVUS aus dem Benutzerbereich heraus.