Re: HereDoc

["Mark Murphy/STAR BASE Consulting Inc." <mmurphy@xxxxxxxxxxxxxxx>]

Not what I mean, PHP isn't a utility, C# isn't a utility, python isn't a 
utility, all support the HereDoc concept.  It would be nice if RPG 
supported it as well.  If you look closely at my initial suggestion, you 
may notice that the syntax is surprisingly like free form RPG4, in fact 
the first example is free form RPG4.  I am speaking of being able to code 
the HereDoc directly in the RPG code.

Mark Murphy
STAR BASE Consulting, Inc.
mmurphy@xxxxxxxxxxxxxxx



From:   Dennis <iseries@xxxxxxxxxxxx>
To:     RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
Date:   01/20/2011 11:43 AM
Subject:        Re: HereDoc
Sent by:        rpg400-l-bounces@xxxxxxxxxxxx



It does (my prior point) - in the same manner as those other utilities 
that you refer to as languages.

Where it is lacking is not RPG, but the interactive interface from which 
your program is called.

Example HEREDOC from a shell script:

mypgm <<EOF
this is data
this is more data
EOF

mypgm could be a program in any language, and it would see the data as 
stdin.

If that is not what you meant, please elaborate.

"Mark Murphy/STAR BASE Consulting Inc." <mmurphy@xxxxxxxxxxxxxxx> wrote:

> Many languages do.  Wouldn't it be nice if RPG did?
>
> Mark Murphy
> STAR BASE Consulting, Inc.
> mmurphy@xxxxxxxxxxxxxxx
>
>
>
> From:   Dennis <iseries@xxxxxxxxxxxx>
> To:     RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
> Date:   01/20/2011 10:33 AM
> Subject:        Re: HereDoc
> Sent by:        rpg400-l-bounces@xxxxxxxxxxxx
>
>
>
> CL has had the equivalent of Here docs since S/38 CPF R1 circa 1977.
>
> See //DATA in the CL reference manual.
>
> "Mark Murphy/STAR BASE Consulting Inc." <mmurphy@xxxxxxxxxxxxxxx>
> wrote:
>
> > Some time ago I learned PHP, and was introduced to a concept called 
> > HereDoc.  Essentially a way to insert a string inline.  Didn't really
> > see 
> > the use of it, and never really thought about it much until now.  I
> > have a 
> > piece of code where it would be highly useful for improving the 
> > readability of my program.  Unfortunately  The use is in an RPG
> > program, 
> > and the feature does not exist there.
> >
> > Anyway here is what I was thinking.  I am using dynamic SQL in a 
> > particular program (so that I can use set schema to direct unqualified
>
> > references to the environment of my choice).  Some of the SQL commands
> > are 
> > quite complex, and I have to double quotes in my string literals.  the
>
> > whole thing degenerates into a bunch of extra quotes and continuation 
> > marks that would not be necessary with a HereDoc.
> >
> > Consider the following (very simple, but serves to make the point):
> >
> >       updateStmt =
> >         'Update MCPSRV Set SESCLS=''O'',                        ' +
> >         '  semdat = Date_As_Cymd(Current_Date),                 ' +
> >         '  semtim = time_As_Hms(Current_Time), seuser = user,   ' +
> >         '  sempgm = ''SQL''                                     ' +
> >         'Where SEICD9=''V2020Z'''; 
> >
> > With a HereDoc I could write something like:
> >
> >       updateStmt = <<<DOC
> >         Update MCPSRV Set SESCLS='O', 
> >           semdat = Date_As_Cymd(Current_Date), 
> >           semtim = time_As_Hms(Current_Time), seuser = user, 
> >           sempgm = 'SQL' 
> >         Where SEICD9='V2020Z' 
> >      <<<DOC
> >
> > Even with a simple example the lack of superfluous quotes and
> > continuation 
> > marks makes the second far more readable than the first.
> >
> > Any thoughts?
> >
> > Mark Murphy
> > STAR BASE Consulting, Inc.
> > mmurphy@xxxxxxxxxxxxxxx
> > -- 
> > This is the RPG programming on the IBM i / System i (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.
>
> -- 
>
> Sent from my Android phone with K-9 Mail. Please excuse my brevity.
> -- 
>
> This is the RPG programming on the IBM i / System i (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.
>
>
> -- 
> This is the RPG programming on the IBM i / System i (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.