Re: Mixing Mixed and Free format dcl using /copy - Possible?

That's not stirring the pot... looks pretty neat. Thanks, Dan!

We have a few different methods now I guess.

Bradley V. Stone
www.bvstools.com
GreenTools for G Suite/Google Apps <https://www.bvstools.com/g4g.html>:
Easy to use interfaces for GMail, Google Drive, Calendar, Contacts and
Cloud Print! <\body> <\html>

On Mon, Jun 18, 2018 at 1:41 PM Dan <dan27649@xxxxxxxxx> wrote:

I'm just here to stir the pot, but I have found the following compiles on
7.1. **END-FREE is "unsupported", but it is used by IBM in SQLRPGLE
precompiles, so...

**free
dcl-s x int( 10);
**end-free
D y s 9 0
x = y;
c seton LR
**free
y = x;

- Dan
--
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: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://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