Naar inhoud springen

Programmeren in COBOL/Statements/ADD

Uit Wikibooks

Programmeren in COBOL

Inhoudsopgave



  1. IDENTIFICATION DIVISION In ontwikkeling. Revisiedatum: 23 november 2007
  2. ENVIRONMENT DIVISION Nog vrijwel niets. Revisiedatum: 23 november 2007
  3. DATA DIVISION Nog vrijwel niets. Revisiedatum: 23 november 2007
  4. Statements Redelijk ontwikkeld. Revisiedatum: 23 november 2007


ADD is een statement van COBOL. Deze statement dient om de som mee te berekenen. Hier wordt de vorm en de betekenis uitgelegd samen met voorbeelden.

Vorm

[bewerken]

ADD veld/constante...

{TO {veld [ROUNDED]}...} of {[TO] veld GIVING {veld [ROUNDED]...}
[ON SIZE ERROR code]
[NOT ON SIZE ERROR code]

[END-ADD]

[]: geeft aan dat het optioneel is.
{}: geeft aan dat dit één stuk is die samen hoort.
onderstreept: geeft aan dat het verplicht is dit te schrijven. 
Als het tussen [] staat betekent dat je dit minstens moet schrijven,
als je dat deel van de statement wilt gebruiken.
niet-onderstreept: betekent dat je het mag schrijven maar is niet verplicht.
...: Geeft aan dat je nog velden of constanten mag bijschrijven
of stukjes die tussen [] of {} staan herhalen.

Uitleg

[bewerken]

GIVING(optioneel)

[bewerken]

ROUNDED(optioneel)

[bewerken]

Zorgt ervoor dat er wordt afgerond op basis van de wiskundige regel. In COBOL wordt er niet automatisch afgerond. Stel je hebt een veld met een PICTURE van 9999 en je wilt daarin het getal 1234,56 in opslaan. Dan zullen de getallen na de komma gewoon weg vallen zodat er alleen 1234 wordt opgeslagen wordt. Volgens de wiskunde is dit niet correct als je wilt afronden moet je eerst kijken wat er na de komma komt, is dit gelijk of groter dan 5 moet je naar boven afronden is dit kleiner naar beneden. Dus er moet 1235 worden opgeslagen in dat veld. Dit doet ROUNDED voor u.

SIZE ERROR(optioneel)

[bewerken]

Als de uitkomst te groot is om in het veld te worden gekopieerd gebeurt er een SIZE ERROR. Bijvoorbeeld het getal 123 geraakt niet in een veld met een PICTURE van 99. Dit geld echter nie voor komma getalen als je het getal 12.3 erin wilt zetten zal hij geen fout geven. Hierachter kun je code schrijven zoals bijvoorbeeld een fout bericht tonen.

NOT SIZE ERROR(optioneel)

[bewerken]

Doed het omgekeerde van SIZE ERROR.

END-ADD(optioneel)

[bewerken]

Sluit de functie af.

Voorbeelden

[bewerken]

Simpel voorbeeld

[bewerken]

COBOL-code: ADD - simpel voorbeeld

           ADD 1 TO uitkomst

Complex voobeeld

[bewerken]

COBOL-code: ADD - complex voorbeeld

{{{Code}}}

Zie ook

[bewerken]


COBOL statements

ACCEPT | ADD | CALL | CLOSE | COMPUTE | DELETE | DISPLAY | DIVIDE | EVALUATE | IF | INSPECT | MOVE | MULTIPLY | OPEN | PERFORM | READ | REWRITE | START | STOP | STRING | SUBTRACT | UNSTRING | WRITE


 

Informatie afkomstig van https://nl.wikibooks.org Wikibooks NL.
Wikibooks NL is onderdeel van de wikimediafoundation.