PROCEDURE (527)    ENCOUNTER FORM BLOCK (357.1)