Create PROC01.PROC