Re: Cobol vraagje

Article View: be.comp.programming

Article #9517

Back to be.comp.programming Previous Next

#9517

From: Gaizka
Date: Wed, 24 Apr 2002 06:35

37 lines
2165 bytes

 "Zubke" wrote:

>Dat dacht ik dus ook maar die stomme editor maakt daar dus een probleem
>rond. Dit is wat ik geprobeerd heb
>     evaluate true
>        when kamertvg        call 'kamerstvg' on exception
>                             display 'fout' end-call
>        when kamerzoek       call 'kamerszoek' on exception
>                             display 'fout' end-call
>        when kamerverw       call 'kamersverwijd' on exception
>                             display 'fout' end-call
>        when kamerverand     call 'kamersverand' on exception
>                             display 'fout' end-call
>     end-evaluate.

Met de rmcobol-compiler werkt het als volgt, zie zelf of
cancel-statement nodig is:

evaluate true
        when kamertvg
	        call "kamerstvg"
	        cancel "kamerstvg"
end-evaluate

of zo is proberen: 

evaluate true
        when kamertvg
	       perform kamercall
end-evaluate

kamercall .

	call "kamerstvg"
        	cancel "kamerstvg"

.

Technical Details

Message-ID: <72kccukik4l1lft7be64sm1ku6v5a5smin@4ax.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!supernews.com!newsswitch.lcs.mit.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!colt.net!newspeer.clara.net!news.clara.net!skynet.be!skynet.be!feed1.news.be.easynet.net!sisyphus.news.be.easynet.net!not-for-mail

References:

<1019577489.894390@seven.kulnet.kuleuven.ac.be> <1019578277.485190@seven.kulnet.kuleuven.ac.be> <1019580708.209968@seven.kulnet.kuleuven.ac.be> <1019584201.666898@seven.kulnet.kuleuven.ac.be>

Show Full Headers

Complete Article Headers

X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,122530a7391ba7c3
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-04-23 23:38:02 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!supernews.com!newsswitch.lcs.mit.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!colt.net!newspeer.clara.net!news.clara.net!skynet.be!skynet.be!feed1.news.be.easynet.net!sisyphus.news.be.easynet.net!not-for-mail
From: Gaizka <gaizka@nospam.easynet.be>
Newsgroups: be.comp.programming
Subject: Re: Cobol vraagje
Date: Wed, 24 Apr 2002 08:35:06 +0200
Message-ID: <72kccukik4l1lft7be64sm1ku6v5a5smin@4ax.com>
References: <1019577489.894390@seven.kulnet.kuleuven.ac.be> <1019578277.485190@seven.kulnet.kuleuven.ac.be> <1019580708.209968@seven.kulnet.kuleuven.ac.be> <1019584201.666898@seven.kulnet.kuleuven.ac.be>
X-Newsreader: Forte Agent 1.8/32.553
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Lines: 37
Organization: [ posted via Easynet Belgium ]
NNTP-Posting-Host: 212.100.181.74
X-Trace: 1019630223  10243 212.100.181.74
X-Complaints-To: abuse@be.easynet.net

Reply to Parent Message