FHINI07V ; ; 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,2733,2)
;;=.04^.42^.408^.118^18.1^0^^^0^^^^5^.38
;;^UTILITY(U,$J,112,2733,3)
;;=.008^.031^.033^.058^.03^.001^^.036^.024^.047^.026^.011^.038^.069^.094^.031^.033^.035
;;^UTILITY(U,$J,112,2733,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2734,0)
;;=CHERIMOYA, RAW^9-062^fruits^547^65^N
;;^UTILITY(U,$J,112,2734,1)
;;=1.3^.4^24^94^73.5^^^23^.5^^40^^^^^^^10^9^.1
;;^UTILITY(U,$J,112,2734,2)
;;=.11^1.3^^^^0^^^0^^^^1^.8^^^2.4
;;^UTILITY(U,$J,112,2734,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2735,0)
;;=CHICKEN, BROILERS OR FRYERS, BACK, MEAT ONLY, FRIED^5-054^backs^35^54^N
;;^UTILITY(U,$J,112,2735,1)
;;=29.99^15.32^5.68^288^47.87^^^26^1.65^25^176^251^99^2.8^.095^.047^^98^0^.109
;;^UTILITY(U,$J,112,2735,2)
;;=.253^7.68^1.198^.35^9^.31^3.08^.15^93^4.12^5.73^3.64^29^1.15^^^0
;;^UTILITY(U,$J,112,2735,3)
;;=.352^1.258^1.577^2.251^2.5^.823^.392^1.202^1.01^1.486^1.793^.924^1.62^2.638^4.672^1.464^1.299^1.049
;;^UTILITY(U,$J,112,2735,4)
;;=0^.04^.1^2.79^.65^1.07^4.94^.19
;;^UTILITY(U,$J,112,2735,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2736,0)
;;=CHICKEN, BROILERS OR FRYERS, BACK, MEAT ONLY, ROASTED^5-055^backs^24^40^N
;;^UTILITY(U,$J,112,2736,1)
;;=28.19^13.16^0^239^58.75^^^24^1.39^22^165^237^96^2.65^.081^.022^^95^0^.068
;;^UTILITY(U,$J,112,2736,2)
;;=.217^7.069^1.13^.34^7^.3^2.53^.12^90^3.6^4.83^3.05^28^1.08^^^0
;;^UTILITY(U,$J,112,2736,3)
;;=.329^1.191^1.488^2.115^2.395^.78^.361^1.118^.952^1.398^1.7^.875^1.538^2.512^4.221^1.385^1.159^.97
;;^UTILITY(U,$J,112,2736,4)
;;=0^.04^.1^2.5^.66^.84^4.03^.19
;;^UTILITY(U,$J,112,2736,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2737,0)
;;=CHICKEN, BROILERS OR FRYERS, BACK, MEAT ONLY, STEWED^5-056^backs^26^36^N
;;^UTILITY(U,$J,112,2737,1)
;;=25.31^11.19^0^209^64.33^^^21^1.27^17^130^158^67^2.38^.071^.02^^90^0^.047
;;^UTILITY(U,$J,112,2737,2)
;;=.173^4.556^.836^.2^7^.21^2.15^.1^85^3.04^4.02^2.62^27^.73^^^0
;;^UTILITY(U,$J,112,2737,3)
;;=.296^1.069^1.336^1.899^2.15^.7^.324^1.004^.854^1.255^1.526^.786^1.381^2.255^3.79^1.243^1.041^.871
;;^UTILITY(U,$J,112,2737,4)
;;=0^.04^.08^2.1^.55^.72^3.35^.17
;;^UTILITY(U,$J,112,2737,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2738,0)
;;=CHICKEN, BROILERS OR FRYERS, GIBLETS, FRIED^5-021^giblets^13^100^N
;;^UTILITY(U,$J,112,2738,1)
;;=32.54^13.46^4.35^277^47.89^^^18^10.32^25^286^330^113^6.27^.422^.222^^11929^8.7^.097
;;^UTILITY(U,$J,112,2738,2)
;;=1.524^10.987^4.453^.61^379^13.31^2.69^.13^446^3.8^4.42^3.38^3579^1.77^^^0
;;^UTILITY(U,$J,112,2738,3)
;;=.373^1.467^1.63^2.601^2.348^.81^.437^1.48^1.067^1.737^2.159^.759^1.587^3.021^5.055^1.783^1.696^1.43
;;^UTILITY(U,$J,112,2738,4)
;;=0^0^.06^2.11^.29^1.42^4.12^.48
;;^UTILITY(U,$J,112,2738,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2739,0)
;;=CHICKEN, BROILERS OR FRYERS, GIBLETS, SIMMERED^5-022^giblets^14^100^N
;;^UTILITY(U,$J,112,2739,1)
;;=25.85^4.77^.95^157^67.59^^^12^6.44^20^229^158^58^4.57^.255^.17^^7431^8^.087
;;^UTILITY(U,$J,112,2739,2)
;;=.953^4.103^2.959^.34^376^10.14^.73^.02^393^1.49^1.19^1.08^2229^.85^^^0
;;^UTILITY(U,$J,112,2739,3)
;;=.295^1.172^1.297^2.066^1.886^.646^.343^1.17^.848^1.379^1.727^.602^1.267^2.421^3.923^1.423^1.316^1.13
;;^UTILITY(U,$J,112,2739,4)
;;=0^0^.02^.82^.17^.55^1.02^.26
;;^UTILITY(U,$J,112,2739,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2740,0)
;;=CHICKEN, BROILERS OR FRYERS, NECK, MEAT ONLY, FRIED^5-089^necks^7^44^N
;;^UTILITY(U,$J,112,2740,1)
;;=26.87^11.88^1.77^229^58.71^^^41^2.98^20^135^213^99^4.24^.161^.05^^162^0^.07
;;^UTILITY(U,$J,112,2740,2)
;;=.318^5.027^1.165^.35^8^.3^2.63^.15^105^3^4.57^3.04^49^.78^^^0
;;^UTILITY(U,$J,112,2740,3)
;;=.314^1.132^1.417^2.016^2.267^.742^.346^1.069^.907^1.333^1.616^.832^1.461^2.383^4.081^1.317^1.125^.93
;;^UTILITY(U,$J,112,2740,4)
;;=0^.02^.06^1.83^.24^1.05^4.3^.13
;;^UTILITY(U,$J,112,2740,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2741,0)
;;=CHICKEN, BROILERS OR FRYERS, NECK, MEAT ONLY, SIMMERED^5-090^necks^5^33^N
;;^UTILITY(U,$J,112,2741,1)
;;=24.56^8.18^0^179^67.05^^^44^2.63^16^128^140^64^3.77^.129^.048^^121^0^.046
;;^UTILITY(U,$J,112,2741,2)
;;=.283^3.956^.671^.16^6^.17^1.56^.07^79^2.1^2.54^2.03^36^.77^^^0
;;^UTILITY(U,$J,112,2741,3)
;;=.287^1.037^1.297^1.843^2.086^.68^.314^.974^.829^1.218^1.481^.762^1.34^2.188^3.678^1.206^1.01^.845
;;^UTILITY(U,$J,112,2741,4)
;;=0^.04^.05^1.4^.37^.55^2.11^.2
;;^UTILITY(U,$J,112,2741,20)
;;=USDA Std. Reference, Release 10
FHINI07V ; ; 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,2733,2)
+2 ;;=.04^.42^.408^.118^18.1^0^^^0^^^^5^.38
+3 ;;^UTILITY(U,$J,112,2733,3)
+4 ;;=.008^.031^.033^.058^.03^.001^^.036^.024^.047^.026^.011^.038^.069^.094^.031^.033^.035
+5 ;;^UTILITY(U,$J,112,2733,20)
+6 ;;=USDA Std. Reference, Release 10
+7 ;;^UTILITY(U,$J,112,2734,0)
+8 ;;=CHERIMOYA, RAW^9-062^fruits^547^65^N
+9 ;;^UTILITY(U,$J,112,2734,1)
+10 ;;=1.3^.4^24^94^73.5^^^23^.5^^40^^^^^^^10^9^.1
+11 ;;^UTILITY(U,$J,112,2734,2)
+12 ;;=.11^1.3^^^^0^^^0^^^^1^.8^^^2.4
+13 ;;^UTILITY(U,$J,112,2734,20)
+14 ;;=USDA Std. Reference, Release 10
+15 ;;^UTILITY(U,$J,112,2735,0)
+16 ;;=CHICKEN, BROILERS OR FRYERS, BACK, MEAT ONLY, FRIED^5-054^backs^35^54^N
+17 ;;^UTILITY(U,$J,112,2735,1)
+18 ;;=29.99^15.32^5.68^288^47.87^^^26^1.65^25^176^251^99^2.8^.095^.047^^98^0^.109
+19 ;;^UTILITY(U,$J,112,2735,2)
+20 ;;=.253^7.68^1.198^.35^9^.31^3.08^.15^93^4.12^5.73^3.64^29^1.15^^^0
+21 ;;^UTILITY(U,$J,112,2735,3)
+22 ;;=.352^1.258^1.577^2.251^2.5^.823^.392^1.202^1.01^1.486^1.793^.924^1.62^2.638^4.672^1.464^1.299^1.049
+23 ;;^UTILITY(U,$J,112,2735,4)
+24 ;;=0^.04^.1^2.79^.65^1.07^4.94^.19
+25 ;;^UTILITY(U,$J,112,2735,20)
+26 ;;=USDA Std. Reference, Release 10
+27 ;;^UTILITY(U,$J,112,2736,0)
+28 ;;=CHICKEN, BROILERS OR FRYERS, BACK, MEAT ONLY, ROASTED^5-055^backs^24^40^N
+29 ;;^UTILITY(U,$J,112,2736,1)
+30 ;;=28.19^13.16^0^239^58.75^^^24^1.39^22^165^237^96^2.65^.081^.022^^95^0^.068
+31 ;;^UTILITY(U,$J,112,2736,2)
+32 ;;=.217^7.069^1.13^.34^7^.3^2.53^.12^90^3.6^4.83^3.05^28^1.08^^^0
+33 ;;^UTILITY(U,$J,112,2736,3)
+34 ;;=.329^1.191^1.488^2.115^2.395^.78^.361^1.118^.952^1.398^1.7^.875^1.538^2.512^4.221^1.385^1.159^.97
+35 ;;^UTILITY(U,$J,112,2736,4)
+36 ;;=0^.04^.1^2.5^.66^.84^4.03^.19
+37 ;;^UTILITY(U,$J,112,2736,20)
+38 ;;=USDA Std. Reference, Release 10
+39 ;;^UTILITY(U,$J,112,2737,0)
+40 ;;=CHICKEN, BROILERS OR FRYERS, BACK, MEAT ONLY, STEWED^5-056^backs^26^36^N
+41 ;;^UTILITY(U,$J,112,2737,1)
+42 ;;=25.31^11.19^0^209^64.33^^^21^1.27^17^130^158^67^2.38^.071^.02^^90^0^.047
+43 ;;^UTILITY(U,$J,112,2737,2)
+44 ;;=.173^4.556^.836^.2^7^.21^2.15^.1^85^3.04^4.02^2.62^27^.73^^^0
+45 ;;^UTILITY(U,$J,112,2737,3)
+46 ;;=.296^1.069^1.336^1.899^2.15^.7^.324^1.004^.854^1.255^1.526^.786^1.381^2.255^3.79^1.243^1.041^.871
+47 ;;^UTILITY(U,$J,112,2737,4)
+48 ;;=0^.04^.08^2.1^.55^.72^3.35^.17
+49 ;;^UTILITY(U,$J,112,2737,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,2738,0)
+52 ;;=CHICKEN, BROILERS OR FRYERS, GIBLETS, FRIED^5-021^giblets^13^100^N
+53 ;;^UTILITY(U,$J,112,2738,1)
+54 ;;=32.54^13.46^4.35^277^47.89^^^18^10.32^25^286^330^113^6.27^.422^.222^^11929^8.7^.097
+55 ;;^UTILITY(U,$J,112,2738,2)
+56 ;;=1.524^10.987^4.453^.61^379^13.31^2.69^.13^446^3.8^4.42^3.38^3579^1.77^^^0
+57 ;;^UTILITY(U,$J,112,2738,3)
+58 ;;=.373^1.467^1.63^2.601^2.348^.81^.437^1.48^1.067^1.737^2.159^.759^1.587^3.021^5.055^1.783^1.696^1.43
+59 ;;^UTILITY(U,$J,112,2738,4)
+60 ;;=0^0^.06^2.11^.29^1.42^4.12^.48
+61 ;;^UTILITY(U,$J,112,2738,20)
+62 ;;=USDA Std. Reference, Release 10
+63 ;;^UTILITY(U,$J,112,2739,0)
+64 ;;=CHICKEN, BROILERS OR FRYERS, GIBLETS, SIMMERED^5-022^giblets^14^100^N
+65 ;;^UTILITY(U,$J,112,2739,1)
+66 ;;=25.85^4.77^.95^157^67.59^^^12^6.44^20^229^158^58^4.57^.255^.17^^7431^8^.087
+67 ;;^UTILITY(U,$J,112,2739,2)
+68 ;;=.953^4.103^2.959^.34^376^10.14^.73^.02^393^1.49^1.19^1.08^2229^.85^^^0
+69 ;;^UTILITY(U,$J,112,2739,3)
+70 ;;=.295^1.172^1.297^2.066^1.886^.646^.343^1.17^.848^1.379^1.727^.602^1.267^2.421^3.923^1.423^1.316^1.13
+71 ;;^UTILITY(U,$J,112,2739,4)
+72 ;;=0^0^.02^.82^.17^.55^1.02^.26
+73 ;;^UTILITY(U,$J,112,2739,20)
+74 ;;=USDA Std. Reference, Release 10
+75 ;;^UTILITY(U,$J,112,2740,0)
+76 ;;=CHICKEN, BROILERS OR FRYERS, NECK, MEAT ONLY, FRIED^5-089^necks^7^44^N
+77 ;;^UTILITY(U,$J,112,2740,1)
+78 ;;=26.87^11.88^1.77^229^58.71^^^41^2.98^20^135^213^99^4.24^.161^.05^^162^0^.07
+79 ;;^UTILITY(U,$J,112,2740,2)
+80 ;;=.318^5.027^1.165^.35^8^.3^2.63^.15^105^3^4.57^3.04^49^.78^^^0
+81 ;;^UTILITY(U,$J,112,2740,3)
+82 ;;=.314^1.132^1.417^2.016^2.267^.742^.346^1.069^.907^1.333^1.616^.832^1.461^2.383^4.081^1.317^1.125^.93
+83 ;;^UTILITY(U,$J,112,2740,4)
+84 ;;=0^.02^.06^1.83^.24^1.05^4.3^.13
+85 ;;^UTILITY(U,$J,112,2740,20)
+86 ;;=USDA Std. Reference, Release 10
+87 ;;^UTILITY(U,$J,112,2741,0)
+88 ;;=CHICKEN, BROILERS OR FRYERS, NECK, MEAT ONLY, SIMMERED^5-090^necks^5^33^N
+89 ;;^UTILITY(U,$J,112,2741,1)
+90 ;;=24.56^8.18^0^179^67.05^^^44^2.63^16^128^140^64^3.77^.129^.048^^121^0^.046
+91 ;;^UTILITY(U,$J,112,2741,2)
+92 ;;=.283^3.956^.671^.16^6^.17^1.56^.07^79^2.1^2.54^2.03^36^.77^^^0
+93 ;;^UTILITY(U,$J,112,2741,3)
+94 ;;=.287^1.037^1.297^1.843^2.086^.68^.314^.974^.829^1.218^1.481^.762^1.34^2.188^3.678^1.206^1.01^.845
+95 ;;^UTILITY(U,$J,112,2741,4)
+96 ;;=0^.04^.05^1.4^.37^.55^2.11^.2
+97 ;;^UTILITY(U,$J,112,2741,20)
+98 ;;=USDA Std. Reference, Release 10