× 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.



Thank you.  I would to see your process.  My e-mail address is
iwall@xxxxxxxxxxxxxxxxxxxxx   My phone number 954-514-2259.

Thanks.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Richard ECUYER
Sent: Friday, September 02, 2005 5:12 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: Subprocedure Question

isa, i can send you thr process i sue to build the module over the
files.
I do nothing manually.


----- Original Message ----- 
From: "Wall, Isa (ED)" <IWall@xxxxxxxxxxxxxxxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Sent: Thursday, September 01, 2005 11:02 PM
Subject: RE: Subprocedure Question


> That is exactly the way I was planning on doing it.  The value I get
out
> of having modules for each file I/O is that I can keep the business
> logic in the module so programmers can't make mistake.
>
> Thanks.
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Richard ECUYER
> Sent: Thursday, September 01, 2005 11:16 AM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Subprocedure Question
>
> what i would do (i did it) is :
> for each file :    1 source RPG with all procedures, and one exported
DS
> (like filename)
>                         1 source for /copy PI
>                         create one service PGM by module
>                         Add the *SRVPGM to a single bnddir
> In each pgm that use a file :
>                         Add the BNDDIR at "H" spec.
>                         Add the /copy for PI
>                         If i want data, add an external DS, imported
> (from
> the service pgm) qualified
>
> You may want a convention name :
>
>     Myfile         is the file
>     Io_Myfile    is the EDS name
>
>     Myfile.field1 ... are the fileds name
>
>     Procedure names :
>         Read_Myfile, Delete_MyFile, Create_Myfile....
>
>     It will make all procedure, ds unique.
>
> Hope this help.
>
>
>
> ----- Original Message ----- 
> From: "Wall, Isa (ED)" <IWall@xxxxxxxxxxxxxxxxxxxx>
> To: <rpg400-l@xxxxxxxxxxxx>
> Sent: Thursday, September 01, 2005 4:04 PM
> Subject: Subprocedure Question
>
>
> I would like to ask your option on the following subject.  I am
planning
> on implementing subprocedures for all file actions.  For example, if
you
> want to read, setll, open, update or write a record to a file you
would
> call a subprocedure.  I am planning on creating a module for each
file.
> Inside each module I would create all subprocedures related to that
file
> and logicals.  My question is the next step which I don't know what is
> my best action.  I now have a module for each file do I create a
binding
> directory for all the modules.  To me this does not make sense as we
> have thousands of file in our system.  So do I create a service
program
> for each module and at compile time bind them as I need them?  Is
there
> another way I can do this?  What is the best to handle this?
>
> Thanks.
>
>
> Isa Wall
> Programming Manager
> Everglades <http://www.gneil.com/>  Direct, Inc.
> 720 International Parkway
> Sunrise, FL 33325
> * 954-514-2259
> * 954-851-1201 Fax
> * iwall@xxxxxxxxxxxxxxxxxxxx
>
>
> -- 
> 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.
>
>


As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.