FHINI074 ; ; 11-OCT-1995
;;5.0;Dietetics;;Oct 11, 1995
Q:'DIFQR(112) F I=1:2 S X=$T(Q+I) Q:X="" S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,99) S:$A(Y)=61 Y=$E(Y,2,999) X NO E S @X=Y
Q Q
;;^UTILITY(U,$J,112,2488,0)
;;=BF, CEREAL, OATMEAL, W/HONEY, PPD W/WHOLE MILK^3-693^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2488,1)
;;=5^3.9^15.3^115^74.5^^^289^11.09^35^198^170^49^.925^.095^^^^^.487
;;^UTILITY(U,$J,112,2488,2)
;;=.602^6.034^.514^.06^10^.3^^^^^^^26^1.3
;;^UTILITY(U,$J,112,2488,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2489,0)
;;=BF, CEREAL, RICE, PPD W/WHOLE MILK^3-694^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2489,1)
;;=3.9^3.6^16.7^115^74.6^^^239^12.19^45^175^190^46^.643^.062^^^105^^.466
;;^UTILITY(U,$J,112,2489,2)
;;=.5^5.205^^.113^8.2^.3^^^^^^^^1.2
;;^UTILITY(U,$J,112,2489,3)
;;=.053^.176^.213^.36^.268^.099^.052^.192^.186^.257^.205^.106^.164^.323^.787^.118^.318^.205
;;^UTILITY(U,$J,112,2489,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2490,0)
;;=BF, CEREAL, RICE, W/ HONEY, PPD W/ WHOLE MILK^3-696^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2490,1)
;;=3.9^3.3^17.1^115^74.4^^^291^10.81^45^181^141^49^.649^.063^^^92^0^.476
;;^UTILITY(U,$J,112,2490,2)
;;=.608^6.083^^.115^8.3^.3^^^^^^^26^1.3
;;^UTILITY(U,$J,112,2490,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2491,0)
;;=BF, CEREAL, MIXED, W/HONEY, PPD W/WHOLE MILK^3-704^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2491,1)
;;=5^3.6^15.9^115^74.2^^^294^11.27^28^184^171^48^.722^.064^^^^^.447
;;^UTILITY(U,$J,112,2491,2)
;;=.583^6.26^.443^.067^11.4^.3^^^^^^^26^1.2
;;^UTILITY(U,$J,112,2491,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2492,0)
;;=BF, CEREAL, HI-PROT, W/APPLE & ORANGE, PPD W/WHOLE MILK^3-711^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2492,1)
;;=6.9^3.9^13.4^112^74.4^^^223^14.42^37^166^346^58^.761^.166^^^^^.655
;;^UTILITY(U,$J,112,2492,2)
;;=.847^3.987^^.092^27.6^.35^^^^^^^27^1.5
;;^UTILITY(U,$J,112,2492,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2493,0)
;;=BF, CEREAL, RICE, W/BANANAS, PPD W/ WHOLE MILK^3-712^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2493,1)
;;=4.2^3.5^17^117^74.3^^^213^11.04^34^145^253^57^.564^.05^^^^^.684
;;^UTILITY(U,$J,112,2493,2)
;;=.759^3.902^^.147^6.2^.33^^^^^^^26^1
;;^UTILITY(U,$J,112,2493,3)
;;=.063^.197^.242^.404^.292^.106^.055^.198^.193^.273^.198^.119^.175^.349^.826^.118^.335^.226
;;^UTILITY(U,$J,112,2493,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2494,0)
;;=FF, BISCUIT, PLAIN^21-001^biscuits^74^100^N
;;^UTILITY(U,$J,112,2494,1)
;;=5.83^18.04^46.53^373^27^^^121^2.2^12^352^117^789^.39^.047^.401^^132^0^.36
;;^UTILITY(U,$J,112,2494,2)
;;=.24^2.19^.26^.04^8^.13^.621^.078^7^11.811^4.602^.699^33^2.6
;;^UTILITY(U,$J,112,2494,3)
;;=.07^.172^.223^.415^.189^.107^.104^.277^.188^.255^.221^.131^.18^.273^1.731^.183^.624^.283
;;^UTILITY(U,$J,112,2494,4)
;;=.58^4.279^1.947^2.357^.092^1.449^4.431
;;^UTILITY(U,$J,112,2494,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2495,0)
;;=FF, BISCUIT, WITH EGG^21-002^biscuits^136^100^N
;;^UTILITY(U,$J,112,2495,1)
;;=8.18^14.85^17.77^232^51.07^^^113^2.3^15^136^118^481^.81^.062^.22^^477^0^.25
;;^UTILITY(U,$J,112,2495,2)
;;=.25^.52^.77^.06^22^.55^^^171^4.541^6.024^3.102^131^1.89
;;^UTILITY(U,$J,112,2495,3)
;;=.118^.339^.436^.676^.444^.219^.173^.436^.316^.499^.433^.195^.383^.638^1.671^.267^.58^.531
;;^UTILITY(U,$J,112,2495,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2496,0)
;;=FF, BISCUIT, WITH EGG AND BACON^21-003^biscuits^150^100^N
;;^UTILITY(U,$J,112,2496,1)
;;=11.33^20.73^19.06^305^46.67^^^126^2.49^16^159^167^666^1.09^.075^.186^^127^1.8^.09
;;^UTILITY(U,$J,112,2496,2)
;;=.15^1.6^.81^.09^20^.69^^^235^6.623^8.855^3.803^35^2.4
;;^UTILITY(U,$J,112,2496,3)
;;=.144^.453^.548^.875^.683^.281^.196^.54^.396^.635^.624^.287^.559^.89^2.036^.513^.727^.624
;;^UTILITY(U,$J,112,2496,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2497,0)
;;=FF, BISCUIT, WITH EGG AND HAM^21-004^biscuits^192^100^N
;;^UTILITY(U,$J,112,2497,1)
;;=10.64^14.08^15.79^230^54.66^^^115^2.37^16^165^166^720^1.16^.072^.159^^455^0^.35
;;^UTILITY(U,$J,112,2497,2)
;;=.31^1.04^.87^.14^17^.62^^^156^4.358^5.896^2.699^125^2.31
;;^UTILITY(U,$J,112,2497,3)
;;=.142^.456^.521^.863^.722^.281^.196^.519^.383^.564^.62^.311^.556^.907^1.974^.439^.62^.575
;;^UTILITY(U,$J,112,2497,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2498,0)
;;=FF, BISCUIT, WITH EGG AND SAUSAGE^21-005^biscuits^180^100^N
;;^UTILITY(U,$J,112,2498,1)
;;=10.64^21.5^22.86^323^42.9^^^86^2.2^14^272^178^634^1.2^.058^.175^^353^0^.28
;;^UTILITY(U,$J,112,2498,2)
;;=.25^2^.85^.11^22^.76^2.26^.14^168^8.32^9.11^2.47^91^2.1
;;^UTILITY(U,$J,112,2498,3)
;;=.137^.437^.513^.836^.664^.274^.186^.5^.377^.585^.593^.276^.539^.855^1.959^.462^.671^.595
FHINI074 ; ; 11-OCT-1995
+1 ;;5.0;Dietetics;;Oct 11, 1995
+2 IF 'DIFQR(112)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
IF X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
IF $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,99)
IF $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,112,2488,0)
+2 ;;=BF, CEREAL, OATMEAL, W/HONEY, PPD W/WHOLE MILK^3-693^oz.^28.3^100^N
+3 ;;^UTILITY(U,$J,112,2488,1)
+4 ;;=5^3.9^15.3^115^74.5^^^289^11.09^35^198^170^49^.925^.095^^^^^.487
+5 ;;^UTILITY(U,$J,112,2488,2)
+6 ;;=.602^6.034^.514^.06^10^.3^^^^^^^26^1.3
+7 ;;^UTILITY(U,$J,112,2488,20)
+8 ;;=USDA Std. Reference, Release 10
+9 ;;^UTILITY(U,$J,112,2489,0)
+10 ;;=BF, CEREAL, RICE, PPD W/WHOLE MILK^3-694^oz.^28.3^100^N
+11 ;;^UTILITY(U,$J,112,2489,1)
+12 ;;=3.9^3.6^16.7^115^74.6^^^239^12.19^45^175^190^46^.643^.062^^^105^^.466
+13 ;;^UTILITY(U,$J,112,2489,2)
+14 ;;=.5^5.205^^.113^8.2^.3^^^^^^^^1.2
+15 ;;^UTILITY(U,$J,112,2489,3)
+16 ;;=.053^.176^.213^.36^.268^.099^.052^.192^.186^.257^.205^.106^.164^.323^.787^.118^.318^.205
+17 ;;^UTILITY(U,$J,112,2489,20)
+18 ;;=USDA Std. Reference, Release 10
+19 ;;^UTILITY(U,$J,112,2490,0)
+20 ;;=BF, CEREAL, RICE, W/ HONEY, PPD W/ WHOLE MILK^3-696^oz.^28.3^100^N
+21 ;;^UTILITY(U,$J,112,2490,1)
+22 ;;=3.9^3.3^17.1^115^74.4^^^291^10.81^45^181^141^49^.649^.063^^^92^0^.476
+23 ;;^UTILITY(U,$J,112,2490,2)
+24 ;;=.608^6.083^^.115^8.3^.3^^^^^^^26^1.3
+25 ;;^UTILITY(U,$J,112,2490,20)
+26 ;;=USDA Std. Reference, Release 10
+27 ;;^UTILITY(U,$J,112,2491,0)
+28 ;;=BF, CEREAL, MIXED, W/HONEY, PPD W/WHOLE MILK^3-704^oz.^28.3^100^N
+29 ;;^UTILITY(U,$J,112,2491,1)
+30 ;;=5^3.6^15.9^115^74.2^^^294^11.27^28^184^171^48^.722^.064^^^^^.447
+31 ;;^UTILITY(U,$J,112,2491,2)
+32 ;;=.583^6.26^.443^.067^11.4^.3^^^^^^^26^1.2
+33 ;;^UTILITY(U,$J,112,2491,20)
+34 ;;=USDA Std. Reference, Release 10
+35 ;;^UTILITY(U,$J,112,2492,0)
+36 ;;=BF, CEREAL, HI-PROT, W/APPLE & ORANGE, PPD W/WHOLE MILK^3-711^oz.^28.3^100^N
+37 ;;^UTILITY(U,$J,112,2492,1)
+38 ;;=6.9^3.9^13.4^112^74.4^^^223^14.42^37^166^346^58^.761^.166^^^^^.655
+39 ;;^UTILITY(U,$J,112,2492,2)
+40 ;;=.847^3.987^^.092^27.6^.35^^^^^^^27^1.5
+41 ;;^UTILITY(U,$J,112,2492,20)
+42 ;;=USDA Std. Reference, Release 10
+43 ;;^UTILITY(U,$J,112,2493,0)
+44 ;;=BF, CEREAL, RICE, W/BANANAS, PPD W/ WHOLE MILK^3-712^oz.^28.3^100^N
+45 ;;^UTILITY(U,$J,112,2493,1)
+46 ;;=4.2^3.5^17^117^74.3^^^213^11.04^34^145^253^57^.564^.05^^^^^.684
+47 ;;^UTILITY(U,$J,112,2493,2)
+48 ;;=.759^3.902^^.147^6.2^.33^^^^^^^26^1
+49 ;;^UTILITY(U,$J,112,2493,3)
+50 ;;=.063^.197^.242^.404^.292^.106^.055^.198^.193^.273^.198^.119^.175^.349^.826^.118^.335^.226
+51 ;;^UTILITY(U,$J,112,2493,20)
+52 ;;=USDA Std. Reference, Release 10
+53 ;;^UTILITY(U,$J,112,2494,0)
+54 ;;=FF, BISCUIT, PLAIN^21-001^biscuits^74^100^N
+55 ;;^UTILITY(U,$J,112,2494,1)
+56 ;;=5.83^18.04^46.53^373^27^^^121^2.2^12^352^117^789^.39^.047^.401^^132^0^.36
+57 ;;^UTILITY(U,$J,112,2494,2)
+58 ;;=.24^2.19^.26^.04^8^.13^.621^.078^7^11.811^4.602^.699^33^2.6
+59 ;;^UTILITY(U,$J,112,2494,3)
+60 ;;=.07^.172^.223^.415^.189^.107^.104^.277^.188^.255^.221^.131^.18^.273^1.731^.183^.624^.283
+61 ;;^UTILITY(U,$J,112,2494,4)
+62 ;;=.58^4.279^1.947^2.357^.092^1.449^4.431
+63 ;;^UTILITY(U,$J,112,2494,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,2495,0)
+66 ;;=FF, BISCUIT, WITH EGG^21-002^biscuits^136^100^N
+67 ;;^UTILITY(U,$J,112,2495,1)
+68 ;;=8.18^14.85^17.77^232^51.07^^^113^2.3^15^136^118^481^.81^.062^.22^^477^0^.25
+69 ;;^UTILITY(U,$J,112,2495,2)
+70 ;;=.25^.52^.77^.06^22^.55^^^171^4.541^6.024^3.102^131^1.89
+71 ;;^UTILITY(U,$J,112,2495,3)
+72 ;;=.118^.339^.436^.676^.444^.219^.173^.436^.316^.499^.433^.195^.383^.638^1.671^.267^.58^.531
+73 ;;^UTILITY(U,$J,112,2495,20)
+74 ;;=USDA Std. Reference, Release 10
+75 ;;^UTILITY(U,$J,112,2496,0)
+76 ;;=FF, BISCUIT, WITH EGG AND BACON^21-003^biscuits^150^100^N
+77 ;;^UTILITY(U,$J,112,2496,1)
+78 ;;=11.33^20.73^19.06^305^46.67^^^126^2.49^16^159^167^666^1.09^.075^.186^^127^1.8^.09
+79 ;;^UTILITY(U,$J,112,2496,2)
+80 ;;=.15^1.6^.81^.09^20^.69^^^235^6.623^8.855^3.803^35^2.4
+81 ;;^UTILITY(U,$J,112,2496,3)
+82 ;;=.144^.453^.548^.875^.683^.281^.196^.54^.396^.635^.624^.287^.559^.89^2.036^.513^.727^.624
+83 ;;^UTILITY(U,$J,112,2496,20)
+84 ;;=USDA Std. Reference, Release 10
+85 ;;^UTILITY(U,$J,112,2497,0)
+86 ;;=FF, BISCUIT, WITH EGG AND HAM^21-004^biscuits^192^100^N
+87 ;;^UTILITY(U,$J,112,2497,1)
+88 ;;=10.64^14.08^15.79^230^54.66^^^115^2.37^16^165^166^720^1.16^.072^.159^^455^0^.35
+89 ;;^UTILITY(U,$J,112,2497,2)
+90 ;;=.31^1.04^.87^.14^17^.62^^^156^4.358^5.896^2.699^125^2.31
+91 ;;^UTILITY(U,$J,112,2497,3)
+92 ;;=.142^.456^.521^.863^.722^.281^.196^.519^.383^.564^.62^.311^.556^.907^1.974^.439^.62^.575
+93 ;;^UTILITY(U,$J,112,2497,20)
+94 ;;=USDA Std. Reference, Release 10
+95 ;;^UTILITY(U,$J,112,2498,0)
+96 ;;=FF, BISCUIT, WITH EGG AND SAUSAGE^21-005^biscuits^180^100^N
+97 ;;^UTILITY(U,$J,112,2498,1)
+98 ;;=10.64^21.5^22.86^323^42.9^^^86^2.2^14^272^178^634^1.2^.058^.175^^353^0^.28
+99 ;;^UTILITY(U,$J,112,2498,2)
+100 ;;=.25^2^.85^.11^22^.76^2.26^.14^168^8.32^9.11^2.47^91^2.1
+101 ;;^UTILITY(U,$J,112,2498,3)
+102 ;;=.137^.437^.513^.836^.664^.274^.186^.5^.377^.585^.593^.276^.539^.855^1.959^.462^.671^.595
