Downloads Documentation Community Contribute Demo






Show Sidebar
Login | Register

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

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

-- chica

* mlms translated from chica 1.0

Line 
1 Maintenance:
2         Title:          Breastfeeding Screening PWS;;
3         Filename:               BFScreenPWS;;
4         Version:        1.0;;
5         Institution:    Indiana University School of Medicine;;
6         Author:         Aaron E. Carroll;;
7         Specialist:     Pediatrics;;
8         Date:           2003-12-19T10:36:01-0500;;
9         Validation:     ;;
10 Library:
11         Purpose:                This question will screen mother's for breastfeeding.  The trigger for this question will be no knowledge of breastfeeding status (BREASTFED 0-1).                                                                                                                                                                                                                                                                                                                                                                  ;;
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 breastfeed := read Exist {BREASTFED from CHICA} Where it Occurred Within Past 30 Days;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                     
30 endif
31 ;;
32 Priority:               622;;
33         Evoke:          ;;
34 Logic:
35 If (mode = PRODUCE) then
36
37 If (breastfeed = True) then conclude False;
38 conclude True;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 
39
40 endif
41
42 If (mode = CONSUME) then
43
44 If  (Box1=true) then
45  CALL storeObs With "BREASTFED","1";
46 endif;
47 If  (Box1=true) then
48  CALL storeObs With "breast_feeding_help_needed","0";
49 endif;
50 If  (Box3=true) then
51  CALL storeObs With "BREASTFED","1";
52 endif;
53 If  (Box3=true) then
54  CALL storeObs With "breast_feeding_help_needed","1";
55 endif;
56 If  (Box5=true) then
57  CALL storeObs With "BREASTFED","0";
58 endif;
59
60
61 endif
62 ;;
63 Action:
64 write ("Breast feeding can reduce the risk of pneumonia, otitis, hospitalizations, and SIDS.  Is this mother breastfeeding?");                                                                                                                                                                             
65 write ("Yes, no problems ->");
66 write ("consider TriViSol");
67 write ("Yes, but problems ->");
68 write ("lactation counseling");
69 write ("No ->");
70 write ("recommend formula with Fe");
71 ;;
72 Age_Min: 0 days;;
73 Age_Max: 12 months;;
74 end:
Note: See TracBrowser for help on using the browser.