The data area DFTHSPEC in library QRPG used to create the default-control specification required by RPG/400 does not have an H in position 6. The control specification is dropped, and a blank control specification is created.
Execute the command CHGDTAARA DTAARA(QRPG/DFTHSPEC (1 6)) VALUE('*****H'). Compile again.
(C) Copyright IBM Corporation 1992, 2005. All Rights Reserved.