FHINI05Y ; ; 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,2050,4)
;;=^0^0^.043^0^.004^.022
;;^UTILITY(U,$J,112,2050,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2051,0)
;;=PEAS AND ONIONS, CND, W/SALT^11-324^cups^120^100^N
;;^UTILITY(U,$J,112,2051,1)
;;=3.28^.38^8.57^51^86.4^^^17^.87^16^51^96^442^.58^.1^.255^^161^3^.1
;;^UTILITY(U,$J,112,2051,2)
;;=.07^1.28^.159^.192^26.6^0^.145^.03^0^.068^.036^.176^16^1.37
;;^UTILITY(U,$J,112,2051,3)
;;=.024^.12^.118^.191^.19^.048^.022^.119^.07^.138^.27^.064^.142^.293^.454^.113^.105^.109
;;^UTILITY(U,$J,112,2051,4)
;;=^^0^.061^^.006^.036
;;^UTILITY(U,$J,112,2051,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2052,0)
;;=PEAS AND ONIONS, FRZ, CKD, WO/SALT^11-327^cups^160^100^N
;;^UTILITY(U,$J,112,2052,1)
;;=2.54^.2^8.63^45^88.18^^^14^.94^13^34^117^37^.29^.063^.166^^347^6.9^.15
;;^UTILITY(U,$J,112,2052,2)
;;=.069^1.044^.09^.087^19.9^0^.078^.016^0^.036^.019^.094^35^.45^^^3
;;^UTILITY(U,$J,112,2052,3)
;;=.019^.093^.091^.148^.147^.037^.017^.092^.054^.107^.209^.049^.11^.227^.351^.087^.081^.084
;;^UTILITY(U,$J,112,2052,4)
;;=^^0^.033^^.003^.019
;;^UTILITY(U,$J,112,2052,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2053,0)
;;=PEPPERS, SWEET, GREEN, CND^11-335^cups^140^100^N
;;^UTILITY(U,$J,112,2053,1)
;;=.8^.3^3.9^18^91.25^^^41^.8^11^20^146^1369^.18^.13^.16^^155^46.5^.025
;;^UTILITY(U,$J,112,2053,2)
;;=.03^.55^.038^.178^16.3^0^.146^.015^0^.045^.02^.161^16^3.75^^^1.2
;;^UTILITY(U,$J,112,2053,3)
;;=.01^.029^.026^.042^.036^.01^.015^.025^.017^.034^.038^.016^.033^.114^.106^.03^.035^.032
;;^UTILITY(U,$J,112,2053,4)
;;=^0^.001^.033^.002^.011^.018
;;^UTILITY(U,$J,112,2053,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2054,0)
;;=POTATOES, HASHED BROWN, FRZ, W/BUTTER SAUCE, PREPARED^11-393^cups^210^100^N
;;^UTILITY(U,$J,112,2054,1)
;;=2.46^8.79^24.13^178^63.71^^^33^.99^15^38^327^101^.33^.102^.244^^111^3.8^.052
;;^UTILITY(U,$J,112,2054,2)
;;=.031^1.421^.367^.266^13.2^0^1.634^.18^23^3.373^3.149^1.814^16^.92
;;^UTILITY(U,$J,112,2054,4)
;;=.11^.123^.444^1.581^.114^.751^2.965
;;^UTILITY(U,$J,112,2054,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2055,0)
;;=POTATOES, O'BRIEN, FRZ, PREPARED^11-397^cups^194^100^N
;;^UTILITY(U,$J,112,2055,1)
;;=2.22^13.21^21.86^204^61.96^^^20^.96^34^93^473^43^.55^.241^.226^^188^10.4^.052
;;^UTILITY(U,$J,112,2055,2)
;;=.135^1.448^.732^.377^12.3^0^3.252^.221^^3.313^5.824^3.474^19^.75
;;^UTILITY(U,$J,112,2055,3)
;;=.034^.08^.089^.131^.132^.034^.03^.095^.079^.12^.111^.048^.069^.513^.368^.068^.08^.095
;;^UTILITY(U,$J,112,2055,4)
;;=.001^.003^.053^1.864^.001^1.39^5.822
;;^UTILITY(U,$J,112,2055,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2056,0)
;;=POTATO PUFFS, FRZ, PREPARED^11-399^puffs^7^100^N
;;^UTILITY(U,$J,112,2056,1)
;;=3.35^10.73^30.48^222^52.9^^^30^1.56^19^48^380^746^.3^.06^.271^^16^6.9^.196
;;^UTILITY(U,$J,112,2056,2)
;;=.072^2.162^.658^.231^16.5^0^.804^^0^5.095^4.355^.804^2^2.55^^^3.2
;;^UTILITY(U,$J,112,2056,4)
;;=^^^4.355^^.74^4.355
;;^UTILITY(U,$J,112,2056,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2057,0)
;;=POTATOES, FRZ, WHOLE, CKD, WO/SALT^11-401^cups^156^100^N
;;^UTILITY(U,$J,112,2057,1)
;;=1.98^.13^14.52^65^82.8^^^7^.84^11^26^287^20^.25^.078^.185^^0^9.4^.102
;;^UTILITY(U,$J,112,2057,2)
;;=.025^1.326^.28^.202^8.4^0^.042^.013^0^.034^.003^.056^0^.57
;;^UTILITY(U,$J,112,2057,3)
;;=.031^.072^.08^.119^.12^.031^.025^.088^.073^.111^.091^.043^.061^.483^.331^.059^.071^.086
;;^UTILITY(U,$J,112,2057,4)
;;=.001^.004^.001^.021^.001^.005^.001
;;^UTILITY(U,$J,112,2057,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2058,0)
;;=POTATOES, FRZ, FRENCH-FRIED, RESTAURANT-PREP^11-404^strips^5^100^N
;;^UTILITY(U,$J,112,2058,1)
;;=4.03^16.57^39.56^315^37.99^^^19^.76^34^93^732^216^.38^.137^.192^^0^10.3^.177
;;^UTILITY(U,$J,112,2058,2)
;;=.028^3.25^.655^.236^29^0^7.552^^0^5^3.286^7.552^0^1.86^^^3.2
;;^UTILITY(U,$J,112,2058,3)
;;=.054^.183^.174^.243^.214^.045^.025^.172^.101^.205^.191^.068^.139^.934^.63^.146^.13^.145
;;^UTILITY(U,$J,112,2058,4)
;;=^^.119^4.365^.206^.516^3.079
;;^UTILITY(U,$J,112,2058,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2059,0)
;;=PUMPKIN, CKD, WO/SALT^11-423^cups^245^100^N
;;^UTILITY(U,$J,112,2059,1)
;;=.72^.07^4.89^20^93.69^^^15^.57^9^30^230^1^.23^.091^.089^^1082^4.7^.031
;;^UTILITY(U,$J,112,2059,2)
;;=.078^.413^.201^.044^8.5^0^.002^.002^0^.037^.009^.004^108^.62
;;^UTILITY(U,$J,112,2059,3)
;;=.009^.021^.023^.034^.039^.008^.002^.023^.03^.025^.039^.011^.02^.074^.133^.019^.019^.032
FHINI05Y ; ; 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,2050,4)
+2 ;;=^0^0^.043^0^.004^.022
+3 ;;^UTILITY(U,$J,112,2050,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,2051,0)
+6 ;;=PEAS AND ONIONS, CND, W/SALT^11-324^cups^120^100^N
+7 ;;^UTILITY(U,$J,112,2051,1)
+8 ;;=3.28^.38^8.57^51^86.4^^^17^.87^16^51^96^442^.58^.1^.255^^161^3^.1
+9 ;;^UTILITY(U,$J,112,2051,2)
+10 ;;=.07^1.28^.159^.192^26.6^0^.145^.03^0^.068^.036^.176^16^1.37
+11 ;;^UTILITY(U,$J,112,2051,3)
+12 ;;=.024^.12^.118^.191^.19^.048^.022^.119^.07^.138^.27^.064^.142^.293^.454^.113^.105^.109
+13 ;;^UTILITY(U,$J,112,2051,4)
+14 ;;=^^0^.061^^.006^.036
+15 ;;^UTILITY(U,$J,112,2051,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,2052,0)
+18 ;;=PEAS AND ONIONS, FRZ, CKD, WO/SALT^11-327^cups^160^100^N
+19 ;;^UTILITY(U,$J,112,2052,1)
+20 ;;=2.54^.2^8.63^45^88.18^^^14^.94^13^34^117^37^.29^.063^.166^^347^6.9^.15
+21 ;;^UTILITY(U,$J,112,2052,2)
+22 ;;=.069^1.044^.09^.087^19.9^0^.078^.016^0^.036^.019^.094^35^.45^^^3
+23 ;;^UTILITY(U,$J,112,2052,3)
+24 ;;=.019^.093^.091^.148^.147^.037^.017^.092^.054^.107^.209^.049^.11^.227^.351^.087^.081^.084
+25 ;;^UTILITY(U,$J,112,2052,4)
+26 ;;=^^0^.033^^.003^.019
+27 ;;^UTILITY(U,$J,112,2052,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,2053,0)
+30 ;;=PEPPERS, SWEET, GREEN, CND^11-335^cups^140^100^N
+31 ;;^UTILITY(U,$J,112,2053,1)
+32 ;;=.8^.3^3.9^18^91.25^^^41^.8^11^20^146^1369^.18^.13^.16^^155^46.5^.025
+33 ;;^UTILITY(U,$J,112,2053,2)
+34 ;;=.03^.55^.038^.178^16.3^0^.146^.015^0^.045^.02^.161^16^3.75^^^1.2
+35 ;;^UTILITY(U,$J,112,2053,3)
+36 ;;=.01^.029^.026^.042^.036^.01^.015^.025^.017^.034^.038^.016^.033^.114^.106^.03^.035^.032
+37 ;;^UTILITY(U,$J,112,2053,4)
+38 ;;=^0^.001^.033^.002^.011^.018
+39 ;;^UTILITY(U,$J,112,2053,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,2054,0)
+42 ;;=POTATOES, HASHED BROWN, FRZ, W/BUTTER SAUCE, PREPARED^11-393^cups^210^100^N
+43 ;;^UTILITY(U,$J,112,2054,1)
+44 ;;=2.46^8.79^24.13^178^63.71^^^33^.99^15^38^327^101^.33^.102^.244^^111^3.8^.052
+45 ;;^UTILITY(U,$J,112,2054,2)
+46 ;;=.031^1.421^.367^.266^13.2^0^1.634^.18^23^3.373^3.149^1.814^16^.92
+47 ;;^UTILITY(U,$J,112,2054,4)
+48 ;;=.11^.123^.444^1.581^.114^.751^2.965
+49 ;;^UTILITY(U,$J,112,2054,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,2055,0)
+52 ;;=POTATOES, O'BRIEN, FRZ, PREPARED^11-397^cups^194^100^N
+53 ;;^UTILITY(U,$J,112,2055,1)
+54 ;;=2.22^13.21^21.86^204^61.96^^^20^.96^34^93^473^43^.55^.241^.226^^188^10.4^.052
+55 ;;^UTILITY(U,$J,112,2055,2)
+56 ;;=.135^1.448^.732^.377^12.3^0^3.252^.221^^3.313^5.824^3.474^19^.75
+57 ;;^UTILITY(U,$J,112,2055,3)
+58 ;;=.034^.08^.089^.131^.132^.034^.03^.095^.079^.12^.111^.048^.069^.513^.368^.068^.08^.095
+59 ;;^UTILITY(U,$J,112,2055,4)
+60 ;;=.001^.003^.053^1.864^.001^1.39^5.822
+61 ;;^UTILITY(U,$J,112,2055,20)
+62 ;;=USDA Std. Reference, Release 10
+63 ;;^UTILITY(U,$J,112,2056,0)
+64 ;;=POTATO PUFFS, FRZ, PREPARED^11-399^puffs^7^100^N
+65 ;;^UTILITY(U,$J,112,2056,1)
+66 ;;=3.35^10.73^30.48^222^52.9^^^30^1.56^19^48^380^746^.3^.06^.271^^16^6.9^.196
+67 ;;^UTILITY(U,$J,112,2056,2)
+68 ;;=.072^2.162^.658^.231^16.5^0^.804^^0^5.095^4.355^.804^2^2.55^^^3.2
+69 ;;^UTILITY(U,$J,112,2056,4)
+70 ;;=^^^4.355^^.74^4.355
+71 ;;^UTILITY(U,$J,112,2056,20)
+72 ;;=USDA Std. Reference, Release 10
+73 ;;^UTILITY(U,$J,112,2057,0)
+74 ;;=POTATOES, FRZ, WHOLE, CKD, WO/SALT^11-401^cups^156^100^N
+75 ;;^UTILITY(U,$J,112,2057,1)
+76 ;;=1.98^.13^14.52^65^82.8^^^7^.84^11^26^287^20^.25^.078^.185^^0^9.4^.102
+77 ;;^UTILITY(U,$J,112,2057,2)
+78 ;;=.025^1.326^.28^.202^8.4^0^.042^.013^0^.034^.003^.056^0^.57
+79 ;;^UTILITY(U,$J,112,2057,3)
+80 ;;=.031^.072^.08^.119^.12^.031^.025^.088^.073^.111^.091^.043^.061^.483^.331^.059^.071^.086
+81 ;;^UTILITY(U,$J,112,2057,4)
+82 ;;=.001^.004^.001^.021^.001^.005^.001
+83 ;;^UTILITY(U,$J,112,2057,20)
+84 ;;=USDA Std. Reference, Release 10
+85 ;;^UTILITY(U,$J,112,2058,0)
+86 ;;=POTATOES, FRZ, FRENCH-FRIED, RESTAURANT-PREP^11-404^strips^5^100^N
+87 ;;^UTILITY(U,$J,112,2058,1)
+88 ;;=4.03^16.57^39.56^315^37.99^^^19^.76^34^93^732^216^.38^.137^.192^^0^10.3^.177
+89 ;;^UTILITY(U,$J,112,2058,2)
+90 ;;=.028^3.25^.655^.236^29^0^7.552^^0^5^3.286^7.552^0^1.86^^^3.2
+91 ;;^UTILITY(U,$J,112,2058,3)
+92 ;;=.054^.183^.174^.243^.214^.045^.025^.172^.101^.205^.191^.068^.139^.934^.63^.146^.13^.145
+93 ;;^UTILITY(U,$J,112,2058,4)
+94 ;;=^^.119^4.365^.206^.516^3.079
+95 ;;^UTILITY(U,$J,112,2058,20)
+96 ;;=USDA Std. Reference, Release 10
+97 ;;^UTILITY(U,$J,112,2059,0)
+98 ;;=PUMPKIN, CKD, WO/SALT^11-423^cups^245^100^N
+99 ;;^UTILITY(U,$J,112,2059,1)
+100 ;;=.72^.07^4.89^20^93.69^^^15^.57^9^30^230^1^.23^.091^.089^^1082^4.7^.031
+101 ;;^UTILITY(U,$J,112,2059,2)
+102 ;;=.078^.413^.201^.044^8.5^0^.002^.002^0^.037^.009^.004^108^.62
+103 ;;^UTILITY(U,$J,112,2059,3)
+104 ;;=.009^.021^.023^.034^.039^.008^.002^.023^.03^.025^.039^.011^.02^.074^.133^.019^.019^.032
