Re: UPDSRVPGM

Hi, Greg,

You should not delete the old *SRVPGM, but use CRTSRVPGM with REPLACE(*YES).   This protects any jobs that may be running and using the "current" version of that *SRVPGM.    

If you were to issue DLTSRVPGM first, then any jobs currently running and using that *SRVPGM would suddenly crash in very unglorious ways.

Hope that helps,

Mark S. Waterbury

On Thursday, November 16, 2023 at 12:01:45 PM EST, Greg Wilburn <gwilburn@xxxxxxxxxxxxxxxxxxxxxxx> wrote:

So I created a new service program called ASTVVR4 yesterday.  It had one module called ASTVVCUST.  All is working
Today I created/compiled a new module that I would like to ADD to the service program ASTVVOE.

Using a binding directory and binder source.

So I thought I could use UPDSRVPGM to add the new modules and procedures.
UPDSRVPGM SRVPGM(ASTHHOBJ/ASTVVR4)
MODULE(ASTHHOBJ/ASTVV*) EXPORT(*SRCFILE) SRCFILE(ASTHHSRC92/QSRVSRC)
BNDDIR(ASTBIND)

Both modules and the existing service program are in library ASTHHOBJ.

Message ID . . . . . . :  CPF5CE4      Severity . . . . . . . :  20
Message type . . . . . :  Diagnostic

Message . . . . :  Constituent module ASTVVOE not found.
Cause . . . . . :  Constituent module ASTVVOE originally from library
  ASTHHOBJ was specified to be replaced.  It was not found in bound program or
  service program ASTVVR4 in library ASTHHOBJ.
Recovery  . . . :  Use the Display Program (DSPPGM) or Display Service
  Program (DSPSRVPGM) command to identify the constituent module to be
  replaced.  Then reissue the Update Program (UPDPGM) or Update Service
  Program (UPDSRVPGM) again specifying the correct constituent module.

So my question is this...
If UPDSRVPGM won't work when adding a module, do I need to delete and recreate the SRVPGM?
Would I need to recompile all the programs that reference it?

I have a similar service program (7 modules) - I don't recall having to do the latter.

Thanks,
Greg

Greg Wilburn
Director of IT
301.895.3792 ext. 1231
301.895.3895 direct
gwilburn@xxxxxxxxxxxxxxxxxxxxxxx<mailto:gwilburn@xxxxxxxxxxxxxxxxxxxxxxx>
1 Corporate Dr
Grantsville, MD 21536
www.totalbizfulfillment.com<http://www.totalbizfulfillment.com>