Re: in OS 6.1 can you mix and match /free

[Hoteltravelfundotcom <hoteltravelfun@xxxxxxxxx>]

I checked, they all have 'C'.

On Tue, Jan 5, 2016 at 12:28 PM, <broehmer@xxxxxxxxxxxxxxx> wrote:

> Me thinks you are missing the "C" spec (column 6) after the /end-fee
> unless you did not include all of the code.  But to answer your question,
> you absolutely can mix.
>
>
>
>
>
>
>
> From:   Hoteltravelfundotcom <hoteltravelfun@xxxxxxxxx>
> To:     "RPG programming on the IBM i / System i" <rpg400-l@xxxxxxxxxxxx>
> Date:   01/05/2016 11:24 AM
> Subject:        in OS 6.1 can you mix and match /free
> Sent by:        "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx>
>
>
>
> According to the error I am getting, I am thinking you cannot mix regular
> and free?
> Error:
>  *RNF0257 30      2 Form-Type entry for main procedure not valid or out of
>
>                     sequence.
>
>  *RNF5005 30     21 Operation entry following ENDSR operation is not
> valid;
>
>                     specification is ignored.
>
>  *RNF5016 30      1 ENDSR operation has no associated BEGSR operation.
>
>  *RNF5141 30      5 ENDyy is specified without associated structured
> operation.
>  *RNF5177 30      5 The ENDyy entry is missing for DO, DOUxx, DOWxx, FOR,
> IFxx,
>                     MONITOR, or SELECT.
>
>
>
> code in error:
>
>
> 354  /end-free
>  355                     EXSR      writeLoc
>
>  ======>a
>
>  ======>a
>
>  *RNF0257 30 a      017600  Form-Type entry for main procedure not valid
> or
> out
>                             sequence.
>
>     356                     EXSR      upd67a
>
>  ======>a
>
>  *RNF0257 30 a      017700  Form-Type entry for main procedure not valid
> or
> out
>                             sequence.
>
>     357  /free
>
>     358                    W_STRWHERE = ' where SixSeven = 0';
> --
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
>
>
> "CONFIDENTIALITY NOTICE:  This e-mail transmission (and/or the attachments
> accompanying it) contain confidential information belonging to the sender.
> The information is intended only for the use of the intended recipient.  If
> you are not the intended recipient, you are hereby notified that any
> disclosure, copying, distribution or the taking of any action in reliance
> on the contents of the information is strictly prohibited.  Any
> unauthorized interception of this transmission is illegal under the law.
> If you have received this transmission in error, please promptly notify the
> sender by reply e-mail, and then destroy all copies of the transmission."
> --
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.