Suggested Changes

1. Make one of the following changes:
   • Change a PGMLVL(*PRV) to PGMLVL(*CURRENT).
   • Add a STRPGMEXP-ENDPGMEXP block that is the correct *CURRENT export block.
2. Run the CRTSRVPGM command.

In this example, the PGMLVL(*PRV) is changed to PGMLVL(*CURRENT).