COBOL: Unterschied zwischen den Versionen
Prozzi (Diskussion | Beiträge) (Beispiele ergänzt) |
Phorgo (Diskussion | Beiträge) K (+ syntaxhighlight-Tags) |
||
Zeile 16: | Zeile 16: | ||
Wie immer, wenn sich Manager in technische Details einmischen, wurden auch beim Design von COBOL entscheidende Fehler gemacht. So wurde statt einer platzsparenden Schreibweise, etwa (wie in anderen Programmiersprachen) | Wie immer, wenn sich Manager in technische Details einmischen, wurden auch beim Design von COBOL entscheidende Fehler gemacht. So wurde statt einer platzsparenden Schreibweise, etwa (wie in anderen Programmiersprachen) | ||
− | < | + | <syntaxhighlight lang="text">SUMME = ANZAHL * PREIS</syntaxhighlight> |
eine umständlich ausformulierte Syntax definiert: | eine umständlich ausformulierte Syntax definiert: | ||
− | < | + | <syntaxhighlight lang="cobol">MULTIPLY ANZAHL BY PREIS GIVING SUMME</syntaxhighlight> |
Dadurch war die geringe Speicherkapazität früherer Computer schon nach wenigen Befehlen erschöpft. Wichtige Programme wie das hier dargestellte '''Moneymaker XP''' waren deshalb in der Praxis nicht lauffähig: | Dadurch war die geringe Speicherkapazität früherer Computer schon nach wenigen Befehlen erschöpft. Wichtige Programme wie das hier dargestellte '''Moneymaker XP''' waren deshalb in der Praxis nicht lauffähig: | ||
− | < | + | <syntaxhighlight lang="cobol"> |
$ SET SOURCEFORMAT"FREE" | $ SET SOURCEFORMAT"FREE" | ||
IDENTIFICATION DIVISION. | IDENTIFICATION DIVISION. | ||
Zeile 48: | Zeile 48: | ||
END-PERFORM. | END-PERFORM. | ||
STOP RUN. | STOP RUN. | ||
− | </ | + | </syntaxhighlight> |
Mit der Zeit geriet COBOL in Vergessenheit. Die Nachfolgeprodukte COBOLD und PUMUCOL konnten sich nicht durchsetzen. | Mit der Zeit geriet COBOL in Vergessenheit. Die Nachfolgeprodukte COBOLD und PUMUCOL konnten sich nicht durchsetzen. | ||
− | |||
[[Kategorie:Verbrechen & Kriminelles]] | [[Kategorie:Verbrechen & Kriminelles]] | ||
[[Kategorie:Dinge, die die Welt nicht braucht]] | [[Kategorie:Dinge, die die Welt nicht braucht]] | ||
[[Kategorie:Computer]] | [[Kategorie:Computer]] |
Version vom 3. Juni 2013, 21:41 Uhr
COBOL ist eine Programmiersprache; das Akronym steht hierbei für Common Business Oriented Language. Dies bedeutet, COBOL ist besonders für die üblichen Geschäfte geeignet. Damit die Sprache sich besonders gut für diesen Einsatz eignet, bringt die Standardbibliothek folgende Funktionen mit:
- Steuerhinterziehung
- Industriespionage
- Insiderhandel
- Betrug
- Veruntreuung
- Geldwäsche
- Falschbilanzierung
- Outsourcing
COBOL wurde ursprünglich im späten Mittelalter von Ackermann entwickelt, damit er die Massenentlassungen und Steuerhinterziehungen automatisieren konnte. Schnell entwickelte die Software eine gewisse Beliebtheit unter Managern und BWL-Studenten.
Wie immer, wenn sich Manager in technische Details einmischen, wurden auch beim Design von COBOL entscheidende Fehler gemacht. So wurde statt einer platzsparenden Schreibweise, etwa (wie in anderen Programmiersprachen)
SUMME = ANZAHL * PREIS
eine umständlich ausformulierte Syntax definiert:
MULTIPLY ANZAHL BY PREIS GIVING SUMME
Dadurch war die geringe Speicherkapazität früherer Computer schon nach wenigen Befehlen erschöpft. Wichtige Programme wie das hier dargestellte Moneymaker XP waren deshalb in der Praxis nicht lauffähig:
$ SET SOURCEFORMAT"FREE"
IDENTIFICATION DIVISION.
PROGRAM-ID. Moneymaker.
AUTHOR. Joe Ackerman.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 Opfer PIC 9 VALUE ZEROS.
01 Betrag PIC 9 VALUE ZEROS.
01 Betrug PIC 99 VALUE ZEROS.
01 Konto PIC X VALUE SPACE.
PROCEDURE DIVISION.
Calculator.
PERFORM 1000 TIMES
SELECT Opfer FROM Bevoelkerung
DEFINE Betrag AS Grossezahl
MULTIPLY Betrag BY 100000 GIVING Betrug
ACCEPT Kreditkarte
MOVE Betrug FROM Opfer TO Konto
ADD Zinsen1, Zinsen2 GIVING Gewinn
END-PERFORM.
STOP RUN.
Mit der Zeit geriet COBOL in Vergessenheit. Die Nachfolgeprodukte COBOLD und PUMUCOL konnten sich nicht durchsetzen.