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


  • Subject: RE: Creating a service program
  • From: rob@xxxxxxxxx
  • Date: Tue, 22 Aug 2000 15:14:28 -0500


In case you don't like the generic 'do not do it that way' message,
I hope why I can explain why not to use *ALL.  I started out that way.
But got slammed against the wall by 'Program Signature Violations'.
For example you have PGMA which uses service program SRV1.  You want
to use SRV1 in a new program PGMB.  At the same time you add a new
subprocedure to service program SRV1.  You recompile SRV1 and PGMB.
Works great.  Two weeks later someone goes to run PGMA and it will
fail with a Program Signature Violation.  Program signatures keep
track of exports.  Exports are the subprocedure names, and to a lesser
extent, exported variables.  A close comparison to Program Signature
Violations are Record Level Checks.  If you use Binder language, and
use multiple signatures in your binder language, then PGMA and PGMB
will both work, without having to recompile PGMA.  You can do a DSPPGM
on PGMA and enter several times until you see the service programs and
look at the signature.  Then you can DSPPGM on PGMB, enter several
times and see the service programs and their signatures.  Then you can
do a DSPSRVPGM on SRV1 and see which signatures are supported.  Read
the RPG redbook for more info.



                                                                                
                                       
                    Anton Gombkötö                                              
                                       
                    <Gombkoetoe@ASsof        To:     RPG400-L@midrange.com      
                                       
                    t.com>                   cc:                                
                                       
                    Sent by:                 Subject:     RE: Creating a 
service program                               
                    owner-rpg400-l@mi                                           
                                       
                    drange.com                                                  
                                       
                                                                                
                                       
                                                                                
                                       
                    08/22/00 01:21 PM                                           
                                       
                    Please respond to                                           
                                       
                    RPG400-L                                                    
                                       
                                                                                
                                       
                                                                                
                                       




In addition to Brad's answer:

The value *ALL is allowed for paramter EXPORT of CRTSRVPGM.

That means that you want all procedures in your serviceprogram to be
accessable from other programs.

So you need not maintain a binder language source.

There are some disadvantages, too, but for the beginning it might be
simpler. In fact, we're using the *ALL value for creation of our service
programs, too, and have not encountered bigger problems yet. But it depends
on the structure, number of planned versions and, last, but not least, the
size of the application.

0.02 Euro


Mit freundlichen Grüssen / Best regards

Anton Gombkötö
mailto:Gombkoetoe@ASsoft.com

AS Software GmbH
http://www.assoft.com
Jedleseer Strasse 3
A-1210 Wien
Tel: +43 1 278 15 01-0
Fax:+43 1 278 15 01-22

Ab September sind wir die
Avenum Technologie GmbH!
http://www.avenum.at
Brigittenauer Lände 50 - 54
A-1200 Wien
Tel: +43 1 92 101-0
Fax:+43 1 92 101-300

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---



+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

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.