cobol
CONTINUA la dichiarazione
Ricerca…
Osservazioni
L'istruzione CONTINUE fa proseguire il flusso di controllo alla successiva istruzione. Non proprio un no-op, in quanto può influenzare il flusso di controllo quando si trovano all'interno di sequenze di istruzioni composte, in particolare IF / THEN / ELSE.
Un utile? l'esempio è durante lo sviluppo e la costruzione iniziali con e senza l'ausilio di debug.
CALL "CBL_OC_DUMP" USING structure ON EXCEPTION CONTINUE END-CALL
Quel codice, sebbene costoso, consentirà il dump della memoria formattata quando il modulo CBL_OC_DUMP è collegato nell'eseguibile, ma fallirà in modo innocuo quando non lo è. * Quel trucco è applicabile solo durante le prime fasi di sviluppo. La spesa di un errore di ricerca dinamico non è qualcosa da lasciare nel codice attivo e quelle linee dovrebbero essere rimosse dall'origine non appena tutte le preoccupazioni iniziali sono soddisfatte nel test alfa. Il primo giorno di programmazione, può essere un aiuto pratico. La codifica del secondo giorno ON ECCEPTION CONTINUE dovrebbe essere cancellata.
segnaposto
Questo è inventato; ma alcuni programmatori COBOL potrebbero preferire la chiarezza positiva, rispetto all'uso di NOT in espressioni condizionali (specialmente con l'errore logico incline var NOT = value OR other-value ).
if action-flag = "C" or "R" or "U" or "D"
continue
else
display "invalid action-code" upon syserr
perform report-exception
exit section
end-if