-
Cobol und IFS
Kölle Alaaf.
Kann das sein das ich in Cobol auf der AS/400 nur mit den IFS Api's arbeiten kann?
http://archive.midrange.com/cobol400.../msg00035.html
Und nein ich möchte kein cpystmf aus der Datenbank-Datei machen ich finde das irgendwie als Bruch im Aufruf.
GG
-
Womit willst Du denn sonst arbeiten?
-
Naja, andere Cobol-Compiler auf anderen System bieten da die Möglichkeit Textdateien direkt zu erstellen.
z.B. Realia Cobol.
So finde ich es schon doof.
.GG
-
Wenn du als "andere Systeme" z.B. Linux/Unix/Windows nimmst, so ist hier das File-IO eben für dieses primäre Dateisystem gemacht. Für sog. Indexed-Dateien wird dann ISAM verwendet.
Auf der AS/400 hast du das komplexe Dateisystem mittels Lib/PF/LF als primäres Dateisystem wofür hier COBOL entwickelt wurde. Das IFS ist nur ein sekundäres Filesystem und halt nur per API erreichbar.
Andere COBOL-Derivate unterstützen dafür dann z.B. kein SQL um mit Datenbanken zu kommunizieren und benötigen dafür dann API's oder bieten nur SQL für Microsoft SQL-Server an was schon eine Einschränkung ist.
-
Hallo *all,
ich habe da mal eine Verständnisfrage:
Ich habe mir das Programm archive.midrange.com/cobol400-l/200403/msg00035.html von der Webseite geholt und meinen Vorstellungen angepasst. Was ich nicht verstehe ist warum er unbedingt die Linkage Section braucht.
01 ITEM-COUNT PIC S9(9) BINARY.
LINKAGE SECTION.
77 ERRNO PIC S9(9) BINARY.
77 ERRMSG PIC X(1024).
PROCEDURE DIVISION.
Wieso kann ich das nicht in die Working Storage Section schreiben. Wenn ich das mache, meckert der Compiler.
GG
-
Variablen in der Linkage haben keine Adresse, außer beim Aufruf von extern.
Dies kann man nutzen um die Adresse selber zu setzen:
CALL PROCEDURE '__errno'
RETURNING ERRNO-PTR
SET ADDRESS OF ERRNO TO ERRNO-PTR
Deine Variable ERRMSG gehört da aber eher in die Working-Storage.
-
Tja das ist ja auch eigentlich mein Kenntnisstand.
Aber wenn ich das Teil aus der Linkage in die Workin verschubs bekomme ich beim Wandeln.
* 76 ID: LNC2728 BEW.STUFE 30 FOLGENR. 007927
Nachricht . . . : 'ERRNO' muß im Kapitel Programmverbindungen ein
Datenelement ohne Referenzänderung sein, dessen Stufennummer 01 ode
77 ist.
Tja, ich frage mich ja nur woher man so etwas weiß......
GG
BTW. Das nächste Treffen zum AWk mit Thema Cobol & SQL findet in Bad Neuenahr statt.
-
Zitat von KingofKning
BTW. Das nächste Treffen zum AWk mit Thema Cobol & SQL findet in Bad Neuenahr statt.
Vortragsthema ist:
"Embedded SQL" und ich werde mich bemühen die Interessen der COBOLista und der RPGler unter einen Hut zu bekommen.
Dieter Bender
-
Ich kann die Adresse einer Variablen in der Working-Storage nicht ändern!
Dafür sind adresslose Variablen (eben auf 01 oder 77) in der Linkage Section erforderlich.
Verschiebe die ERRNO in Working-Storage, aber lass dann das "SET ADDRESS OF ERRNO" weg. Die Variable hat dann eine Adresse.
Allerdings ist dann der Effekt weg, auf die externe ERRNO zuzugreifen da du dann eine eigene Variable hast.
-
Das Wissen dazu steht im COBOL-Handbuch.
-
Das ich mir den Schinken das letzte mal komplett durchgelesen habe ist wohl auch schon länger her, und damals konnte ich wohl mit den Konstrukten nichts anfangen und habe das Wissen in die Ablage rund und grün verschoben....GG
-
Ich hoffe, dass Ärzte anders unterwegs sind.
Similar Threads
-
By Andreas Herzfeldt in forum IBM i Hauptforum
Antworten: 9
Letzter Beitrag: 18-02-05, 12:11
-
By infomio in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 03-04-03, 12:58
-
By kaym in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 23-01-03, 17:54
-
By Claudia Lange in forum IBM i Hauptforum
Antworten: 4
Letzter Beitrag: 23-07-02, 11:32
-
By kaym in forum IBM i Hauptforum
Antworten: 5
Letzter Beitrag: 07-07-02, 13:49
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