www.5-10.com
I use the below command after each OS400 release installation.

PGM
             CHGCMDDFT  CMD(CRTSRCPF)  NEWDFT('RCDLEN(112)') /* RPG 4 */
             CHGCMDDFT  CMD(CRTPF)     NEWDFT('size(*nomax *n *n)')
             CHGCMDDFT  CMD(CRTBNDRPG) NEWDFT('DBGVIEW(*ALL)') /* RPG COMPILES */
             CHGCMDDFT  CMD(CRTDSPF)   NEWDFT('RSTDSP(*YES)')
             CHGCMDDFT  CMD(STRDBG)    NEWDFT('updprod(*yes)')
             CHGCMDDFT  CMD(STRISDB)   NEWDFT('updprod(*yes)')
             CHGCMDDFT  CMD(STRISDB)   NEWDFT('INVPGM(*NO)')
             CHGCMDDFT  CMD(STRPRTWTR) NEWDFT('init(*all)') /* remote writers */
             CHGCMDDFT  CMD(CRTBNDCL)  NEWDFT('DBGVIEW(*ALL)') /* CL  COMPILES */
/*  Do not show the I option */
             CHGMSGD    MSGID(CPA4259) MSGF(QCPFMSG) +
                          MSG('Estimated query run time exceeds +
                          Interactive Limit (C  ) run in BATCH')
endpgm

When users sign on, their job is changed to limit interactive query time.

	CHGQRYA JOB(*) QRYTIMLMT(300)