shared numbervar counter; shared stringvar strRes; local numbervar j; FOR j := 1 TO COUNT({View_Department.ICNo}) STEP 1 DO ( local stringvar hyperstat := {View_Department.Hypertension}[j]; if hyperstat = "Normal Blood Pressure" then counter := counter + 1; );
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)