Re: calling a program v using a SRVPGM

[Joe Pluta <joepluta@xxxxxxxxxxxxxxxxx>]

There's a little bit of terminology mismatch, Booth, because you don't 
just combine programs into a service program.  Each of the programs is 
now a procedure within the service program.  One may indeed be called 
pgmB, but it's no longer a program, it's a procedure.  If you left the 
name of the procedure to be pgmB, then you would use EXTPROC(pgmB) on 
your prototype; note the keyword EXTPROC, not EXTPGM.  Then in order to 
bring that service program into ProgA, you would create a binding 
directory with SRVPGM01 in it, and use that binding directory in the 
CTL-OPT specification.  Say you called the binding directory BNDDIR01, 
then you add BNDDIR('BNDDIR01') in your CTL-OPT specification.

Hope that helps!


On 12/30/2018 7:59 PM, Booth Martin wrote:
> This has got to be simpler than I am making it.
>
> Currently I have ProgA which has d-specs with getDesc extpgm(pgmB) and 
> 2 parms (1=requested item and 2=response with description for item).  
> Simple, straight forward, and I understand it.
>
> I combined pgmB, pgmC, pgmD and other  related small pgms into a 
> service program named SRVPGM01.  That all works and, coupled with IWS, 
> provides several web services.  Really happy with how the service 
> program works.
>
> So now I want to rewrite ProgA to use the service program/webservice.  
> I can not find instructions that I can understand.  My first confusion 
> is that I have two names to deal with (SRVPGM01 and pgmB).  Is it 
> extpgm(SRVPGM01) or extpgm(pgmB) and where does the other name get 
> entered?
>
> I am seeing things about copysrc, etc???  If I am black-boxing my 
> service programs then why would I copy the source into every program 
> that uses it?