現象確認しました。 とりあえず、以下のように直せば回避できそうです。 PRGEDIT S1,CALCLINE(...)+28 ↓ PRGEDIT S1,MIN(PRGSIZE(S1),CALCLINE(...)+28)