add data types to procedures, p1