FHINI00R ; ; 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,106,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,107,0)
;;=WHEY, SWEET, DRIED^1-115^tbsp.^7.5^100^N
;;^UTILITY(U,$J,112,107,1)
;;=12.93^1.07^74.46^352.776^3.19^^^796.1^.88^176.1^931.7^2079.7^1079^1.97^.07^.009^^44^1.49^.519
;;^UTILITY(U,$J,112,107,2)
;;=2.208^1.258^5.62^.584^11.6^2.371^.025^.009^6^.684^.297^.034^10^8.35^^^0
;;^UTILITY(U,$J,112,107,3)
;;=.205^.817^.719^1.186^1.03^.241^.253^.407^.363^.697^.375^.237^.598^1.269^2.248^.28^.786^.622
;;^UTILITY(U,$J,112,107,4)
;;=.018^.012^.104^.326^.033^.097^.251^0
;;^UTILITY(U,$J,112,107,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,108,0)
;;=YOGURT, PLAIN, WHOLE MILK, 8 GRAMS PROTEIN PER 8 OZ^1-116^oz.^28.3^100^N
;;^UTILITY(U,$J,112,108,1)
;;=3.47^3.25^4.66^61.419^87.9^^^120.7^.05^11.58^94.9^154.6^46.4^.59^.009^.004^^123^.53^.029
;;^UTILITY(U,$J,112,108,2)
;;=.142^.075^.389^.032^7.4^.372^.065^.027^12.7^2.096^.893^.092^30^.72^^^0
;;^UTILITY(U,$J,112,108,3)
;;=.02^.142^.189^.35^.311^.102^.032^.189^.175^.287^.104^.086^.148^.275^.679^.084^.411^.215
;;^UTILITY(U,$J,112,108,4)
;;=.093^.111^.343^.886^.071^.317^.743^0
;;^UTILITY(U,$J,112,108,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,109,0)
;;=YOGURT, PLAIN, LOWFAT, 12 GRAMS PROTEIN PER 8 OZ^1-117^oz.^28.3^100^N
;;^UTILITY(U,$J,112,109,1)
;;=5.25^1.55^7.04^63.287^85.07^^^182.6^.08^17.45^143.5^233.8^70.2^.89^.013^.004^^66^.8^.044
;;^UTILITY(U,$J,112,109,2)
;;=.214^.114^.591^.049^11.2^.562^.031^.013^6.1^1^.426^.044^16^1.09^^^0
;;^UTILITY(U,$J,112,109,3)
;;=.03^.216^.286^.529^.471^.155^.048^.286^.265^.434^.158^.13^.225^.416^1.028^.127^.622^.325
;;^UTILITY(U,$J,112,109,4)
;;=.044^.053^.163^.422^.034^.151^.354^0^.3^3.3
;;^UTILITY(U,$J,112,109,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,110,0)
;;=YOGURT, PLAIN, SKIM MILK, 13 GRAMS PROTEIN PER 8 OZ^1-118^oz.^28.3^100^N
;;^UTILITY(U,$J,112,110,1)
;;=5.73^.18^7.68^55.771^85.23^^^199.1^.09^19.1^156.5^254.9^76.5^.97^.015^.005^^7^.87^.048
;;^UTILITY(U,$J,112,110,2)
;;=.234^.124^.641^.053^12.2^.613^.004^.001^1.8^.116^.049^.005^2^1.18^^^0
;;^UTILITY(U,$J,112,110,3)
;;=.032^.235^.313^.577^.514^.169^.052^.313^.289^.474^.172^.142^.245^.454^1.122^.138^.679^.355
;;^UTILITY(U,$J,112,110,4)
;;=.005^.006^.019^.049^.004^.018^.041^0
;;^UTILITY(U,$J,112,110,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,111,0)
;;=YOGURT, COFFEE AND VANILLA, LOWFAT, 11 GM PROTEIN PER 8 OZ^1-119^oz.^28.3^100^N
;;^UTILITY(U,$J,112,111,1)
;;=4.93^1.25^13.8^85.445^79^^^171.3^.07^16.43^134.6^219.3^65.8^.83^.013^.004^^54^.75^.042
;;^UTILITY(U,$J,112,111,2)
;;=.201^.107^.552^.045^10.5^.527^.025^.01^4.9^.806^.343^.036^13^1.02^^^0
;;^UTILITY(U,$J,112,111,3)
;;=.028^.202^.269^.497^.442^.145^.045^.269^.249^.408^.148^.122^.211^.391^.965^.119^.584^.305
;;^UTILITY(U,$J,112,111,4)
;;=.036^.043^.132^.341^.027^.122^.286^0
;;^UTILITY(U,$J,112,111,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,112,0)
;;=YOGURT, FRUIT, LOWFAT, 9 GRAMS PROTEIN PER 8 OZ^1-120^oz.^28.3^100^N
;;^UTILITY(U,$J,112,112,1)
;;=3.98^1.15^18.64^99.24^75.3^^^138.3^.06^13.27^108.7^177.1^53.2^.67^.079^.064^^49^.6^.034
;;^UTILITY(U,$J,112,112,2)
;;=.162^.086^.446^.037^8.5^.426^.023^.01^4.5^.742^.316^.033^12^.93^^^0
;;^UTILITY(U,$J,112,112,3)
;;=.022^.163^.217^.401^.357^.117^.036^.217^.201^.329^.12^.099^.17^.316^.779^.096^.472^.246
;;^UTILITY(U,$J,112,112,4)
;;=.033^.039^.121^.313^.025^.112^.263^0
;;^UTILITY(U,$J,112,112,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,113,0)
;;=YOGURT, FRUIT, LOWFAT, 10 GRAMS PROTEIN PER 8 OZ^1-121^oz.^28.3^100^N
;;^UTILITY(U,$J,112,113,1)
;;=4.37^1.08^19.05^101.877^74.48^^^151.9^.07^14.57^119.4^194.5^58.4^.74^.08^.065^^46^.66^.037
;;^UTILITY(U,$J,112,113,2)
;;=.178^.095^.489^.04^9.3^.467^.022^.009^4.2^.697^.297^.031^11^1.02^^^0
;;^UTILITY(U,$J,112,113,3)
;;=.025^.179^.238^.44^.392^.129^.04^.238^.221^.362^.132^.108^.187^.347^.856^.105^.518^.271
;;^UTILITY(U,$J,112,113,4)
;;=.031^.037^.114^.294^.024^.105^.247^0^.7
;;^UTILITY(U,$J,112,113,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,114,0)
;;=YOGURT, FRUIT, LOWFAT, 11 GRAMS PROTEIN PER 8 OZ^1-122^oz.^28.3^100^N
;;^UTILITY(U,$J,112,114,1)
;;=4.86^1.41^18.6^105.128^74.1^^^168.9^.07^16.2^132.7^216.3^64.9^.82^.08^.065^^60^.74^.041
;;^UTILITY(U,$J,112,114,2)
;;=.198^.105^.544^.045^10.4^.52^.028^.012^5.5^.909^.387^.04^15^1.03^^^0
;;^UTILITY(U,$J,112,114,3)
;;=.027^.2^.265^.49^.436^.143^.044^.265^.245^.402^.146^.12^.208^.385^.951^.117^.576^.301
FHINI00R ; ; 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,106,20)
+2 ;;=USDA Std. Reference, Release 10
+3 ;;^UTILITY(U,$J,112,107,0)
+4 ;;=WHEY, SWEET, DRIED^1-115^tbsp.^7.5^100^N
+5 ;;^UTILITY(U,$J,112,107,1)
+6 ;;=12.93^1.07^74.46^352.776^3.19^^^796.1^.88^176.1^931.7^2079.7^1079^1.97^.07^.009^^44^1.49^.519
+7 ;;^UTILITY(U,$J,112,107,2)
+8 ;;=2.208^1.258^5.62^.584^11.6^2.371^.025^.009^6^.684^.297^.034^10^8.35^^^0
+9 ;;^UTILITY(U,$J,112,107,3)
+10 ;;=.205^.817^.719^1.186^1.03^.241^.253^.407^.363^.697^.375^.237^.598^1.269^2.248^.28^.786^.622
+11 ;;^UTILITY(U,$J,112,107,4)
+12 ;;=.018^.012^.104^.326^.033^.097^.251^0
+13 ;;^UTILITY(U,$J,112,107,20)
+14 ;;=USDA Std. Reference, Release 10
+15 ;;^UTILITY(U,$J,112,108,0)
+16 ;;=YOGURT, PLAIN, WHOLE MILK, 8 GRAMS PROTEIN PER 8 OZ^1-116^oz.^28.3^100^N
+17 ;;^UTILITY(U,$J,112,108,1)
+18 ;;=3.47^3.25^4.66^61.419^87.9^^^120.7^.05^11.58^94.9^154.6^46.4^.59^.009^.004^^123^.53^.029
+19 ;;^UTILITY(U,$J,112,108,2)
+20 ;;=.142^.075^.389^.032^7.4^.372^.065^.027^12.7^2.096^.893^.092^30^.72^^^0
+21 ;;^UTILITY(U,$J,112,108,3)
+22 ;;=.02^.142^.189^.35^.311^.102^.032^.189^.175^.287^.104^.086^.148^.275^.679^.084^.411^.215
+23 ;;^UTILITY(U,$J,112,108,4)
+24 ;;=.093^.111^.343^.886^.071^.317^.743^0
+25 ;;^UTILITY(U,$J,112,108,20)
+26 ;;=USDA Std. Reference, Release 10
+27 ;;^UTILITY(U,$J,112,109,0)
+28 ;;=YOGURT, PLAIN, LOWFAT, 12 GRAMS PROTEIN PER 8 OZ^1-117^oz.^28.3^100^N
+29 ;;^UTILITY(U,$J,112,109,1)
+30 ;;=5.25^1.55^7.04^63.287^85.07^^^182.6^.08^17.45^143.5^233.8^70.2^.89^.013^.004^^66^.8^.044
+31 ;;^UTILITY(U,$J,112,109,2)
+32 ;;=.214^.114^.591^.049^11.2^.562^.031^.013^6.1^1^.426^.044^16^1.09^^^0
+33 ;;^UTILITY(U,$J,112,109,3)
+34 ;;=.03^.216^.286^.529^.471^.155^.048^.286^.265^.434^.158^.13^.225^.416^1.028^.127^.622^.325
+35 ;;^UTILITY(U,$J,112,109,4)
+36 ;;=.044^.053^.163^.422^.034^.151^.354^0^.3^3.3
+37 ;;^UTILITY(U,$J,112,109,20)
+38 ;;=USDA Std. Reference, Release 10
+39 ;;^UTILITY(U,$J,112,110,0)
+40 ;;=YOGURT, PLAIN, SKIM MILK, 13 GRAMS PROTEIN PER 8 OZ^1-118^oz.^28.3^100^N
+41 ;;^UTILITY(U,$J,112,110,1)
+42 ;;=5.73^.18^7.68^55.771^85.23^^^199.1^.09^19.1^156.5^254.9^76.5^.97^.015^.005^^7^.87^.048
+43 ;;^UTILITY(U,$J,112,110,2)
+44 ;;=.234^.124^.641^.053^12.2^.613^.004^.001^1.8^.116^.049^.005^2^1.18^^^0
+45 ;;^UTILITY(U,$J,112,110,3)
+46 ;;=.032^.235^.313^.577^.514^.169^.052^.313^.289^.474^.172^.142^.245^.454^1.122^.138^.679^.355
+47 ;;^UTILITY(U,$J,112,110,4)
+48 ;;=.005^.006^.019^.049^.004^.018^.041^0
+49 ;;^UTILITY(U,$J,112,110,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,111,0)
+52 ;;=YOGURT, COFFEE AND VANILLA, LOWFAT, 11 GM PROTEIN PER 8 OZ^1-119^oz.^28.3^100^N
+53 ;;^UTILITY(U,$J,112,111,1)
+54 ;;=4.93^1.25^13.8^85.445^79^^^171.3^.07^16.43^134.6^219.3^65.8^.83^.013^.004^^54^.75^.042
+55 ;;^UTILITY(U,$J,112,111,2)
+56 ;;=.201^.107^.552^.045^10.5^.527^.025^.01^4.9^.806^.343^.036^13^1.02^^^0
+57 ;;^UTILITY(U,$J,112,111,3)
+58 ;;=.028^.202^.269^.497^.442^.145^.045^.269^.249^.408^.148^.122^.211^.391^.965^.119^.584^.305
+59 ;;^UTILITY(U,$J,112,111,4)
+60 ;;=.036^.043^.132^.341^.027^.122^.286^0
+61 ;;^UTILITY(U,$J,112,111,20)
+62 ;;=USDA Std. Reference, Release 10
+63 ;;^UTILITY(U,$J,112,112,0)
+64 ;;=YOGURT, FRUIT, LOWFAT, 9 GRAMS PROTEIN PER 8 OZ^1-120^oz.^28.3^100^N
+65 ;;^UTILITY(U,$J,112,112,1)
+66 ;;=3.98^1.15^18.64^99.24^75.3^^^138.3^.06^13.27^108.7^177.1^53.2^.67^.079^.064^^49^.6^.034
+67 ;;^UTILITY(U,$J,112,112,2)
+68 ;;=.162^.086^.446^.037^8.5^.426^.023^.01^4.5^.742^.316^.033^12^.93^^^0
+69 ;;^UTILITY(U,$J,112,112,3)
+70 ;;=.022^.163^.217^.401^.357^.117^.036^.217^.201^.329^.12^.099^.17^.316^.779^.096^.472^.246
+71 ;;^UTILITY(U,$J,112,112,4)
+72 ;;=.033^.039^.121^.313^.025^.112^.263^0
+73 ;;^UTILITY(U,$J,112,112,20)
+74 ;;=USDA Std. Reference, Release 10
+75 ;;^UTILITY(U,$J,112,113,0)
+76 ;;=YOGURT, FRUIT, LOWFAT, 10 GRAMS PROTEIN PER 8 OZ^1-121^oz.^28.3^100^N
+77 ;;^UTILITY(U,$J,112,113,1)
+78 ;;=4.37^1.08^19.05^101.877^74.48^^^151.9^.07^14.57^119.4^194.5^58.4^.74^.08^.065^^46^.66^.037
+79 ;;^UTILITY(U,$J,112,113,2)
+80 ;;=.178^.095^.489^.04^9.3^.467^.022^.009^4.2^.697^.297^.031^11^1.02^^^0
+81 ;;^UTILITY(U,$J,112,113,3)
+82 ;;=.025^.179^.238^.44^.392^.129^.04^.238^.221^.362^.132^.108^.187^.347^.856^.105^.518^.271
+83 ;;^UTILITY(U,$J,112,113,4)
+84 ;;=.031^.037^.114^.294^.024^.105^.247^0^.7
+85 ;;^UTILITY(U,$J,112,113,20)
+86 ;;=USDA Std. Reference, Release 10
+87 ;;^UTILITY(U,$J,112,114,0)
+88 ;;=YOGURT, FRUIT, LOWFAT, 11 GRAMS PROTEIN PER 8 OZ^1-122^oz.^28.3^100^N
+89 ;;^UTILITY(U,$J,112,114,1)
+90 ;;=4.86^1.41^18.6^105.128^74.1^^^168.9^.07^16.2^132.7^216.3^64.9^.82^.08^.065^^60^.74^.041
+91 ;;^UTILITY(U,$J,112,114,2)
+92 ;;=.198^.105^.544^.045^10.4^.52^.028^.012^5.5^.909^.387^.04^15^1.03^^^0
+93 ;;^UTILITY(U,$J,112,114,3)
+94 ;;=.027^.2^.265^.49^.436^.143^.044^.265^.245^.402^.146^.12^.208^.385^.951^.117^.576^.301