Re: /free & /end-free

[Henrik Rützou <hr@xxxxxxxxxxxx>]

Yes, sorry.

But today i support all TR's on V7R1 so I have to wait (again)

Well my service programs looks a little funny anyway:



      /**
      * Clears and initiate buffer and sets HTTP Content header in output
buffer
 *
 * <p><br><u>Member of the <b>Response Store</b> sub-procedure group</u><br>
 *
 * </p><br>
      *
      * @name responseWriteHead
      * @method
      * @since 6.0
      * @public
      * @param CCSID {number} CCSID for the HTTP output buffer
      * @param mimeHeader {string} HTTP Content Type or *none
 * @returns *none
 *
 * <br><br><br>
      */
      function subprocedure() { /**

     p responseWriteHead...
     p                 b                   export
     d                 pi
     d  CCSID                        10u 0 const
     d  mimeHeader                 4096a   const options(*varsize) varying

     d mimeLocal       s                   like(mimeHeader)
      /free

      ......

      /end-free
     p                 e
 */};


On Fri, Mar 3, 2017 at 10:08 PM, Mark Murphy/STAR BASE Consulting Inc. <
mmurphy@xxxxxxxxxxxxxxx> wrote:

> I am guessing you mean v7.1 since there was not a V7R0. For some reason
> IBM likes to start with .1 releases instead of .0 releases.
>
> Mark Murphy
> Atlas Data Systems
> mmurphy@xxxxxxxxxxxxxxx
>
>
> -----"Birgitta Hauser" <Hauser@xxxxxxxxxxxxxxx> wrote: -----
> To: "'RPG programming on the IBM i \(AS/400 and iSeries\)'" <
> rpg400-l@xxxxxxxxxxxx>
> From: "Birgitta Hauser" <Hauser@xxxxxxxxxxxxxxx>
> Date: 03/03/2017 01:10PM
> Subject: RE: /free & /end-free
>
>
> The remove of /FREE and /END-FREE was introduced with Release 7.1 TR 7 :
>
> New with IBM i 7.1 TR 7 - Free-form H, F, D and P statements for RPG
> https://www.ibm.com/developerworks/community/wikis/home?lang=en#!/wiki/
> We13116a562db_467e_bcd4_882013aec57a/page/New%20with%
> 20IBM%20i%207.1%20TR%207%20-%20Free-form%20H%2C%20F%2C%20D%
> 20and%20P%20statements%20for%20RPG
>
>
> Mit freundlichen Grüßen / Best regards
>
> Birgitta Hauser
>
> "Shoot for the moon, even if you miss, you'll land among the stars." (Les
> Brown)
> "If you think education is expensive, try ignorance." (Derek Bok)
> "What is worse than training your staff and losing them? Not training them
> and keeping them!"
> &#8222;Train people well enough so they can leave, treat them well enough
> so they don't want to.&#8220; (Richard Branson)
>
>
> -----Original Message-----
> From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Henrik
> Rützou
> Sent: Freitag, 3. März 2017 18:50
> To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
> Subject: /free & /end-free
>
> Hi,
>
> I'm doing a major reorganization and documentation of my service-programs
> that is written to run on V5R3 + V5R4 but now only supports V7R0
>
> When did the need for /free - /end-free in procedures disappear?
>
> Release and TR please
>
> --
> Regards,
> Henrik Rützou
>
> http://powerEXT.com <http://powerext.com/>
> --
> 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.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: http://amzn.to/2dEadiD
>
> --
> 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.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: http://amzn.to/2dEadiD
> --
> 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.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: http://amzn.to/2dEadiD