CHGPRTF ... HOLD(*YES)

Bruno