× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



That part is supposed to be fixed in V5R3.  They did do a lot of long 
needed fixing to the precompiler in V5R3. 

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





"Christen, Duane J." <dchristen@xxxxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
10/12/2004 04:02 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
cc

Fax to

Subject
RE: Converting to ILE






Yes we do a lot of SQL, which I don't mind the sql pre-processor looking 
at
the copybook but if I have several levels of copybooks, the pre-compiler
fails. 

Duane


> -----Original Message-----
> From: Tony Carolla [mailto:carolla@xxxxxxxxx]
> Sent: Tuesday, October 12, 2004 3:45 PM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Converting to ILE
> 
> 
> Uh....  Correct me if I'm wrong (I've been wrong once this year), but
> isn't the only difference between /COPY and /INCLUDE _other than_ it
> taking three extra keystrokes... that it avoids being processed by the
> SQL pre-processor?  ...
> 
> So... you must do alot of SQL pre-processing? 
> 
> 
> On Tue, 12 Oct 2004 15:19:59 -0500, Christen, Duane J.
> <dchristen@xxxxxxxxxxxxx> wrote:
> > /COPY is dead... Long Live /Include.....
> > 
> > There is a point at which /COPY should be feared. I have 
> seen programs where
> > the only line of code NOT contained in a copybook was MOVE 
> *ON  *INLR.
> > 
> > Duane
> > 
> > 
> > 
> > > -----Original Message-----
> > > From: Holden Tommy [mailto:Tommy.Holden@xxxxxxx]
> > > Sent: Tuesday, October 12, 2004 1:57 PM
> > > To: 'RPG programming on the AS400 / iSeries'
> > > Subject: RE: Converting to ILE
> > >
> > >
> > > lONG LIVE /COPY!!!!!!
> > >
> > > (or include....)
> > >
> > > Thanks,
> > > Tommy Holden
> > >
> > >
> > >
> > > -----Original Message-----
> > > From: Bob Cozzi [mailto:cozzi@xxxxxxxxx]
> > > Sent: Tuesday, October 12, 2004 1:45 PM
> > > To: 'RPG programming on the AS400 / iSeries'
> > > Subject: RE: Converting to ILE
> > >
> > >
> > > Please put it in a /COPY if you like.
> > > I get so much grief from programmers who are /COPY phobic
> > > that I tend to
> > > yield on this one a bit.
> > > -Bob
> > >
> > >
> > > -----Original Message-----
> > > From: rpg400-l-bounces@xxxxxxxxxxxx
> > > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> > > On Behalf Of rob@xxxxxxxxx
> > > Sent: Tuesday, October 12, 2004 1:11 PM
> > > To: RPG programming on the AS400 / iSeries
> > > Subject: RE: Converting to ILE
> > >
> > > I like that, but, does *CRTBNDRPG get used when you use CRTSQLRPGI
> > > OBJTYPE(*PGM) and not when you use CRTSQLRPGI OBJTYPE(*MODULE) or
> > > CRTSQLRPGI OBJTYPE(*SRVPGM)?
> > >
> > > Why put all that in each program versus a /copy of the 
> whole hspec?
> > >
> > > I forget why I started using *USA.  I suppose I should have
> > > commented that
> > > like I did the other keyword.
> > >
> > > Rob Berendt
> > > --
> > > Group Dekko Services, LLC
> > > Dept 01.073
> > > PO Box 2000
> > > Dock 108
> > > 6928N 400E
> > > Kendallville, IN 46755
> > > http://www.dekko.com
> > >
> > >
> > >
> > >
> > >
> > > "Bob Cozzi" <cozzi@xxxxxxxxx>
> > > Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> > > 10/12/2004 12:47 PM
> > > Please respond to
> > > RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> > >
> > >
> > > To
> > > "'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
> > > cc
> > >
> > > Fax to
> > >
> > > Subject
> > > RE: Converting to ILE
> > >
> > >
> > >
> > >
> > >
> > >
> > > I always use the following:
> > >
> > >      H BNDDIR('QC2LE':'XTOOLS') OPTION(*SRCSTMT:*NODEBUGIO)
> > >       /IF DEFINED(*CRTBNDRPG)
> > >      H DFTACTGRP(*NO) ACTGRP('MYCOMPANY')
> > >      H/ENDIF
> > >       /INCLUDE qcpysrc,copyright
> > >
> > > This way the source compiles even if you use CRTBNDRPG or 
> CRTRPGMOD.
> > > Also, by /COPYing the COPYRIGHT member, you can change it 
> in one place
> > > should the company ever get sold.
> > >
> > > Using DATFMT(*USA) is a typical mistake (my view) that people
> > > make when
> > > moving to RPG IV. Eventually you will learn to always use
> > > DATFMT(*ISO) for
> > > everything and then move it to an output field (PRTF or DSPF)
> > > that is in
> > > the
> > > alternate format (such as *USA) as needed.  The format of
> > > date literals,
> > > such as initial values MUST be in the DATFMT syntax, 
> regardless of the
> > > individual date field's DATFMT keyword. This is a big 
> issue for most
> > > people.
> > > For example:
> > >   H  DATFMT(*USA)
> > >   D  myDAte         S           D  DATFMT(*YMD) Inz(D'04/07/23')
> > >
> > > You'll get a compiler error here, because the D'04/07/23' is
> > > not in *USA
> > > format. Even though myDate is in *YMD format, its initial 
> value (if
> > > specified) must be in *USA format.
> > > I always recommend using DATFMT(*ISO) on the header spec 
> (which is the
> > > language default) and for date work fields unless you
> > > specifically need
> > > one
> > > in a specific format.
> > > -Bob Cozzi
> > >
> > >
> > >
> > > -----Original Message-----
> > > From: rpg400-l-bounces@xxxxxxxxxxxx
> > > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> > > On Behalf Of rob@xxxxxxxxx
> > > Sent: Tuesday, October 12, 2004 12:00 PM
> > > To: RPG programming on the AS400 / iSeries
> > > Subject: RE: Converting to ILE
> > >
> > > Would putting in the following on each converted program be a
> > > good idea?
> > >       /COPY ROUTINES/QRPGLESRC,HSPEC
> > > Then you would be able to modify the member HSPEC to put
> > > anything in there
> > >
> > > that you later find is a good idea.  Possibilities include:
> > >      H Bnddir('ROUTINES/SRVPGM':'QC2LE')
> > >      H ActGrp(*CALLER)
> > >      H DftActGrp(*NO)
> > >      H Datfmt(*USA)
> > >      H Copyright('(C) Copyright Group Dekko Services, LLC')
> > >      H ExprOpts(*RESDECPOS)
> > >      H* EXTBININT will change (B)inary to (I)nteger.
> > >      H EXTBININT(*YES)
> > > Some of these will change based on whether you are doing a
> > > service program
> > >
> > > versus a standard program.  Some of these will change if you
> > > want to set
> > > up different activation groups.  But, in general, beats the
> > > snot out of
> > > having to remember options on the compile command.  We break
> > > ours down
> > > because of the service program vs standard program thingy.
> > >
> > > HSPEC contains
> > >       /DEFINE HSpec
> > >       /COPY ROUTINES/QRPGLESRC,HSPEC2
> > >       /COPY ROUTINES/QRPGLESRC,HSPEC1
> > >       /UNDEFINE HSpec
> > > HSPEC1 contains
> > >       /DEFINE HSpec
> > >      H Bnddir('ROUTINES/SRVPGM':'QC2LE')
> > >      H ActGrp(*CALLER)
> > >      H DftActGrp(*NO)
> > >       /UNDEFINE HSpec
> > > HSPEC2 contains
> > >      H Datfmt(*USA)
> > >      H Copyright('(C) Copyright Group Dekko Services, LLC')
> > >      H ExprOpts(*RESDECPOS)
> > >      H* EXTBININT will change (B)inary to (I)nteger.
> > >      H EXTBININT(*YES)
> > >
> > > Rob Berendt
> > > --
> > > Group Dekko Services, LLC
> > > Dept 01.073
> > > PO Box 2000
> > > Dock 108
> > > 6928N 400E
> > > Kendallville, IN 46755
> > > http://www.dekko.com
> > >
> > > --
> > > This is the RPG programming on the AS400 / 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.
> > >
> > >
> > >
> > > --
> > > This is the RPG programming on the AS400 / 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.
> > >
> > >
> > > --
> > > This is the RPG programming on the AS400 / 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.
> > >
> > >
> > >
> > > --
> > > This is the RPG programming on the AS400 / 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.
> > > --
> > > This is the RPG programming on the AS400 / 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.
> > >
> > 
> > 
> > NOTICE: This electronic mail transmission may contain confidential
> > information and is intended only for the person(s) named. 
> Any use, copying
> > or disclosure by any other person is strictly prohibited. 
> If you have
> > received this transmission in error, please notify the 
> sender via e-mail.
> > 
> > 
> > 
> > 
> > --
> > This is the RPG programming on the AS400 / 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.
> > 
> > 
> 
> 
> -- 
> "Enter any 11-digit prime number to continue..."
> --
> This is the RPG programming on the AS400 / 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.
> 



NOTICE: This electronic mail transmission may contain confidential
information and is intended only for the person(s) named.  Any use, 
copying
or disclosure by any other person is strictly prohibited. If you have
received this transmission in error, please notify the sender via e-mail.



--
This is the RPG programming on the AS400 / 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.



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.