General Page
Infor BPCS (Business Planning and Control System) and Infor XA - formerly MAPICS (Manufacturing, Accounting and Product Information Control Systems) are two software products that will count user licenses across all partitions, even if the jobs are not running or in-use. For FSFC, this can cause issues on production jobs when the FlashCopy Target partition is IPL'ed. The jobs may cease to run due to licensing usage being detected as over limit.
To avoid this scenario for either software product, first call Infor and get the following programs from them:
- For BPCS - program SYS065B
- For MAPICS - program AMZAIAFR
Note: These are NOT programs supplied by IBM. The Toolkit can simply be configured to call Infor's programs at the correct time in the process.
These programs, when called, will prevent the new partition (FlashCopy Target) from adding to the total number of licensed users, so long as no active jobs are running on that partition. Place these programs in a user library of your choice on the Source (Production) LPARs. To call these programs on the FlashCopy Target LPAR immediately after IPL, do the following steps:
These programs, when called, will prevent the new partition (FlashCopy Target) from adding to the total number of licensed users, so long as no active jobs are running on that partition. Place these programs in a user library of your choice on the Source (Production) LPARs. To call these programs on the FlashCopy Target LPAR immediately after IPL, do the following steps:
On the production LPARs, perform this step if you aren't already using an exit program:
- Copy the sample exit program to your tools source code library:
CPYSRCF FROMFILE(QZRDHASM/QCLSRC) TOFILE(your-lib/QCLSRC) FROMMBR(QZRDIAFFEX) - Then edit the source code to add ad the *PRETCPCFG exit:
CALL PGM(your-lib/SYS065B) PARM(&CFG '*PRETCPCFG' &TGT &EXT) CALL PGM(your-lib/AMZAIAFR) PARM(& '*PRETCPCFG' & &) - Compile the program:
CRTBNDCL PGM(your-lib/QZRDIAFFEX) SRCFILE(QZRDHASM/QCLSRC) SRCMBR(QZRDIAFFEX)
On the controlling LPARs:
- Create the exit program if you don't have one yet:
CRTBNDCL PGM(your-lib/QZRDIAFFEX) SRCFILE(QZRDHASM/QCLSRC) SRCMBR(QZRDIAFFEX) - Configure the toolkit to call that exit program:
CHGCSEDTA and enter the exit program library and name on the Exit Program parameter (on the last page) - CHKCSE
[{"Type":"MASTER","Line of Business":{"code":"LOB57","label":"Power"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SWG60","label":"IBM i"},"Platform":[{"code":"PF012","label":"IBM i"}],"Version":"7.1.0"}]
Was this topic helpful?
Document Information
Modified date:
27 February 2020
UID
ibm13609045