QRG1033

A área de dados DFTHSPEC na biblioteca QRPG utilizada para criar a especificação Controle Padrão requerida pelo RPG/400 não tem um H na posição 6. A especificação de controle foi eliminada e uma especificação de controle em branco foi criada.

Execute o comando CHGDTAARA DTAARA(QRPG/DFTHSPEC (1 6)) VALUE('*****H'). Compile novamente.