-
open : Fehlercode 0P
Salü.
Beim Open erhalte ich den Fehlercode 0P.
Ursache:
The file has been opened successfully, but it contains null-capable fields and the ASSIGN clause does not specify ALWNULL and device-type DATABASE.
Die Datei erfolgreich geöffnet wurde, aber es null-fähige Felder enthält und der ASSIGN-Klausel nicht ALWNULL und Gerätetyp -Datenbank angeben.
Wie muss die Datei in der ASSIGN Klausel beschrieben werden?
Für Ratschläge bin ich sehr dankbar
Gruss
Walter Becker
walter.becker@me.com
-
Beim Befehl CRTBNDRPG kannst du den Parameter ALWNULL(*USRCTL) angeben.
-
Da würde ich dir mal das COBOL-Handbuch empfehlen.
ASSIGN TO MYFILE-ALWNULL
-
Nachtrag:
DATABASE-MYFILE-ALWNULL
Bei allen READ-WRITE's muss dann mit "NULL-MAP IS MYNULLFIELDS" ergänzt werden.
Beispiel:
FILE-CONTROL.
SELECT FILE-1 ASSIGN to DATABASE-FILE1-ALWNULL
ACCESS is DYNAMIC RECORD KEY IS FULL-PRODUCT-CODE IN FILE-1
ORGANIZATION IS INDEXED.
START Statement
Chapter 14. Part 6. Procedure Division
481
FD FILE-1.
01 FULL-PRODUCT-CODE.
05 TYPE-CODE PIC X(2).
05 COLOR-CODE PIC X(2).
05 LOCATION-CODE PIC X(2).
WORKING-STORAGE SECTION.
01 FILE1-N.
05 FULL-PRODUCT-CODE-NKM.
06 FILLER PIC X VALUE ZERO.
06 COLOR-CODE-NF PIC 1 VALUE B"0".
06 LOCATION-CODE-NF PIC 1 VALUE B"0".
Fields 2 and 3 are null-capable, where ’-’ indicates null, and xx indicates any value.
The following are representations of the records in the file:
NN----
NN--xx
NNxx--
Consider the following START statement:
START FILE-1
NULL-KEY-MAP IS FULL-PRODUCT-CODE-NKM
INVALID KEY DISPLAY "No data in system for product code " TYPE-CODE
GO TO ERROR-ROUTINE
END-START.
If the null-key-map in the START statement has a value of
010, the pointer is set to
point to the record with the key
NN--xx. If the null-key-map in the START
statement has a value of
011, the pointer is set to point to the record with the key
NN----
.
For more information about using null-capable fields, refer to the
IBM Rational
Development Studio for i: ILE COBOL Programmer’s Guide
.
End of IBM Extension
-
Nachtrag 2:
Mit der COPY-Anweisung kann man sich auch die NULL-MAP oder NULL-KEY-MAP generieren lassen.
-
Salü.
vielen Dank für Deine umfassende Information.
Am Montag bin ich wieder im Büro und teste die Programmanpassung.
Mit den besten Grüssen aus der Schweiz.
Walter Becker
Similar Threads
-
By fredywit in forum IBM i Hauptforum
Antworten: 5
Letzter Beitrag: 19-08-15, 13:07
-
By David-Developer in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 30-04-15, 13:18
-
By Isabella Pridat-Zapp in forum Archiv NEWSboard Events
Antworten: 1
Letzter Beitrag: 20-04-15, 12:54
-
By Burgy Zapp in forum Archiv NEWSblibs
Antworten: 0
Letzter Beitrag: 06-03-02, 13:40
-
By Alexander in forum NEWSboard Server Software
Antworten: 0
Letzter Beitrag: 15-11-01, 07:00
Tags for this Thread
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