The figure below shows the exports in the existing version of service program COST, and in the updated version.
Figure 23. Exports from Service Program COST
![]() |
The figure below shows the import requests in the existing program COSTDPT1, and in the new program COSTDPT2.
Figure 24. Import Requests in Programs COSTDPT1 and COSTDPT2
![]() |
The binder language for the old version of service program COST is located in member BND of source file QSRVSRC, in library MYLIB:
STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("cost1__Fi9_DecimalTXSP10SP2_") ENDPGMEXP
The export signature is 94898385315FD06BB65E44D38A852904.
The updated binder language includes the new export procedure cost2(). It is located in member BNDUPD of source file QSRVSRC, in library MYLIB:
STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("cost1__Fi9_DecimalTXSP10SP2_") EXPORT SYMBOL("cost2__Fi9_DecimalTXSP10SP2_9_DecimalTXSP3SP1_") ENDPGMEXP
The new export signature is 61E595C21D3EC9FDFD29749FB36B42D0.
In the binder language source that defines the old service program, the PGMLVL value is changed from *CURRENT to *PRV:
STRPGMEXP PGMLVL(*PRV) EXPORT SYMBOL("cost1__Fi9_DecimalTXSP10SP2_") ENDPGMEXP
Its export signature is unchanged.
(C) Copyright IBM Corporation 1992, 2005. All Rights Reserved.