Die ADD-Anweisung

Die ADD-Anweisung kann in zwei verschiedenen Varianten erscheinen:

Fall 1:
ADD Zahl1 Zahl2 TO Zahl3
Wenn Zahl1=10, Zahl2=20 und Zahl3=40 sind, dann hat Zahl3 nach dieser ADD-Anweisung den Wert 70.
Grund: [10(Zahl1)+20(Zahl2)+40(Zahl3)=70]
"Die Summe aller Operanden, die vor dem Wort TO angegeben sind, wird jeweils zu dem Wert aller Operanden, die dem Wort TO folgen, hinzuaddiert." (Raouf Habib; COBOL/2 Workbench; IWT-Verlag München 1992)

Fall 2:
ADD Zahl1 Zahl2 GIVING Zahl3
Wenn auch hier wieder Zahl1=10 und Zahl2=20 sind, dann hat Zahl3 nach dieser ADD-Anweisung den Wert 30.
Grund: [10(Zahl1)+20(Zahl2)=30(Zahl3)]
"Die Summe aller Operanden, die vor dem Wort GIVING angegeben sind, wird gebildet und in die Operanden, die nach dem Wort GIVING angegeben sind, übertragen." (Raouf Habib; COBOL/2 Workbench; IWT-Verlag München 1992)

...