FHINI03M ; ; 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,1146,1)
;;=6.5^.9^90.2^374^1.5^^^21^6.3^60^182^372^88^5.3^.273^1.033^^4409^0^1.3
;;^UTILITY(U,$J,112,1146,2)
;;=1.5^17.6^.368^1.8^353^5.3^^^0^^^^1324^.9^^^1.5
;;^UTILITY(U,$J,112,1146,3)
;;=.1^.198^.276^.468^.178^.113^.127^.335^.196^.309^.313^.167^.241^.362^2.187^.254^.676^.355
;;^UTILITY(U,$J,112,1146,4)
;;=^^^^^^^^^48.6
;;^UTILITY(U,$J,112,1146,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1147,0)
;;=CEREALS, TASTEEOS, (OAT W/OTHER GRNS)^8-074^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1147,1)
;;=12.8^2.8^79.1^393^2.1^^^46^15.9^109^399^296^762^2.86^.589^^^4409^53^1.3
;;^UTILITY(U,$J,112,1147,2)
;;=1.5^17.6^.493^1.8^39^5.3^^^0^^^^1324^3.2^^^10.6
;;^UTILITY(U,$J,112,1147,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1148,0)
;;=CEREALS, TEAM, (RICE W/OTHER GRNS)^8-075^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1148,1)
;;=6.4^1.8^85.8^391^3.8^^^15^6.12^44^155^169^618^1.39^.514^1.283^^4409^53^1.3
;;^UTILITY(U,$J,112,1148,2)
;;=1.5^17.6^.735^1.8^16^5.3^^^0^^^^1324^2.2^^^1.3
;;^UTILITY(U,$J,112,1148,3)
;;=.092^.272^.308^.55^.243^.156^.126^.307^.295^.384^.447^.175^.303^.524^1.386^.337^.417^.311
;;^UTILITY(U,$J,112,1148,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1149,0)
;;=CEREALS, TOASTIES, (CORN)^8-076^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1149,1)
;;=8.1^.2^85.8^387^3^^^4^2.63^15^44^116^1048^.29^.106^.082^^4409^^1.3
;;^UTILITY(U,$J,112,1149,2)
;;=1.5^17.6^.123^1.8^353^5.3^^^0^^^^1324^2.9^^^3.4
;;^UTILITY(U,$J,112,1149,3)
;;=.048^.282^.313^1.209^.158^.192^.18^.413^.343^.412^.263^.218^.686^.484^1.78^.241^.822^.397
;;^UTILITY(U,$J,112,1149,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1150,0)
;;=CEREALS, TOTAL, (WHEAT)^8-077^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1150,1)
;;=10^2.1^78.8^352^4^^^854^63.5^112^415^373^988^2.36^.431^1.5^^17637^212^5.3
;;^UTILITY(U,$J,112,1150,2)
;;=6^70.5^.716^7.1^1411^21.2^.96^.08^0^.3^.2^1.04^5296^5^^^9.4
;;^UTILITY(U,$J,112,1150,3)
;;=.19^.333^.393^.688^.307^.173^.19^.48^.292^.492^.518^.232^.388^.559^2.915^.427^.99^.553
;;^UTILITY(U,$J,112,1150,4)
;;=^^^.29^.01^.01^.2^^.7
;;^UTILITY(U,$J,112,1150,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1151,0)
;;=CEREALS, WHEAT 'N RAISIN CHEX, (WHEAT)^8-080^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1151,1)
;;=9.4^.8^79.6^343^7^^^45^14.3^98^302^420^566^2.2^.524^^^2^3^1
;;^UTILITY(U,$J,112,1151,2)
;;=1.1^13.2^.291^1.3^265^4^^^0^^^^0^3.2^^^6.6
;;^UTILITY(U,$J,112,1151,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1152,0)
;;=CEREALS, WHEAT CHEX, (WHEAT)^8-082^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1152,1)
;;=9.9^2.5^82.2^367^2.5^^^39^15.9^127^395^377^670^2.68^.585^2.91^^0^53^1.3
;;^UTILITY(U,$J,112,1152,2)
;;=.36^17.6^.466^1.8^353^5.3^^^0^^^^0^3^^^8.9
;;^UTILITY(U,$J,112,1152,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1153,0)
;;=CEREALS, WHEAT GERM, TOASTED, PLAIN, (WHEAT GERM)^8-084^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1153,1)
;;=29.1^10.7^49.6^382^5.6^^^45^9.09^320^1146^947^4^16.67^.62^19.956^^^6^1.67
;;^UTILITY(U,$J,112,1153,2)
;;=.82^5.59^1.387^.978^352^0^5.82^.8^0^1.83^1.5^6.62^^5^^^12.9
;;^UTILITY(U,$J,112,1153,3)
;;=.398^1.218^1.066^1.976^1.847^.574^.576^1.168^.885^1.507^2.348^.81^1.858^2.604^5.026^1.791^1.549^1.386
;;^UTILITY(U,$J,112,1153,4)
;;=^^.01^1.75^.04^.06^1.47^^^65
;;^UTILITY(U,$J,112,1153,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1154,0)
;;=CEREALS, WHEAT GERM, TSTD, W/BRN SUG & HONEY, (WHEAT GERM)^8-085^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1154,1)
;;=21.8^8^60.8^377^5.6^^^33^6.82^240^859^710^3^12.5^.465^14.967^^0^^1.25
;;^UTILITY(U,$J,112,1154,2)
;;=.62^4.19^1.04^.734^264^0^4.32^.55^0^1.39^1.16^4.86^0^3.7^^^4.4
;;^UTILITY(U,$J,112,1154,3)
;;=.252^.9^.78^1.438^1.375^.414^.444^.889^.678^1.085^1.789^.621^1.401^1.973^3.728^1.344^1.164^1.032
;;^UTILITY(U,$J,112,1154,4)
;;=^^.01^1.33^.03^.04^1.14
;;^UTILITY(U,$J,112,1154,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1155,0)
;;=CEREALS, WHEATIES, (WHEAT)^8-089^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1155,1)
;;=9.5^1.7^79.5^349^4.6^^^151^15.9^109^346^374^952^2.23^.463^1.5^^4409^53^1.3
;;^UTILITY(U,$J,112,1155,2)
;;=1.5^17.6^.723^1.8^353^5.3^.77^.06^0^.24^.16^.83^1324^4.6^^^8.3
;;^UTILITY(U,$J,112,1155,3)
;;=.181^.317^.374^.655^.292^.165^.181^.458^.278^.469^.493^.22^.369^.533^2.776^.407^.943^.526
;;^UTILITY(U,$J,112,1155,4)
;;=^^^.23^.01^.01^.16^^^4.7
;;^UTILITY(U,$J,112,1155,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
FHINI03M ; ; 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,1146,1)
+2 ;;=6.5^.9^90.2^374^1.5^^^21^6.3^60^182^372^88^5.3^.273^1.033^^4409^0^1.3
+3 ;;^UTILITY(U,$J,112,1146,2)
+4 ;;=1.5^17.6^.368^1.8^353^5.3^^^0^^^^1324^.9^^^1.5
+5 ;;^UTILITY(U,$J,112,1146,3)
+6 ;;=.1^.198^.276^.468^.178^.113^.127^.335^.196^.309^.313^.167^.241^.362^2.187^.254^.676^.355
+7 ;;^UTILITY(U,$J,112,1146,4)
+8 ;;=^^^^^^^^^48.6
+9 ;;^UTILITY(U,$J,112,1146,20)
+10 ;;=USDA Std. Reference, Release 10
+11 ;;^UTILITY(U,$J,112,1147,0)
+12 ;;=CEREALS, TASTEEOS, (OAT W/OTHER GRNS)^8-074^oz.^28.3^100^N
+13 ;;^UTILITY(U,$J,112,1147,1)
+14 ;;=12.8^2.8^79.1^393^2.1^^^46^15.9^109^399^296^762^2.86^.589^^^4409^53^1.3
+15 ;;^UTILITY(U,$J,112,1147,2)
+16 ;;=1.5^17.6^.493^1.8^39^5.3^^^0^^^^1324^3.2^^^10.6
+17 ;;^UTILITY(U,$J,112,1147,20)
+18 ;;=USDA Std. Reference, Release 10
+19 ;;^UTILITY(U,$J,112,1148,0)
+20 ;;=CEREALS, TEAM, (RICE W/OTHER GRNS)^8-075^oz.^28.3^100^N
+21 ;;^UTILITY(U,$J,112,1148,1)
+22 ;;=6.4^1.8^85.8^391^3.8^^^15^6.12^44^155^169^618^1.39^.514^1.283^^4409^53^1.3
+23 ;;^UTILITY(U,$J,112,1148,2)
+24 ;;=1.5^17.6^.735^1.8^16^5.3^^^0^^^^1324^2.2^^^1.3
+25 ;;^UTILITY(U,$J,112,1148,3)
+26 ;;=.092^.272^.308^.55^.243^.156^.126^.307^.295^.384^.447^.175^.303^.524^1.386^.337^.417^.311
+27 ;;^UTILITY(U,$J,112,1148,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,1149,0)
+30 ;;=CEREALS, TOASTIES, (CORN)^8-076^oz.^28.3^100^N
+31 ;;^UTILITY(U,$J,112,1149,1)
+32 ;;=8.1^.2^85.8^387^3^^^4^2.63^15^44^116^1048^.29^.106^.082^^4409^^1.3
+33 ;;^UTILITY(U,$J,112,1149,2)
+34 ;;=1.5^17.6^.123^1.8^353^5.3^^^0^^^^1324^2.9^^^3.4
+35 ;;^UTILITY(U,$J,112,1149,3)
+36 ;;=.048^.282^.313^1.209^.158^.192^.18^.413^.343^.412^.263^.218^.686^.484^1.78^.241^.822^.397
+37 ;;^UTILITY(U,$J,112,1149,20)
+38 ;;=USDA Std. Reference, Release 10
+39 ;;^UTILITY(U,$J,112,1150,0)
+40 ;;=CEREALS, TOTAL, (WHEAT)^8-077^oz.^28.3^100^N
+41 ;;^UTILITY(U,$J,112,1150,1)
+42 ;;=10^2.1^78.8^352^4^^^854^63.5^112^415^373^988^2.36^.431^1.5^^17637^212^5.3
+43 ;;^UTILITY(U,$J,112,1150,2)
+44 ;;=6^70.5^.716^7.1^1411^21.2^.96^.08^0^.3^.2^1.04^5296^5^^^9.4
+45 ;;^UTILITY(U,$J,112,1150,3)
+46 ;;=.19^.333^.393^.688^.307^.173^.19^.48^.292^.492^.518^.232^.388^.559^2.915^.427^.99^.553
+47 ;;^UTILITY(U,$J,112,1150,4)
+48 ;;=^^^.29^.01^.01^.2^^.7
+49 ;;^UTILITY(U,$J,112,1150,20)
+50 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+51 ;;^UTILITY(U,$J,112,1151,0)
+52 ;;=CEREALS, WHEAT 'N RAISIN CHEX, (WHEAT)^8-080^oz.^28.3^100^N
+53 ;;^UTILITY(U,$J,112,1151,1)
+54 ;;=9.4^.8^79.6^343^7^^^45^14.3^98^302^420^566^2.2^.524^^^2^3^1
+55 ;;^UTILITY(U,$J,112,1151,2)
+56 ;;=1.1^13.2^.291^1.3^265^4^^^0^^^^0^3.2^^^6.6
+57 ;;^UTILITY(U,$J,112,1151,20)
+58 ;;=USDA Std. Reference, Release 10
+59 ;;^UTILITY(U,$J,112,1152,0)
+60 ;;=CEREALS, WHEAT CHEX, (WHEAT)^8-082^oz.^28.3^100^N
+61 ;;^UTILITY(U,$J,112,1152,1)
+62 ;;=9.9^2.5^82.2^367^2.5^^^39^15.9^127^395^377^670^2.68^.585^2.91^^0^53^1.3
+63 ;;^UTILITY(U,$J,112,1152,2)
+64 ;;=.36^17.6^.466^1.8^353^5.3^^^0^^^^0^3^^^8.9
+65 ;;^UTILITY(U,$J,112,1152,20)
+66 ;;=USDA Std. Reference, Release 10
+67 ;;^UTILITY(U,$J,112,1153,0)
+68 ;;=CEREALS, WHEAT GERM, TOASTED, PLAIN, (WHEAT GERM)^8-084^oz.^28.3^100^N
+69 ;;^UTILITY(U,$J,112,1153,1)
+70 ;;=29.1^10.7^49.6^382^5.6^^^45^9.09^320^1146^947^4^16.67^.62^19.956^^^6^1.67
+71 ;;^UTILITY(U,$J,112,1153,2)
+72 ;;=.82^5.59^1.387^.978^352^0^5.82^.8^0^1.83^1.5^6.62^^5^^^12.9
+73 ;;^UTILITY(U,$J,112,1153,3)
+74 ;;=.398^1.218^1.066^1.976^1.847^.574^.576^1.168^.885^1.507^2.348^.81^1.858^2.604^5.026^1.791^1.549^1.386
+75 ;;^UTILITY(U,$J,112,1153,4)
+76 ;;=^^.01^1.75^.04^.06^1.47^^^65
+77 ;;^UTILITY(U,$J,112,1153,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,1154,0)
+80 ;;=CEREALS, WHEAT GERM, TSTD, W/BRN SUG & HONEY, (WHEAT GERM)^8-085^oz.^28.3^100^N
+81 ;;^UTILITY(U,$J,112,1154,1)
+82 ;;=21.8^8^60.8^377^5.6^^^33^6.82^240^859^710^3^12.5^.465^14.967^^0^^1.25
+83 ;;^UTILITY(U,$J,112,1154,2)
+84 ;;=.62^4.19^1.04^.734^264^0^4.32^.55^0^1.39^1.16^4.86^0^3.7^^^4.4
+85 ;;^UTILITY(U,$J,112,1154,3)
+86 ;;=.252^.9^.78^1.438^1.375^.414^.444^.889^.678^1.085^1.789^.621^1.401^1.973^3.728^1.344^1.164^1.032
+87 ;;^UTILITY(U,$J,112,1154,4)
+88 ;;=^^.01^1.33^.03^.04^1.14
+89 ;;^UTILITY(U,$J,112,1154,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,1155,0)
+92 ;;=CEREALS, WHEATIES, (WHEAT)^8-089^oz.^28.3^100^N
+93 ;;^UTILITY(U,$J,112,1155,1)
+94 ;;=9.5^1.7^79.5^349^4.6^^^151^15.9^109^346^374^952^2.23^.463^1.5^^4409^53^1.3
+95 ;;^UTILITY(U,$J,112,1155,2)
+96 ;;=1.5^17.6^.723^1.8^353^5.3^.77^.06^0^.24^.16^.83^1324^4.6^^^8.3
+97 ;;^UTILITY(U,$J,112,1155,3)
+98 ;;=.181^.317^.374^.655^.292^.165^.181^.458^.278^.469^.493^.22^.369^.533^2.776^.407^.943^.526
+99 ;;^UTILITY(U,$J,112,1155,4)
+100 ;;=^^^.23^.01^.01^.16^^^4.7
+101 ;;^UTILITY(U,$J,112,1155,20)
+102 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
