-
'Ich tippe auf abweichende Parameter Deklarationen in dem Aufrufstack.'
Was heist das ?
der aufruf erfolgt immer über das selbe PGM
--> der selbe parm
der einzige Unterschied (gem. DEBUG alle gleich !!)
ist die Programmebene.
Wie kann ich da etwas abweichend definieren ?
Bitte nochmal helfen
Danke
Robi
Hier ein bischen code
* --- open64 - Access-Modes ---
D O_READONLY S 10I 0 INZ(1)
D O_WRTONLY S 10I 0 INZ(2)
D O_READWRT S 10I 0 INZ(4)
* --- open64 - oflag-values ---
D O_CREATE S 10I 0 INZ(8)
D O_EXCL S 10I 0 INZ(16)
D O_CCSID S 10I 0 INZ(32)
D O_TRUNC S 10I 0 INZ(64)
* --- open64 - status-flags ---
D O_NONBLOCK S 10I 0 INZ(128)
D O_APPEND S 10I 0 INZ(256)
D O_CODEPAGE S 10I 0 INZ(8388608)
D O_TEXTDATA S 10I 0 INZ(16777216)
D O_INHERIT S 10I 0 INZ(134217728)
d xo_pfad s 512 inz
d p1ziel s like(xo_pfad) inz
...
C EVAL X0_PFAD = %TRIM(P1ZIEL) + X'00'
* --- *STMF ÖFFNEN
C EVAL OFLAG = O_READWRT + O_TEXTDATA
C EVAL ERR_ID = IFSOPEN(X0_PFAD : OFLAG )
C IF ERR_ID <=0
C EVAL OFLAG = O_CREATE + O_READWRT + O_TEXTDATA
C EVAL NEWFILE= 'J'
C EVAL ERR_ID = IFSOPEN(X0_PFAD : OFLAG )
C ENDIF
C IF ERR_ID < 0
* fehler
c endif
Similar Threads
-
By schatte in forum NEWSboard Windows
Antworten: 7
Letzter Beitrag: 21-11-06, 11:37
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