Categoria
Articoli tecnici organizzati per gruppo funzionale.
Calcolare 'COMPUTE res = (-4) ** 0.5' in COBOL genera un errore di dominio matematico perché la radice quadrata di un numero negativo non è definita nell'aritmetica reale.
Eseguire un'istruzione DIVIDE o COMPUTE con denominatore pari a zero in assenza della clausola protettiva 'ON SIZE ERROR' genera l'abend fatale di sistema S0CB con interruzione immediata del batch.
L'istruzione storica 'ACCEPT ws-date FROM DATE' restituisce la data nel formato a 6 cifre 'AAMMGG' con anno a sole 2 cifre; per gestire date a 4 cifre è obbligatorio usare 'ACCEPT ws-date FROM DATE YYYYMMDD'.
L'istruzione 'ALTER paragraph-name TO PROCEED TO new-paragraph' modifica dinamicamente a runtime la destinazione di un GO TO; considerata pessima pratica da decenni e rimossa dagli standard COBOL moderni.
L'impostazione di variabili di ambiente di sistema tramite la sequenza 'DISPLAY "VAL" UPON ENVIRONMENT-VALUE' fallisce se la variabile non è stata preventivamente definita o se il nome supera i limiti del runtime.
L'istruzione decisionale EVALUATE con criteri paralleli ('EVALUATE var1 ALSO var2') richiede che ogni clausola 'WHEN subj1 ALSO subj2' abbia esattamente lo stesso numero di soggetti.
L'istruzione 'EXIT PERFORM CYCLE' (equivalente al continue dei linguaggi moderni) è valida unicamente all'interno di un blocco di ciclo 'PERFORM ... END-PERFORM' inline.
Se la variabile dell'istruzione 'GO TO p1 p2 p3 DEPENDING ON idx' vale zero o un numero maggiore delle etichette elencate, il salto non avviene e il controllo passa semplicemente alla riga successiva.