-
cobol und display-files
Hallo,
mache seit langem mal wieder COBOL und hab ein Problem.
Ein Screen wird aus mehreren Formaten aufgebaut jeweils ein write für KOPF, Nutzdaten, Fuss
gibt es eine Möglichkeit alle Formate mit "einem" Read einzulesen?
Bin für jeden Tipp dankbar
Klaus
Programmierung
-
Definitiv Nein.
Wenn mehrere Eingabeformate aktiv sind, schafft man das auch nur, meine ich, mit Invite.
Bei einem Read File ohne Format wird im IO-Feedback (ich meine über Special Names definiert) dann der Formatname geliefert, der Daten erfasst hat.
Hat man 2 aktive Formate, gibt in beiden Formaten etwas ein und drückt Enter, löst der Read mit dem ersten Format aus, man kann verarbeiten, der nächste Read löst dann auch sofort aus mit dem nächsten Format. Sollte allerdings nur in einem Format was erfasst sein, hält der nächste Read dann wieder an.
Man kann sich also nie sicher sein, dass auch wirklich in beide Formate etwas eingegeben wurde.
Zumal der nächste Write das noch nicht abgefragte Eingabeformat nicht überschreiben darf, sont ist ja alles weg.
Aus Handlingsgründen ist dies also überhaupt nicht empfehlenswert.
Ich persönlich sehe da auch eigentlich überhaupt keinen Bedarf.
Man könnte noch eine Alternative machen, bei der ja auch 2 Formate aktiv sein können:
Eine SFL kann auch nur 1 Satz groß sein (also nicht blätterbar) und über mehrere Zeilen gehen.
Somit hat man auch hier 2 Formate aktiv.
1. das SFLCTL-Format
2. das SFL-Format
Das 1. liest man mit Read mit Pause, das 2. liest man mit Read Subfile ohne Pause.
Und wie läuft das COBOL-Projekt sonst so?
Ich dachte, du meldest dich einfach mal und berichtest;-).
Similar Threads
-
By Peter P in forum NEWSboard Programmierung
Antworten: 5
Letzter Beitrag: 27-04-16, 15:17
-
By tarkusch in forum NEWSboard Programmierung
Antworten: 4
Letzter Beitrag: 11-12-13, 08:44
-
By Brownie in forum IBM i Hauptforum
Antworten: 6
Letzter Beitrag: 30-10-02, 09:05
-
By Timmo in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 22-06-01, 09:30
-
By chr in forum IBM i Hauptforum
Antworten: 6
Letzter Beitrag: 12-02-01, 15:55
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