Downloads Documentation Community
Contribute
Contribute Demo






Show Sidebar
Login | Register


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

Revision 5628, 5.7 kB (checked in by tmdugan, 3 months ago)

-- chica

* updated rules in rule library

Line 
1 Maintenance:
2         Title:          Breastfeeding Problems PWS;;
3         Filename:               BFProblemsPWS;;
4         Version:        1.0;;
5         Institution:    Indiana University School of Medicine;;
6         Author:         Aaron E. Carroll;;
7         Specialist:     Pediatrics;;
8         Date:           2003-10-16T11:38:57-0400;;
9         Validation:     ;;
10 Library:
11         Purpose:                This question will fire if the system recognizes a prior problem with breast feeding.  It will allow for follow-up.                                                                                                                                                                                                                                                                                                                                                                                                 ;;
12         Explanation:                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        ;;
13         Keywords:       breastfeeding, nutrition;;
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 BFProblems := read Last {breast_feeding_help_needed from CHICA} ;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           
30 endif
31 ;;
32 Priority:               400;;
33         Evoke:          ;;
34 Logic:
35 If (mode = PRODUCE) then
36
37 If (BFProblems = "1") then conclude True;
38 conclude False;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                     
39
40 endif
41
42 If (mode = CONSUME) then
43
44 If  (Box1=true) then
45  CALL storeObs With "breast_feeding_help_needed","0";
46 endif;
47 If  (Box3=true) then
48  CALL storeObs With "breast_feeding_help_needed","1";
49 endif;
50 If  (Box5=true) then
51  CALL storeObs With "BREASTFED","0";
52 endif;
53 If  (Box5=true) then
54  CALL storeObs With "breast_feeding_help_needed","0";
55 endif;
56
57
58 endif
59 ;;
60 Action:
61 write ("This mother had some breast feeding problems.  How is it going now?");                                                                                                                                                                                                                                                                                                                                                                                                                                     
62 write ("No problems");
63 write ("");
64 write ("Some problems ->");
65 write ("Physician Counseling");
66 write ("Not breast feeding");
67 write ("Lactation Consultant");
68 ;;
69 Age_Min: 0 days;;
70 Age_Max: 12 months;;
71 end:
Note: See TracBrowser for help on using the browser.