proggen.org user:naums:cobol
https://www.proggen.org/
2026-05-03T04:21:57+0200
proggen.org
https://www.proggen.org/
https://www.proggen.org/lib/tpl/proggenX/images/favicon.ico
-
text/html
2022-09-22T19:58:56+0200
Anonymous (anonymous@undisclosed.example.com)
COBOL: Fakultät
https://www.proggen.org/doku.php?id=user:naums:cobol:fak&rev=1663869536
COBOL: Fakultät
Programm zur Fakultätsberechnung in COBOL. Es wird das FIXED-Format verwendet.
Programmcode
IDENTIFICATION DIVISION.
***************************
PROGRAM-ID. FAKULT.
* AUTHOR: Stefan Naumann
* DATA: 27.09.2015
ENVIRONMENT DIVISION.
************************
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-PC.
OBJECT-COMPUTER. IBM-PC.
DATA DIVISION.
*****************
WORKING-STORAGE SECT…
-
text/html
2022-09-22T19:58:56+0200
Anonymous (anonymous@undisclosed.example.com)
Arbeitsstundenprogramm (Testprogramm für Dateien öffnen und lesen, etc)
https://www.proggen.org/doku.php?id=user:naums:cobol:workinghours&rev=1663869536
Arbeitsstundenprogramm (Testprogramm für Dateien öffnen und lesen, etc)
Programmcode
IDENTIFICATION DIVISION.
PROGRAM-ID. arbeitsstunden.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-PC.
OBJECT-COMPUTER. IBM-PC.
INPUT-OUTPUT SECTION.
file-control.
select stunden
assign to "arbeitstunden.dat"
organization is line sequential.
select stunden-out
assign to "arbeit.out"
organization is line sequential.
DATA DIVISION.
file section.
fd stunden.
01 st…