FHINI05I ; ; 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,1880,4)
;;=^.001^.001^.031^.001^.003^.012
;;^UTILITY(U,$J,112,1880,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1881,0)
;;=SQUASH, ZUCCHINI, RAW^11-477^cups^130^95^N
;;^UTILITY(U,$J,112,1881,1)
;;=1.16^.14^2.9^14^95.28^^^15^.42^22^32^248^3^.2^.057^.127^^340^9^.07
;;^UTILITY(U,$J,112,1881,2)
;;=.03^.4^.083^.089^22.1^0^.022^.037^0^.029^.011^.06^34^.52^^^1.2
;;^UTILITY(U,$J,112,1881,3)
;;=.01^.028^.042^.068^.064^.017^.012^.041^.031^.052^.049^.025^.061^.141^.124^.044^.036^.047
;;^UTILITY(U,$J,112,1881,4)
;;=^.001^0^.025^.001^.003^.01
;;^UTILITY(U,$J,112,1881,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1882,0)
;;=SQUASH, ZUCCHINI, CKD WO/SALT^11-478^cups^210^100^N
;;^UTILITY(U,$J,112,1882,1)
;;=.64^.05^3.93^16^94.74^^^13^.35^22^40^253^3^.18^.086^.178^^240^4.6^.041
;;^UTILITY(U,$J,112,1882,2)
;;=.041^.428^.114^.078^16.8^0^.008^.013^0^.01^.004^.021^24^.64^^^1.3
;;^UTILITY(U,$J,112,1882,3)
;;=.006^.015^.023^.037^.035^.009^.007^.022^.017^.029^.027^.014^.033^.078^.068^.024^.02^.026
;;^UTILITY(U,$J,112,1882,4)
;;=^0^0^.009^0^.001^.004
;;^UTILITY(U,$J,112,1882,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1883,0)
;;=SQUASH, ZUCCHINI, CKD W/SALT^11-861^cups^210^100^N
;;^UTILITY(U,$J,112,1883,1)
;;=.64^.05^3.93^16^94.74^^^13^.35^22^40^253^239^.18^.086^.178^^240^4.6^.041
;;^UTILITY(U,$J,112,1883,2)
;;=.041^.428^.114^.078^16.8^0^.008^.013^0^.01^.004^.021^24^.64
;;^UTILITY(U,$J,112,1883,3)
;;=.006^.015^.023^.037^.035^.009^.007^.022^.017^.029^.027^.014^.033^.078^.068^.024^.02^.026
;;^UTILITY(U,$J,112,1883,4)
;;=^0^0^.009^0^.001^.004
;;^UTILITY(U,$J,112,1883,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1884,0)
;;=SQUASH, WINTER, ALL VAR, BAKED, WO/SALT^11-644^cups^205^100^N
;;^UTILITY(U,$J,112,1884,1)
;;=.89^.63^8.75^39^89.02^^^14^.33^8^20^437^1^.26^.095^.211^^3557^9.6^.085
;;^UTILITY(U,$J,112,1884,2)
;;=.024^.701^.35^.072^28^0^.099^.165^0^.13^.047^.265^356^.72^^^2.8
;;^UTILITY(U,$J,112,1884,3)
;;=.013^.027^.035^.05^.033^.011^.008^.035^.03^.038^.049^.017^.037^.095^.155^.033^.032^.035
;;^UTILITY(U,$J,112,1884,4)
;;=^.003^.002^.112^.003^.013^.043
;;^UTILITY(U,$J,112,1884,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1885,0)
;;=SQUASH, WINTER, ALL VAR, BAKED, W/SALT^11-863^cups^205^100^N
;;^UTILITY(U,$J,112,1885,1)
;;=.89^.63^8.75^39^89.02^^^14^.33^8^20^437^237^.26^.095^.211^^3557^9.6^.085
;;^UTILITY(U,$J,112,1885,2)
;;=.024^.701^.35^.072^28^0^.099^.165^0^.13^.047^.265^356^.72
;;^UTILITY(U,$J,112,1885,3)
;;=.013^.027^.035^.05^.033^.011^.008^.035^.03^.038^.049^.017^.037^.095^.155^.033^.032^.035
;;^UTILITY(U,$J,112,1885,4)
;;=^.003^.002^.112^.003^.013^.043
;;^UTILITY(U,$J,112,1885,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1888,0)
;;=SQUASH, ACORN, BAKED, WO/SALT^11-483^halves^156^80^N
;;^UTILITY(U,$J,112,1888,1)
;;=1.12^.14^14.58^56^82.9^^^44^.93^43^45^437^4^.17^.086^.242^^428^10.8^.167
;;^UTILITY(U,$J,112,1888,2)
;;=.013^.881^.504^.194^18.7^0^.022^.037^0^.029^.01^.059^43^1.26
;;^UTILITY(U,$J,112,1888,3)
;;=.016^.033^.044^.064^.041^.014^.01^.044^.038^.048^.062^.021^.047^.12^.196^.041^.04^.044
;;^UTILITY(U,$J,112,1888,4)
;;=^.001^0^.025^.001^.003^.009
;;^UTILITY(U,$J,112,1888,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1889,0)
;;=SQUASH, ACORN, BAKED, W/SALT^11-864^halves^156^80^N
;;^UTILITY(U,$J,112,1889,1)
;;=1.12^.14^14.58^56^82.9^^^44^.93^43^45^437^240^.17^.086^.242^^428^10.8^.167
;;^UTILITY(U,$J,112,1889,2)
;;=.013^.881^.504^.194^18.7^0^.022^.037^0^.029^.01^.059^43^1.26
;;^UTILITY(U,$J,112,1889,3)
;;=.016^.033^.044^.064^.041^.014^.01^.044^.038^.048^.062^.021^.047^.12^.196^.041^.04^.044
;;^UTILITY(U,$J,112,1889,4)
;;=^.001^0^.025^.001^.003^.009
;;^UTILITY(U,$J,112,1889,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1890,0)
;;=SQUASH, ACORN, BOILED, MASHED, WO/SALT^11-484^cups^245^100^N
;;^UTILITY(U,$J,112,1890,1)
;;=.67^.08^8.78^34^89.7^^^26^.56^26^27^263^3^.11^.052^.146^^258^6.5^.1
;;^UTILITY(U,$J,112,1890,2)
;;=.008^.531^.303^.117^11.3^0^.013^.022^0^.017^.006^.035^26^.76
;;^UTILITY(U,$J,112,1890,3)
;;=.01^.02^.026^.038^.025^.008^.006^.026^.023^.029^.037^.013^.028^.072^.118^.025^.024^.026
;;^UTILITY(U,$J,112,1890,4)
;;=^0^0^.015^0^.002^.006
;;^UTILITY(U,$J,112,1890,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1891,0)
;;=SQUASH, ACORN, BOILED, MASHED, W/SALT^11-865^cups^245^100^N
FHINI05I ; ; 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,1880,4)
+2 ;;=^.001^.001^.031^.001^.003^.012
+3 ;;^UTILITY(U,$J,112,1880,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,1881,0)
+6 ;;=SQUASH, ZUCCHINI, RAW^11-477^cups^130^95^N
+7 ;;^UTILITY(U,$J,112,1881,1)
+8 ;;=1.16^.14^2.9^14^95.28^^^15^.42^22^32^248^3^.2^.057^.127^^340^9^.07
+9 ;;^UTILITY(U,$J,112,1881,2)
+10 ;;=.03^.4^.083^.089^22.1^0^.022^.037^0^.029^.011^.06^34^.52^^^1.2
+11 ;;^UTILITY(U,$J,112,1881,3)
+12 ;;=.01^.028^.042^.068^.064^.017^.012^.041^.031^.052^.049^.025^.061^.141^.124^.044^.036^.047
+13 ;;^UTILITY(U,$J,112,1881,4)
+14 ;;=^.001^0^.025^.001^.003^.01
+15 ;;^UTILITY(U,$J,112,1881,20)
+16 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+17 ;;^UTILITY(U,$J,112,1882,0)
+18 ;;=SQUASH, ZUCCHINI, CKD WO/SALT^11-478^cups^210^100^N
+19 ;;^UTILITY(U,$J,112,1882,1)
+20 ;;=.64^.05^3.93^16^94.74^^^13^.35^22^40^253^3^.18^.086^.178^^240^4.6^.041
+21 ;;^UTILITY(U,$J,112,1882,2)
+22 ;;=.041^.428^.114^.078^16.8^0^.008^.013^0^.01^.004^.021^24^.64^^^1.3
+23 ;;^UTILITY(U,$J,112,1882,3)
+24 ;;=.006^.015^.023^.037^.035^.009^.007^.022^.017^.029^.027^.014^.033^.078^.068^.024^.02^.026
+25 ;;^UTILITY(U,$J,112,1882,4)
+26 ;;=^0^0^.009^0^.001^.004
+27 ;;^UTILITY(U,$J,112,1882,20)
+28 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+29 ;;^UTILITY(U,$J,112,1883,0)
+30 ;;=SQUASH, ZUCCHINI, CKD W/SALT^11-861^cups^210^100^N
+31 ;;^UTILITY(U,$J,112,1883,1)
+32 ;;=.64^.05^3.93^16^94.74^^^13^.35^22^40^253^239^.18^.086^.178^^240^4.6^.041
+33 ;;^UTILITY(U,$J,112,1883,2)
+34 ;;=.041^.428^.114^.078^16.8^0^.008^.013^0^.01^.004^.021^24^.64
+35 ;;^UTILITY(U,$J,112,1883,3)
+36 ;;=.006^.015^.023^.037^.035^.009^.007^.022^.017^.029^.027^.014^.033^.078^.068^.024^.02^.026
+37 ;;^UTILITY(U,$J,112,1883,4)
+38 ;;=^0^0^.009^0^.001^.004
+39 ;;^UTILITY(U,$J,112,1883,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,1884,0)
+42 ;;=SQUASH, WINTER, ALL VAR, BAKED, WO/SALT^11-644^cups^205^100^N
+43 ;;^UTILITY(U,$J,112,1884,1)
+44 ;;=.89^.63^8.75^39^89.02^^^14^.33^8^20^437^1^.26^.095^.211^^3557^9.6^.085
+45 ;;^UTILITY(U,$J,112,1884,2)
+46 ;;=.024^.701^.35^.072^28^0^.099^.165^0^.13^.047^.265^356^.72^^^2.8
+47 ;;^UTILITY(U,$J,112,1884,3)
+48 ;;=.013^.027^.035^.05^.033^.011^.008^.035^.03^.038^.049^.017^.037^.095^.155^.033^.032^.035
+49 ;;^UTILITY(U,$J,112,1884,4)
+50 ;;=^.003^.002^.112^.003^.013^.043
+51 ;;^UTILITY(U,$J,112,1884,20)
+52 ;;=USDA Std. Reference, Release 10
+53 ;;^UTILITY(U,$J,112,1885,0)
+54 ;;=SQUASH, WINTER, ALL VAR, BAKED, W/SALT^11-863^cups^205^100^N
+55 ;;^UTILITY(U,$J,112,1885,1)
+56 ;;=.89^.63^8.75^39^89.02^^^14^.33^8^20^437^237^.26^.095^.211^^3557^9.6^.085
+57 ;;^UTILITY(U,$J,112,1885,2)
+58 ;;=.024^.701^.35^.072^28^0^.099^.165^0^.13^.047^.265^356^.72
+59 ;;^UTILITY(U,$J,112,1885,3)
+60 ;;=.013^.027^.035^.05^.033^.011^.008^.035^.03^.038^.049^.017^.037^.095^.155^.033^.032^.035
+61 ;;^UTILITY(U,$J,112,1885,4)
+62 ;;=^.003^.002^.112^.003^.013^.043
+63 ;;^UTILITY(U,$J,112,1885,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,1888,0)
+66 ;;=SQUASH, ACORN, BAKED, WO/SALT^11-483^halves^156^80^N
+67 ;;^UTILITY(U,$J,112,1888,1)
+68 ;;=1.12^.14^14.58^56^82.9^^^44^.93^43^45^437^4^.17^.086^.242^^428^10.8^.167
+69 ;;^UTILITY(U,$J,112,1888,2)
+70 ;;=.013^.881^.504^.194^18.7^0^.022^.037^0^.029^.01^.059^43^1.26
+71 ;;^UTILITY(U,$J,112,1888,3)
+72 ;;=.016^.033^.044^.064^.041^.014^.01^.044^.038^.048^.062^.021^.047^.12^.196^.041^.04^.044
+73 ;;^UTILITY(U,$J,112,1888,4)
+74 ;;=^.001^0^.025^.001^.003^.009
+75 ;;^UTILITY(U,$J,112,1888,20)
+76 ;;=USDA Std. Reference, Release 10
+77 ;;^UTILITY(U,$J,112,1889,0)
+78 ;;=SQUASH, ACORN, BAKED, W/SALT^11-864^halves^156^80^N
+79 ;;^UTILITY(U,$J,112,1889,1)
+80 ;;=1.12^.14^14.58^56^82.9^^^44^.93^43^45^437^240^.17^.086^.242^^428^10.8^.167
+81 ;;^UTILITY(U,$J,112,1889,2)
+82 ;;=.013^.881^.504^.194^18.7^0^.022^.037^0^.029^.01^.059^43^1.26
+83 ;;^UTILITY(U,$J,112,1889,3)
+84 ;;=.016^.033^.044^.064^.041^.014^.01^.044^.038^.048^.062^.021^.047^.12^.196^.041^.04^.044
+85 ;;^UTILITY(U,$J,112,1889,4)
+86 ;;=^.001^0^.025^.001^.003^.009
+87 ;;^UTILITY(U,$J,112,1889,20)
+88 ;;=USDA Std. Reference, Release 10
+89 ;;^UTILITY(U,$J,112,1890,0)
+90 ;;=SQUASH, ACORN, BOILED, MASHED, WO/SALT^11-484^cups^245^100^N
+91 ;;^UTILITY(U,$J,112,1890,1)
+92 ;;=.67^.08^8.78^34^89.7^^^26^.56^26^27^263^3^.11^.052^.146^^258^6.5^.1
+93 ;;^UTILITY(U,$J,112,1890,2)
+94 ;;=.008^.531^.303^.117^11.3^0^.013^.022^0^.017^.006^.035^26^.76
+95 ;;^UTILITY(U,$J,112,1890,3)
+96 ;;=.01^.02^.026^.038^.025^.008^.006^.026^.023^.029^.037^.013^.028^.072^.118^.025^.024^.026
+97 ;;^UTILITY(U,$J,112,1890,4)
+98 ;;=^0^0^.015^0^.002^.006
+99 ;;^UTILITY(U,$J,112,1890,20)
+100 ;;=USDA Std. Reference, Release 10
+101 ;;^UTILITY(U,$J,112,1891,0)
+102 ;;=SQUASH, ACORN, BOILED, MASHED, W/SALT^11-865^cups^245^100^N
