cobol
FORTSÄTT uttalande
Sök…
Anmärkningar
CONTINUE-uttalandet får kontrollflödet att fortsätta vid nästa uttalande. Inte riktigt no-op, eftersom det kan påverka kontrollflödet när det är inne i sammansatta utsagnssekvenser, särskilt IF / THEN / ELSE.
Ett praktiskt? exempel är under tidig utveckling och byggande med och utan felsökningshjälpmedel.
CALL "CBL_OC_DUMP" USING structure ON EXCEPTION CONTINUE END-CALL
Den koden, även om den är dyr, kommer att möjliggöra formaterade minnesdumpar när modulen CBL_OC_DUMP är länkad till den körbara, men kommer ofarligt att misslyckas när den inte är det. * Det tricket är endast tillämpligt under tidiga utvecklingsstadier. Kostnaden för ett dynamiskt uppslagningsfel är inte något att lämna kvar i aktiv kod, och dessa rader bör tas bort från källan så snart eventuella initiala problem är uppfyllda i alfatestning. Vid första dagskodningen kan det vara ett praktiskt hjälpmedel. Vid andra dagskodning vid undantag fortsätter händelser att torka rent.
Platshållare
Detta är förfalskat; men vissa COBOL-programmerare kanske föredrar den positiva tydligheten, mot att använda NOT i villkorade uttryck (särskilt med det logiska fel som är benägna 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