-
Im Prinzip kannst du den Java-Code doch 1:1 übersetzen.
Die Tabellen kannst du per OCCURS 2-Dimensional und mit VALUE vorbereiten.
Die For-Schleifen ersetzt du analog mit
perform varying I from 2 to 7 by 1
compute ...
end-perform
-
Zur Berechnung der Prüfziffer zu einem 11-stelligen Aktenzeichen (luxemburg. IDKZ) muss ich ein Cobol-Unterprogramm schreiben, welches diese Prüfziffer nach dem "Verhoeff algorithm" errechnet. Leider konnte ich im Internet keinen Cobol Source Code finden. Ich beherrsche weder Java noch Perl, C++,....
1. Wisst ihr jemand, der schon solch ein COBOL-Modul hat bzw. könnt ihr mir irgendwie weiterhelfen bevor ich mich an die mühsame und aufwändige Programmierung mache.
2. Gibt es eine verständliche deutsche Beschreibung zum Verhoeff-Algorithmus?
Herzlichen Dank!
-
Similar Threads
-
By Henry in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 20-02-08, 10:37
-
By Xanas in forum NEWSboard Programmierung
Antworten: 4
Letzter Beitrag: 12-01-07, 07:32
-
By schatte in forum NEWSboard Programmierung
Antworten: 19
Letzter Beitrag: 10-01-07, 11:32
-
By Xanas in forum NEWSboard Programmierung
Antworten: 1
Letzter Beitrag: 13-12-06, 13:38
-
By emax in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 06-10-06, 11:01
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