FHINI079 ; ; 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,2532,4)
;;=.005^.016^.189^2.729^.491^1.523^6.694^.045
;;^UTILITY(U,$J,112,2532,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2533,0)
;;=FF, CHICKEN, BREADED AND FRIED, BNLS PIECES, W/ MUST. SAUCE^21-040^pieces^21.7^100^N
;;^UTILITY(U,$J,112,2533,1)
;;=13.4^14.57^16.04^248^54.24^^^19^1.14^20^168^215^608^.88^.129^.127^^84^.3^.09
;;^UTILITY(U,$J,112,2533,2)
;;=.12^5.34^.71^.24^9^.24^2.016^.183^47^4.397^6.947^2.238^25^1.76
;;^UTILITY(U,$J,112,2533,3)
;;=.155^.522^.654^.964^.97^.341^.189^.542^.434^.637^.744^.379^.664^1.068^2.26^.599^.666^.499
;;^UTILITY(U,$J,112,2533,4)
;;=.004^.014^.168^2.539^.441^1.392^6.236^.04
;;^UTILITY(U,$J,112,2533,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2534,0)
;;=FF, CHICKEN, BREADED AND FRIED, BNLS PIECES, W/SWEET & SOUR^21-041^pieces^21.7^100^N
;;^UTILITY(U,$J,112,2534,1)
;;=13.04^13.81^22.27^266^49.21^^^16^1.14^18^162^213^521^.84^.131^.116^^186^.6^.08
;;^UTILITY(U,$J,112,2534,2)
;;=.15^5.28^.71^.25^9^.28^1.605^.074^47^4.242^6.651^1.718^56^1.67
;;^UTILITY(U,$J,112,2534,3)
;;=.155^.522^.654^.964^.97^.341^.189^.542^.434^.637^.744^.379^.664^1.068^2.26^.599^.666^.499
;;^UTILITY(U,$J,112,2534,4)
;;=.004^.014^.168^2.424^.436^1.353^5.945^.04
;;^UTILITY(U,$J,112,2534,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2535,0)
;;=FF, CHILI CON CARNE^21-042^cups^253^100^N
;;^UTILITY(U,$J,112,2535,1)
;;=9.73^3.27^8.67^101^76.7^^^27^2.05^18^78^273^398^1.41^.235^.157^^657^.6^.05
;;^UTILITY(U,$J,112,2535,2)
;;=.45^.98^1.42^.13^12^.45^.12^.089^53^1.356^1.347^.209^66^1.64
;;^UTILITY(U,$J,112,2535,3)
;;=.116^.392^.403^.735^.727^.19^.1^.4^.283^.459^.61^.284^.54^1.007^1.708^.582^.443^.406
;;^UTILITY(U,$J,112,2535,4)
;;=.012^.008^.082^.969^.047^.285^1.3^^2
;;^UTILITY(U,$J,112,2535,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2536,0)
;;=FF, CLAMS, BREADED AND FRIED^21-043^cups^153^100^N
;;^UTILITY(U,$J,112,2536,1)
;;=11.15^22.96^33.75^392^29.2^^^18^2.65^27^207^231^725^1.42^.083^.268^^106^0^.18
;;^UTILITY(U,$J,112,2536,2)
;;=.23^2.49^.26^.03^8^.96^^^76^5.742^9.948^5.89^32^2.95
;;^UTILITY(U,$J,112,2536,3)
;;=.131^.397^.466^.775^.539^.227^.187^.485^.331^.518^.608^.227^.512^.793^2.402^.505^.795^.554
;;^UTILITY(U,$J,112,2536,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2537,0)
;;=FF, CRAB, BAKED^21-044^cakes^60^100^N
;;^UTILITY(U,$J,112,2537,1)
;;=26.19^2.13^3.87^147^65.72^^^381^1.27^75^309^548^504^6.44^.99^.72^^71^2.4^.26
;;^UTILITY(U,$J,112,2537,2)
;;=.15^4.12^.38^.42^19^14.45^^^169^.382^.505^.709^21^2.09^^^0
;;^UTILITY(U,$J,112,2537,3)
;;=.365^1.056^1.265^2.07^2.229^.733^.306^1.115^.872^1.24^2.246^.532^1.466^2.665^4.521^1.55^.909^1.052
;;^UTILITY(U,$J,112,2537,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2538,0)
;;=FF, CRAB, SOFT-SHELL, FRIED^21-045^crabs^125^100^N
;;^UTILITY(U,$J,112,2538,1)
;;=8.79^14.29^24.96^267^49.86^^^44^1.45^20^105^130^894^.85^.15^.25^^12^.6^.08
;;^UTILITY(U,$J,112,2538,2)
;;=.06^1.4^.38^.12^16^3.58^^^36^3.52^6.15^3.905^3^2.1
;;^UTILITY(U,$J,112,2538,3)
;;=.114^.314^.393^.653^.559^.204^.116^.388^.257^.415^.606^.179^.423^.73^1.918^.453^.52^.376
;;^UTILITY(U,$J,112,2538,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2539,0)
;;=FF, CRAB CAKE^21-046^crabs^109^100^N
;;^UTILITY(U,$J,112,2539,1)
;;=18.75^17.25^8.52^266^53.38^^^337^1.86^42^378^270^819^3.54^.61^.47^^522^.3^.09
;;^UTILITY(U,$J,112,2539,2)
;;=.12^1.94^.45^.25^16^7.33^^^137^3.736^7.177^5.13^137^2.1
;;^UTILITY(U,$J,112,2539,3)
;;=.258^.75^.912^1.476^1.524^.513^.231^.813^.618^.909^1.539^.384^1.029^1.854^3.294^1.059^.717^.792
;;^UTILITY(U,$J,112,2539,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2540,0)
;;=FF, FISH FILLET, BATTERED OR BREADED, AND FRIED^21-047^fillets^91^100^N
;;^UTILITY(U,$J,112,2540,1)
;;=14.66^12.29^16.97^232^53.57^^^18^2.11^24^171^320^532^.44^.045^.185^^38^0^.11
;;^UTILITY(U,$J,112,2540,2)
;;=.11^2.1^.2^.1^56^1.11^5.784^.49^34^2.822^2.577^6.274^12^2.51
;;^UTILITY(U,$J,112,2540,3)
;;=.168^.626^.676^1.19^1.247^.417^.175^.602^.494^.76^.852^.425^.847^1.422^2.514^.688^.664^.628
;;^UTILITY(U,$J,112,2540,4)
;;=^^.128^2.262^^.431^2.577
;;^UTILITY(U,$J,112,2540,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2541,0)
;;=FF, OYSTERS, BATTERED OR BREADED, AND FRIED^21-048^oysters^23.2^100^N
;;^UTILITY(U,$J,112,2541,1)
;;=9.02^12.9^28.69^265^47.97^^^20^3.21^17^141^131^487^11.25^.573^.305^^261^3^.22
;;^UTILITY(U,$J,112,2541,2)
;;=.25^3.18^.76^.02^9^.73^^^78^3.294^4.979^3.337^78^1.41
FHINI079 ; ; 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,2532,4)
+2 ;;=.005^.016^.189^2.729^.491^1.523^6.694^.045
+3 ;;^UTILITY(U,$J,112,2532,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,2533,0)
+6 ;;=FF, CHICKEN, BREADED AND FRIED, BNLS PIECES, W/ MUST. SAUCE^21-040^pieces^21.7^100^N
+7 ;;^UTILITY(U,$J,112,2533,1)
+8 ;;=13.4^14.57^16.04^248^54.24^^^19^1.14^20^168^215^608^.88^.129^.127^^84^.3^.09
+9 ;;^UTILITY(U,$J,112,2533,2)
+10 ;;=.12^5.34^.71^.24^9^.24^2.016^.183^47^4.397^6.947^2.238^25^1.76
+11 ;;^UTILITY(U,$J,112,2533,3)
+12 ;;=.155^.522^.654^.964^.97^.341^.189^.542^.434^.637^.744^.379^.664^1.068^2.26^.599^.666^.499
+13 ;;^UTILITY(U,$J,112,2533,4)
+14 ;;=.004^.014^.168^2.539^.441^1.392^6.236^.04
+15 ;;^UTILITY(U,$J,112,2533,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,2534,0)
+18 ;;=FF, CHICKEN, BREADED AND FRIED, BNLS PIECES, W/SWEET & SOUR^21-041^pieces^21.7^100^N
+19 ;;^UTILITY(U,$J,112,2534,1)
+20 ;;=13.04^13.81^22.27^266^49.21^^^16^1.14^18^162^213^521^.84^.131^.116^^186^.6^.08
+21 ;;^UTILITY(U,$J,112,2534,2)
+22 ;;=.15^5.28^.71^.25^9^.28^1.605^.074^47^4.242^6.651^1.718^56^1.67
+23 ;;^UTILITY(U,$J,112,2534,3)
+24 ;;=.155^.522^.654^.964^.97^.341^.189^.542^.434^.637^.744^.379^.664^1.068^2.26^.599^.666^.499
+25 ;;^UTILITY(U,$J,112,2534,4)
+26 ;;=.004^.014^.168^2.424^.436^1.353^5.945^.04
+27 ;;^UTILITY(U,$J,112,2534,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,2535,0)
+30 ;;=FF, CHILI CON CARNE^21-042^cups^253^100^N
+31 ;;^UTILITY(U,$J,112,2535,1)
+32 ;;=9.73^3.27^8.67^101^76.7^^^27^2.05^18^78^273^398^1.41^.235^.157^^657^.6^.05
+33 ;;^UTILITY(U,$J,112,2535,2)
+34 ;;=.45^.98^1.42^.13^12^.45^.12^.089^53^1.356^1.347^.209^66^1.64
+35 ;;^UTILITY(U,$J,112,2535,3)
+36 ;;=.116^.392^.403^.735^.727^.19^.1^.4^.283^.459^.61^.284^.54^1.007^1.708^.582^.443^.406
+37 ;;^UTILITY(U,$J,112,2535,4)
+38 ;;=.012^.008^.082^.969^.047^.285^1.3^^2
+39 ;;^UTILITY(U,$J,112,2535,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,2536,0)
+42 ;;=FF, CLAMS, BREADED AND FRIED^21-043^cups^153^100^N
+43 ;;^UTILITY(U,$J,112,2536,1)
+44 ;;=11.15^22.96^33.75^392^29.2^^^18^2.65^27^207^231^725^1.42^.083^.268^^106^0^.18
+45 ;;^UTILITY(U,$J,112,2536,2)
+46 ;;=.23^2.49^.26^.03^8^.96^^^76^5.742^9.948^5.89^32^2.95
+47 ;;^UTILITY(U,$J,112,2536,3)
+48 ;;=.131^.397^.466^.775^.539^.227^.187^.485^.331^.518^.608^.227^.512^.793^2.402^.505^.795^.554
+49 ;;^UTILITY(U,$J,112,2536,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,2537,0)
+52 ;;=FF, CRAB, BAKED^21-044^cakes^60^100^N
+53 ;;^UTILITY(U,$J,112,2537,1)
+54 ;;=26.19^2.13^3.87^147^65.72^^^381^1.27^75^309^548^504^6.44^.99^.72^^71^2.4^.26
+55 ;;^UTILITY(U,$J,112,2537,2)
+56 ;;=.15^4.12^.38^.42^19^14.45^^^169^.382^.505^.709^21^2.09^^^0
+57 ;;^UTILITY(U,$J,112,2537,3)
+58 ;;=.365^1.056^1.265^2.07^2.229^.733^.306^1.115^.872^1.24^2.246^.532^1.466^2.665^4.521^1.55^.909^1.052
+59 ;;^UTILITY(U,$J,112,2537,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,2538,0)
+62 ;;=FF, CRAB, SOFT-SHELL, FRIED^21-045^crabs^125^100^N
+63 ;;^UTILITY(U,$J,112,2538,1)
+64 ;;=8.79^14.29^24.96^267^49.86^^^44^1.45^20^105^130^894^.85^.15^.25^^12^.6^.08
+65 ;;^UTILITY(U,$J,112,2538,2)
+66 ;;=.06^1.4^.38^.12^16^3.58^^^36^3.52^6.15^3.905^3^2.1
+67 ;;^UTILITY(U,$J,112,2538,3)
+68 ;;=.114^.314^.393^.653^.559^.204^.116^.388^.257^.415^.606^.179^.423^.73^1.918^.453^.52^.376
+69 ;;^UTILITY(U,$J,112,2538,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,2539,0)
+72 ;;=FF, CRAB CAKE^21-046^crabs^109^100^N
+73 ;;^UTILITY(U,$J,112,2539,1)
+74 ;;=18.75^17.25^8.52^266^53.38^^^337^1.86^42^378^270^819^3.54^.61^.47^^522^.3^.09
+75 ;;^UTILITY(U,$J,112,2539,2)
+76 ;;=.12^1.94^.45^.25^16^7.33^^^137^3.736^7.177^5.13^137^2.1
+77 ;;^UTILITY(U,$J,112,2539,3)
+78 ;;=.258^.75^.912^1.476^1.524^.513^.231^.813^.618^.909^1.539^.384^1.029^1.854^3.294^1.059^.717^.792
+79 ;;^UTILITY(U,$J,112,2539,20)
+80 ;;=USDA Std. Reference, Release 10
+81 ;;^UTILITY(U,$J,112,2540,0)
+82 ;;=FF, FISH FILLET, BATTERED OR BREADED, AND FRIED^21-047^fillets^91^100^N
+83 ;;^UTILITY(U,$J,112,2540,1)
+84 ;;=14.66^12.29^16.97^232^53.57^^^18^2.11^24^171^320^532^.44^.045^.185^^38^0^.11
+85 ;;^UTILITY(U,$J,112,2540,2)
+86 ;;=.11^2.1^.2^.1^56^1.11^5.784^.49^34^2.822^2.577^6.274^12^2.51
+87 ;;^UTILITY(U,$J,112,2540,3)
+88 ;;=.168^.626^.676^1.19^1.247^.417^.175^.602^.494^.76^.852^.425^.847^1.422^2.514^.688^.664^.628
+89 ;;^UTILITY(U,$J,112,2540,4)
+90 ;;=^^.128^2.262^^.431^2.577
+91 ;;^UTILITY(U,$J,112,2540,20)
+92 ;;=USDA Std. Reference, Release 10
+93 ;;^UTILITY(U,$J,112,2541,0)
+94 ;;=FF, OYSTERS, BATTERED OR BREADED, AND FRIED^21-048^oysters^23.2^100^N
+95 ;;^UTILITY(U,$J,112,2541,1)
+96 ;;=9.02^12.9^28.69^265^47.97^^^20^3.21^17^141^131^487^11.25^.573^.305^^261^3^.22
+97 ;;^UTILITY(U,$J,112,2541,2)
+98 ;;=.25^3.18^.76^.02^9^.73^^^78^3.294^4.979^3.337^78^1.41
