I think we are getting close with that info. The new version only has one
signature. How do I get it to keep the previous signatures?
The RPGLE is compiled to a module.
We do CRTSRVPGM SRVPGM(IIAPGM/CMSRV1). All other keywords default.
Service program . . . . . . . . CMSRV1
Library . . . . . . . . . . . IIAPGM
Module . . . . . . . . . . . . . *SRVPGM
Library . . . . . . . . . . .
+ for more values
Export . . . . . . . . . . . . . *SRCFILE
Export source file . . . . . . . QSRVSRC
Library . . . . . . . . . . . *LIBL
Export source member . . . . . . *SRVPGM
The BND source contains (to save you from rereading prior emails)
STRPGMEXP PGMLVL(*CURRENT)
EXPORT SYMBOL(SCGETNVPS)
EXPORT SYMBOL(SCGETNVP)
ENDPGMEXP
STRPGMEXP PGMLVL(*PRV)
EXPORT SYMBOL(SCGETNVPS)
EXPORT SYMBOL(SCGETNVP)
ENDPGMEXP
Also, is there any chance that Aldon is causing me the problem in the way it
promotes objects?
-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
dlclark@xxxxxxxxxxxxxxxx
Sent: Friday, August 12, 2016 12:30 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
<rpg400-l@xxxxxxxxxxxx>
Subject: RE: Need help with a service program
"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 08/12/2016 12:04:52
PM:
I'm a little shaky on service programs so I might need a little more
instructions but here is what I am finding.
When you display a service program it will display both the current
signature and any previous signatures it still supports (see display 9 of
10). Make sure your new service program shows the old signatures --
otherwise, that is why you are seeing that error.
Display Service Program Information
Service program . . . . . . . . . . . . : UT010SV
Library . . . . . . . . . . . . . . . : PGM460
Owner . . . . . . . . . . . . . . . . . : WISEMAST
Service program attribute . . . . . . . : RPGLE
Detail . . . . . . . . . . . . . . . . . : *SIGNATURE
Signatures:
UT010SV20150612
UT010SV20140503
UT010SV20141005
UT010SV20140722
UT010SV20140601
UT010SV20140422
UT010SV20140320
UT010SV20140210
UT010SV20131210
UT010SV20131030
Sincerely,
Dave Clark
--
int.ext: 91078
direct: (937) 531-6378
home: (937) 751-3300
Winsupply Group Services
3110 Kettering Boulevard
Dayton, Ohio 45439 USA
(937) 294-5331
****************************************************************************
*****************
This email message and any attachments is for use only by the named
addressee(s) and may contain confidential, privileged and/or proprietary
information. If you have received this message in error, please immediately
notify the sender and delete and destroy the message and all copies. All
unauthorized direct or indirect use or disclosure of this message is
strictly prohibited. No right to confidentiality or privilege is waived or
lost by any error in transmission.
****************************************************************************
*****************
--
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:
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.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
midrange.com
