Downloads Documentation Community
Contribute
Contribute Demo






Show Sidebar
Login | Register


root/openmrs-modules/chica/ruleLibrary/AnnualHearingTestPSF.mlm

Revision 5205, 5.0 kB (checked in by tmdugan, 5 months ago)

-- chica

* mlms translated from chica 1.0

Line 
1 Maintenance:
2         Title:          Annual Hearing Test PSF;;
3         Filename:               AnnualHearingTestPSF;;
4         Version:        1.0;;
5         Institution:    Indiana University School of Medicine;;
6         Author:         Aaron E. Carroll;;
7         Specialist:     Pediatrics;;
8         Date:           2003-10-21T03:20:34-0400;;
9         Validation:     ;;
10 Library:
11         Purpose:                There is no clear evidence to do hearing tests annually from age 4-16 on all children or on children with risk factors.  We are going to do tests once per year on all children.                                                                                                                                                                                                                                                                                                                                    ;;
12         Explanation:    This PSF will flag the nurses to do hearing tests annually.  We need to account for the data captured within the PSF for the actual screen.. and we also need to look at variables used.                                                                                                                                                                                                                                                                                                                            ;;
13         Keywords:       hearing;;
14         Citations:              ;;
15         Links:          ;;
16 Knowledge:
17         Type:           data_driven;;
18 Data:
19
20 mode:=read {mode from Parameters};
21 Box1:=read {box1 from Parameters};
22 Box2:=read {box2 from Parameters};
23 Box3:=read {box3 from Parameters};
24 Box4:=read {box4 from Parameters};
25 Box5:=read {box5 from Parameters};
26 Box6:=read {box6 from Parameters};
27
28 If (mode = PRODUCE) then
29 hear := read Exist {HearL5000 from CHICA} Where it Occurred Within Past 365 Days;
30 hear2 := read Exist {HearL2500 from CHICA} Where it Occurred Within Past 365 Days;
31 hear3:= read Exist {HearL1000 from CHICA} Where it Occurred Within Past 365 Days;
32 hear4 := read Exist {HearL500 from CHICA} Where it Occurred Within Past 365 Days;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                   
33 endif
34 ;;
35 Priority:               ;;
36         Evoke:          ;;
37 Logic:
38 If (mode = PRODUCE) then
39
40 If (hear = True) OR  (hear2 = True) OR (hear3 = True) OR (hear4 = True) then conclude False;
41 conclude True;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                     
42
43 endif
44
45 ;;
46 Action:
47 write ("*") At HearL_HL;
48 write ("*") At HearR_HL;                                                                                                                                                                                                                                                         
49 ;;
50 Age_Min: 4 years;;
51 Age_Max: 16 years;;
52 end:
Note: See TracBrowser for help on using the browser.