CLs without ENDPGM

>From the online help for ENDPGM (V4R2):

    The ENDPGM is not required at the end of a CL program.  If
    the last statement in a CL program source file is reached and no
    ENDPGM command is found, an ENDPGM command is assumed by the
    compiler.

And likewise for PGM:

    If a PGM command is used, it must be the first
    command in the program source file; if a PGM command is not used, a
    PGM command without parameters is assumed.

Bruce Vining

>
> Hi All,
>
>  I am going thru one of our libraries and I found that some CL
> programs have
> multiple CL statements starting with 'PGM'  but without any 'ENDPGM'.
> Surprisingly the programs are getting compiled in QTEMP. The spoolfile
> is just
> giving a warning that the "End of souce reached without any ENDPGM".
> As far as
> I know, if a CL program has more than one CL command and with PGM
> keyword, it
> should end with ENDPGM. Am I missing anything?
>
>  Any help/suggestions are greatly appreciated. Thanx in advance.
>
> Regards,
> Venu
>
Subject: RE: CLs without ENDPGM
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---