MFPLI00040S This LEAVE statement is either not contained within a DO group, or it attempts to transfer control out of the current PROCEDURE or BEGIN block.