COBOL, das Ausnahmen Juni 1999 Anfassend Abbildet 1-61 1 1,24,3 Beispiel von, wie man den CORBA-Exceptionparameter anfaßt Das folgende Beispiel ist ein Segment einer COBOLANWENDUNG, die wie veranschaulicht Die Klimafunktionen, die oben beschrieben werden, können innerhalb einer COBOLANWENDUNG auf verwendet werden fassen Sie eine Ausnahme an. Für die folgende IDL-Definition: Schnittstelle MyInterface { Grund der Ausnahme example1{long... }; Ausnahme example2(...); leeres MyOperation(long argument1) raises(example1, example2...); ... } Das folgende würde erzeugt: 01 MYINTERFACE IST TYPEDEF SCHREIBEN Sie Corba-Gegenstand. 01 Myinterface-example1 IST TYPEDEF. GRUND 03 SCHREIBEN Sie Corba-langes 03... >> KONSTANTES Ex-example1 IST "< EINZIGARTIGER BEZEICHNER EXAMPLE1 >". 01 Myinterface-example2 IST TYPEDEF. 03... >> IST KONSTANTES EX-example2 "< EINZIGARTIGER BEZEICHNER EXAMPLE2 >". Die folgenden Codeüberprüfungen auf Ausnahmen und faßt sie an. KAPUTEL "ARBEITSSPEICHER". Myinterface-Gegenstand 01 SCHREIBEN SIE MYINTERFACE 01 EV SCHREIBEN Sie Corba-Klima. 01 ARGUMENT1 SCHREIBEN Sie Corba-langes W-Ausnahme-PTR 01 ZEIGER. 01 Ws-example1-ptr ZEIGER. ... GESTÄNGECAbschnitt. Ls-Ausnahme 01 SCHREIBEN Sie Corba-Ausnahme-Kennzeichnung. 01 Ls-example1 SCHREIBEN Sie Myinterface-example1. ... PROZEDURTEIL. ... ANRUF "VERWENDENDES Myinterface-myoperation" Myinterface-Gegenstand ARGUMENT1