From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=0.6 required=5.0 tests=BAYES_40,INVALID_MSGID autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 10c949,38eaf2ac280788bb X-Google-Attributes: gid10c949,public X-Google-Thread: 109fba,38eaf2ac280788bb X-Google-Attributes: gid109fba,public X-Google-Thread: f6290,38eaf2ac280788bb X-Google-Attributes: gidf6290,public X-Google-Thread: 10d15b,38eaf2ac280788bb X-Google-Attributes: gid10d15b,public X-Google-Thread: fdb77,38eaf2ac280788bb X-Google-Attributes: gidfdb77,public X-Google-Thread: 1014db,38eaf2ac280788bb X-Google-Attributes: gid1014db,public X-Google-Thread: 103376,38eaf2ac280788bb X-Google-Attributes: gid103376,public X-Google-Thread: 114917,38eaf2ac280788bb X-Google-Attributes: gid114917,public From: Robin Becker Subject: Re: 'Money wanted' algorithm (Cobol version) Date: 1996/12/31 Message-ID: <+RQ+TEA+vFyyEwWF@jessikat.demon.co.uk>#1/1 X-Deja-AN: 206862506 distribution: world x-nntp-posting-host: jessikat.demon.co.uk references: <5a8h44$elt@news.inetdirect.net> organization: Web-Waders Inc mime-version: 1.0 newsgroups: comp.lang.ada,comp.lang.asm.x86,comp.lang.basic.misc,comp.lang.c,comp.lang.c++,comp.lang.clipper,comp.lang.cobol,comp.lang.java.advocacy,comp.lang.java.api,comp.lang.java.misc,comp.lang.java.programmer,comp.lang.javascript,comp.lang.pascal.borland,comp.lang.pascal.delphi.components.misc,comp.lang.pascal.delphi.databases,comp.lang.pascal.delphi.misc,comp.lang.perl.misc,comp.lang.smalltalk,comp.lang.tcl,comp.mail.eudora.ms-windows Date: 1996-12-31T00:00:00+00:00 List-Id: In article <5a8h44$elt@news.inetdirect.net>, Doug Miller writes >>>See mom, I DO have the Christmas spirit! >> >>> Dennis! >>Hey that's cool can you do it in Cobol? >> >Sure thing: > >PERFORM WITH TEST AFTER UNTIL hell-frozen-over > PERFORM find-empty-coffee-cup > PERFORM find-busy-street > PERFORM sit-middle-of-street UNTIL sunset > PERFORM wait-til-morning >END-PERFORM > > > >Doug Miller >dlmiller@inetdirect.net ('from' field rigged to foil e-mail spammers) >views expressed are mine and not those of >Hospital Health Plan Corp. "all health care is local" > > > somewhere the should be an initial PERFORM find-lovable-looking-mongrel -- Robin Becker