Error CPD6264 occurring when doing a CHGCMDDFT on ERS008
From Support
| If you have a question or seek clarification, please call Technical Support. |
Problem:
Error occured when changing the page orientation parameter on the ERS008 command on a regular basis.
CHGCMDDFT CMD(RJSERS/ERS008)NEWDFT('PAGEORIENT(*PORTRAIT)')
CPD6264 Diagnostic 40 02/09/05 12:18:30.149344
QCDCHDFT QSYS 052C CFOTESTCL UNION 0027
Message . . . . : Size of command ERS008 in RJSERS cannot be extended.
Cause . . . . . : The size of command ERS008 in library RJSERS will exceed 32K bytes if the default values
are changed. Recovery . . . : Do not change the default values for command ERS008 in library RJSERS.
Solution:
Apparently the size of a command object grows each time CHGCMDDFT is run against it. Once the object size exceeds 32KB, the CHGCMDDFT command no longer works to change parameter defaults.
Short term answer:
If you need multiple settings, make a copy of the ERS008 Make a copy of the CL command ERS008 and call it ERS008A and change the PAGEORIENT to *PORTRAIT. Then make a copy of the same command and name it ERS008B.
When different settings are needed ERS008 can be renamed and then ERS008A can be temporarily renamed to ERS008 and vise versa to rename it back.
Initial setup commands to create alternate versions of ERS008 commands
CRTDUPOBJ OBJ(ERS008) FROMLIB(RJSERS) OBJTYPE(*CMD) NEWOBJ(ERS008A)
CRTDUPOBJ OBJ(ERS008) FROMLIB(RJSERS) OBJTYPE(*CMD) NEWOBJ(ERS008P)
CRTDUPOBJ OBJ(ERS008) FROMLIB(RJSERS) OBJTYPE(*CMD) NEWOBJ(ERS008L)
CHGCMDDFT CMD(RJSERS/ERS008A) NEWDFT('PAGEORIENT(*AUTO)')
CHGCMDDFT CMD(RJSERS/ERS008P) NEWDFT('PAGEORIENT(*PORTRAIT)')
CHGCMDDFT CMD(RJSERS/ERS008L) NEWDFT('PAGEORIENT(*LANDSCAPE)')
Now run the following commands at runtime to switch to the portrait version of ERS008
DLTCMD CMD(RJSERS/ERS008) CRTDUPOBJ OBJ(ERS008P) FROMLIB(RJSERS) OBJTYPE(*CMD) NEWOBJ(ERS008)
Now run the following commands at runtime to switch back to the automatic version of ERS008
DLTCMD CMD(RJSERS/ERS008) CRTDUPOBJ OBJ(ERS008A) FROMLIB(RJSERS) OBJTYPE(*CMD) NEWOBJ(ERS008)
Long term answer:
We need to add a parameter to the MAILSPLF command and distribution list to allow users to specify page orientation information in their Email Report Server/400 system settings.
