RE: Humorous Enhancements

[Joel Fritz <JFritz@xxxxxxxxxxxxxxxx>]

In the same vein:

 C           *IN03     DOWEQ*OFF        
 C                     EXFMTSCREEN
 C           *IN03     IFEQ *ON         
 C                     LEAVE            
 C                     ENDIF            
 C* OTHER CODE                          
 C                     ENDDO            

> -----Original Message-----
> From: Dan Bale [mailto:dbale@genfast.com]
> Sent: Thursday, August 05, 1999 12:39 PM
> To: RPG400-L@midrange.com
> Subject: Re: Humorous Enhancements
> 
> 
> 
> 
> I am NOT making this up:
> 
>      C   99      1         IFEQ 1
>      C* Other code
>      C                     END
> 
> I've seen some other real head-scratchers, too; I'll post if 
> I find 'em.
> 
> - Dan Bale
> 
> 
> 
> 
> 
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to 
> RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: 
> david@midrange.com
> +---END
> 
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---END