FHINI026 ; ; 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,579,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,580,0)
;;=SOUP, VEGETABLE W/BEEF BROTH, CND, PREP W/EQ VOL WATER^6-472^cups^241^100^N
;;^UTILITY(U,$J,112,580,1)
;;=1.23^.79^5.44^34^91.5^^^7^.4^3^16^80^336^.33^.064^.14^^867^1^.021
;;^UTILITY(U,$J,112,580,2)
;;=.019^.401^.14^.023^4^0^.28^.05^1^.18^.23^.33^87^1.04^^^.2
;;^UTILITY(U,$J,112,580,3)
;;=.009^.03^.038^.068^.052^.013^.01^.044^.024^.052^.057^.021^.071^.105^.352^.113^.094^.042
;;^UTILITY(U,$J,112,580,4)
;;=^^.01^.11^.01^.06^.22
;;^UTILITY(U,$J,112,580,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,581,0)
;;=SOUP, CREAM OF ASPARAGUS, DEHYDRATED, PREP W/WATER^6-473^cups^250.8^100^N
;;^UTILITY(U,$J,112,581,1)
;;=.88^.69^3.57^23^93.9^^^9^.2^1^12^53^319^.27^.051^.102^^108^.3^.02
;;^UTILITY(U,$J,112,581,2)
;;=.02^.2^.03^.003^3^.01^.24^.02^0^.02^.3^.26^11^.96
;;^UTILITY(U,$J,112,581,4)
;;=^^0^.07^0^.04^.29
;;^UTILITY(U,$J,112,581,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,582,0)
;;=SOUP, BEAN W/BACON, DEHYDRATED, PREP W/WATER^6-474^cups^264.9^100^N
;;^UTILITY(U,$J,112,582,1)
;;=2.07^.81^6.18^40^89.73^^^21^.5^11^34^123^350^.26^.1^.2^^20^.4^.02
;;^UTILITY(U,$J,112,582,2)
;;=.1^.15^.02^.01^3^.01^.05^.01^1^.36^.35^.06^2^1.21^^^3.4
;;^UTILITY(U,$J,112,582,4)
;;=0^0^.02^.2^.03^.13^.31
;;^UTILITY(U,$J,112,582,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,583,0)
;;=SOUP, BEEF BROTH OR BOUILLON, POWDER, PREP W/WATER^6-475^cups^244^100^N
;;^UTILITY(U,$J,112,583,1)
;;=.52^.29^.77^8^96.74^^^4^.01^3^10^15^558^.03^.006^.016^^2^0^.002
;;^UTILITY(U,$J,112,583,2)
;;=.008^.146^0^0^0^0^.009^.002^0^.141^.118^.011^0^1.67^^^0
;;^UTILITY(U,$J,112,583,4)
;;=^.003^.011^.073^.012^.055^.105
;;^UTILITY(U,$J,112,583,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,584,0)
;;=SOUP, BEEF BROTH, CUBED, PREP W/WATER^6-476^cups^241.3^100^N
;;^UTILITY(U,$J,112,584,1)
;;=.35^.08^.33^3^98.03^^^1^.05^1^5^8^480^.004^0^.008^^1^0^.004
;;^UTILITY(U,$J,112,584,2)
;;=.005^.067^.01^0^1^0^0^0^0^.04^.03^0^0^1.21^^^0
;;^UTILITY(U,$J,112,584,4)
;;=^0^0^.02^0^.02^.03
;;^UTILITY(U,$J,112,584,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,585,0)
;;=SOUP, BEEF NOODLE, DEHYDRATED, PREP W/WATER^6-477^cups^251^100^N
;;^UTILITY(U,$J,112,585,1)
;;=.88^.32^2.4^16^95.32^^^2^.13^4^16^32^415^.04^.02^.04^^3^.2^.049
;;^UTILITY(U,$J,112,585,2)
;;=.024^.275^.001^.014^.6^0^.06^.01^1^.1^.14^.07^0^1.09^^^.3
;;^UTILITY(U,$J,112,585,4)
;;=^0^.01^.06^.01^.04^.13
;;^UTILITY(U,$J,112,585,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,586,0)
;;=SOUP, CAULIFLOWER, DEHYDRATED, PREP W/WATER^6-478^cups^256.1^100^N
;;^UTILITY(U,$J,112,586,1)
;;=1.13^.67^4.19^27^92.93^^^4^.2^1^20^41^329^.1^.01^.02^^2^1^.03
;;^UTILITY(U,$J,112,586,2)
;;=.03^.2^.04^.01^1^.07^.23^.02^0^.1^.29^.25^0^1.08
;;^UTILITY(U,$J,112,586,4)
;;=^^0^.07^0^.03^.29
;;^UTILITY(U,$J,112,586,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,587,0)
;;=SOUP, CREAM OF CELERY, DEHYDRATED, PREP W/WATER^6-479^cups^254^100^N
;;^UTILITY(U,$J,112,587,1)
;;=1.03^.64^3.84^25^93.45^^^14^.2^2^13^43^330^.05^.05^.09^^106^.1^.01
;;^UTILITY(U,$J,112,587,2)
;;=.02^.12^.4^0^.8^.02^.22^.02^0^.1^.28^.24^11^1.04
;;^UTILITY(U,$J,112,587,4)
;;=^^0^.06^0^.03^.27
;;^UTILITY(U,$J,112,587,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,588,0)
;;=SOUP, CHICKEN BROTH OR BOUILLON, DEHYDRATED, PREP W/WATER^6-480^cups^244^100^N
;;^UTILITY(U,$J,112,588,1)
;;=.55^.45^.59^9^96.8^^^6^.03^2^5^10^608^.003^0^0^^16^0^.003
;;^UTILITY(U,$J,112,588,2)
;;=.014^.08^.02^0^1^.01^.14^0^0^.11^.17^.15^5^1.61^^^0
;;^UTILITY(U,$J,112,588,4)
;;=^0^0^.08^.02^.02^.15^^^0
;;^UTILITY(U,$J,112,588,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,589,0)
;;=SOUP, CHICKEN BROTH CUBES, DEHYDRATED, PREP W/WATER^6-481^cups^243^100^N
;;^UTILITY(U,$J,112,589,1)
;;=.39^.12^.62^5^97.43^^^5^.05^1^5^10^326^.005^0^.01^^7^0^.005
;;^UTILITY(U,$J,112,589,2)
;;=.01^.103^.02^0^1^.01^.04^0^0^.03^.05^.04^2^1.44
;;^UTILITY(U,$J,112,589,4)
;;=^0^0^.02^.01^.01^.04^0
;;^UTILITY(U,$J,112,589,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,590,0)
;;=SOUP, CREAM OF CHICKEN, DEHYDRATED, PREP W/WATER^6-483^cups^261.1^100^N
;;^UTILITY(U,$J,112,590,1)
;;=.68^2.04^5.11^41^90.94^^^29^.1^2^37^82^454^.6^.1^.3^^156^.2^.04
;;^UTILITY(U,$J,112,590,2)
;;=.078^1^.3^.02^2^.1^.16^^1^1.3^.45^.16^47^1.22^^^.1
;;^UTILITY(U,$J,112,590,4)
;;=.08^.52^.21^.29^.04^.19^.41
;;^UTILITY(U,$J,112,590,20)
;;=USDA Std. Reference, Release 10
FHINI026 ; ; 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,579,20)
+2 ;;=USDA Std. Reference, Release 10
+3 ;;^UTILITY(U,$J,112,580,0)
+4 ;;=SOUP, VEGETABLE W/BEEF BROTH, CND, PREP W/EQ VOL WATER^6-472^cups^241^100^N
+5 ;;^UTILITY(U,$J,112,580,1)
+6 ;;=1.23^.79^5.44^34^91.5^^^7^.4^3^16^80^336^.33^.064^.14^^867^1^.021
+7 ;;^UTILITY(U,$J,112,580,2)
+8 ;;=.019^.401^.14^.023^4^0^.28^.05^1^.18^.23^.33^87^1.04^^^.2
+9 ;;^UTILITY(U,$J,112,580,3)
+10 ;;=.009^.03^.038^.068^.052^.013^.01^.044^.024^.052^.057^.021^.071^.105^.352^.113^.094^.042
+11 ;;^UTILITY(U,$J,112,580,4)
+12 ;;=^^.01^.11^.01^.06^.22
+13 ;;^UTILITY(U,$J,112,580,20)
+14 ;;=USDA Std. Reference, Release 10
+15 ;;^UTILITY(U,$J,112,581,0)
+16 ;;=SOUP, CREAM OF ASPARAGUS, DEHYDRATED, PREP W/WATER^6-473^cups^250.8^100^N
+17 ;;^UTILITY(U,$J,112,581,1)
+18 ;;=.88^.69^3.57^23^93.9^^^9^.2^1^12^53^319^.27^.051^.102^^108^.3^.02
+19 ;;^UTILITY(U,$J,112,581,2)
+20 ;;=.02^.2^.03^.003^3^.01^.24^.02^0^.02^.3^.26^11^.96
+21 ;;^UTILITY(U,$J,112,581,4)
+22 ;;=^^0^.07^0^.04^.29
+23 ;;^UTILITY(U,$J,112,581,20)
+24 ;;=USDA Std. Reference, Release 10
+25 ;;^UTILITY(U,$J,112,582,0)
+26 ;;=SOUP, BEAN W/BACON, DEHYDRATED, PREP W/WATER^6-474^cups^264.9^100^N
+27 ;;^UTILITY(U,$J,112,582,1)
+28 ;;=2.07^.81^6.18^40^89.73^^^21^.5^11^34^123^350^.26^.1^.2^^20^.4^.02
+29 ;;^UTILITY(U,$J,112,582,2)
+30 ;;=.1^.15^.02^.01^3^.01^.05^.01^1^.36^.35^.06^2^1.21^^^3.4
+31 ;;^UTILITY(U,$J,112,582,4)
+32 ;;=0^0^.02^.2^.03^.13^.31
+33 ;;^UTILITY(U,$J,112,582,20)
+34 ;;=USDA Std. Reference, Release 10
+35 ;;^UTILITY(U,$J,112,583,0)
+36 ;;=SOUP, BEEF BROTH OR BOUILLON, POWDER, PREP W/WATER^6-475^cups^244^100^N
+37 ;;^UTILITY(U,$J,112,583,1)
+38 ;;=.52^.29^.77^8^96.74^^^4^.01^3^10^15^558^.03^.006^.016^^2^0^.002
+39 ;;^UTILITY(U,$J,112,583,2)
+40 ;;=.008^.146^0^0^0^0^.009^.002^0^.141^.118^.011^0^1.67^^^0
+41 ;;^UTILITY(U,$J,112,583,4)
+42 ;;=^.003^.011^.073^.012^.055^.105
+43 ;;^UTILITY(U,$J,112,583,20)
+44 ;;=USDA Std. Reference, Release 10
+45 ;;^UTILITY(U,$J,112,584,0)
+46 ;;=SOUP, BEEF BROTH, CUBED, PREP W/WATER^6-476^cups^241.3^100^N
+47 ;;^UTILITY(U,$J,112,584,1)
+48 ;;=.35^.08^.33^3^98.03^^^1^.05^1^5^8^480^.004^0^.008^^1^0^.004
+49 ;;^UTILITY(U,$J,112,584,2)
+50 ;;=.005^.067^.01^0^1^0^0^0^0^.04^.03^0^0^1.21^^^0
+51 ;;^UTILITY(U,$J,112,584,4)
+52 ;;=^0^0^.02^0^.02^.03
+53 ;;^UTILITY(U,$J,112,584,20)
+54 ;;=USDA Std. Reference, Release 10
+55 ;;^UTILITY(U,$J,112,585,0)
+56 ;;=SOUP, BEEF NOODLE, DEHYDRATED, PREP W/WATER^6-477^cups^251^100^N
+57 ;;^UTILITY(U,$J,112,585,1)
+58 ;;=.88^.32^2.4^16^95.32^^^2^.13^4^16^32^415^.04^.02^.04^^3^.2^.049
+59 ;;^UTILITY(U,$J,112,585,2)
+60 ;;=.024^.275^.001^.014^.6^0^.06^.01^1^.1^.14^.07^0^1.09^^^.3
+61 ;;^UTILITY(U,$J,112,585,4)
+62 ;;=^0^.01^.06^.01^.04^.13
+63 ;;^UTILITY(U,$J,112,585,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,586,0)
+66 ;;=SOUP, CAULIFLOWER, DEHYDRATED, PREP W/WATER^6-478^cups^256.1^100^N
+67 ;;^UTILITY(U,$J,112,586,1)
+68 ;;=1.13^.67^4.19^27^92.93^^^4^.2^1^20^41^329^.1^.01^.02^^2^1^.03
+69 ;;^UTILITY(U,$J,112,586,2)
+70 ;;=.03^.2^.04^.01^1^.07^.23^.02^0^.1^.29^.25^0^1.08
+71 ;;^UTILITY(U,$J,112,586,4)
+72 ;;=^^0^.07^0^.03^.29
+73 ;;^UTILITY(U,$J,112,586,20)
+74 ;;=USDA Std. Reference, Release 10
+75 ;;^UTILITY(U,$J,112,587,0)
+76 ;;=SOUP, CREAM OF CELERY, DEHYDRATED, PREP W/WATER^6-479^cups^254^100^N
+77 ;;^UTILITY(U,$J,112,587,1)
+78 ;;=1.03^.64^3.84^25^93.45^^^14^.2^2^13^43^330^.05^.05^.09^^106^.1^.01
+79 ;;^UTILITY(U,$J,112,587,2)
+80 ;;=.02^.12^.4^0^.8^.02^.22^.02^0^.1^.28^.24^11^1.04
+81 ;;^UTILITY(U,$J,112,587,4)
+82 ;;=^^0^.06^0^.03^.27
+83 ;;^UTILITY(U,$J,112,587,20)
+84 ;;=USDA Std. Reference, Release 10
+85 ;;^UTILITY(U,$J,112,588,0)
+86 ;;=SOUP, CHICKEN BROTH OR BOUILLON, DEHYDRATED, PREP W/WATER^6-480^cups^244^100^N
+87 ;;^UTILITY(U,$J,112,588,1)
+88 ;;=.55^.45^.59^9^96.8^^^6^.03^2^5^10^608^.003^0^0^^16^0^.003
+89 ;;^UTILITY(U,$J,112,588,2)
+90 ;;=.014^.08^.02^0^1^.01^.14^0^0^.11^.17^.15^5^1.61^^^0
+91 ;;^UTILITY(U,$J,112,588,4)
+92 ;;=^0^0^.08^.02^.02^.15^^^0
+93 ;;^UTILITY(U,$J,112,588,20)
+94 ;;=USDA Std. Reference, Release 10
+95 ;;^UTILITY(U,$J,112,589,0)
+96 ;;=SOUP, CHICKEN BROTH CUBES, DEHYDRATED, PREP W/WATER^6-481^cups^243^100^N
+97 ;;^UTILITY(U,$J,112,589,1)
+98 ;;=.39^.12^.62^5^97.43^^^5^.05^1^5^10^326^.005^0^.01^^7^0^.005
+99 ;;^UTILITY(U,$J,112,589,2)
+100 ;;=.01^.103^.02^0^1^.01^.04^0^0^.03^.05^.04^2^1.44
+101 ;;^UTILITY(U,$J,112,589,4)
+102 ;;=^0^0^.02^.01^.01^.04^0
+103 ;;^UTILITY(U,$J,112,589,20)
+104 ;;=USDA Std. Reference, Release 10
+105 ;;^UTILITY(U,$J,112,590,0)
+106 ;;=SOUP, CREAM OF CHICKEN, DEHYDRATED, PREP W/WATER^6-483^cups^261.1^100^N
+107 ;;^UTILITY(U,$J,112,590,1)
+108 ;;=.68^2.04^5.11^41^90.94^^^29^.1^2^37^82^454^.6^.1^.3^^156^.2^.04
+109 ;;^UTILITY(U,$J,112,590,2)
+110 ;;=.078^1^.3^.02^2^.1^.16^^1^1.3^.45^.16^47^1.22^^^.1
+111 ;;^UTILITY(U,$J,112,590,4)
+112 ;;=.08^.52^.21^.29^.04^.19^.41
+113 ;;^UTILITY(U,$J,112,590,20)
+114 ;;=USDA Std. Reference, Release 10