FHINI07B ; ; 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,2550,3)
;;=.093^.329^.412^.641^.657^.207^.088^.348^.303^.426^.456^.248^.397^.698^1.42^.314^.456^.375
;;^UTILITY(U,$J,112,2550,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2551,0)
;;=FF, SCALLOPS, BREADED AND FRIED^21-058^scallops^24^100^N
;;^UTILITY(U,$J,112,2551,1)
;;=10.94^13.47^26.73^268^48.01^^^13^1.42^22^203^204^638^.75^.15^.207^^96^0^.14
;;^UTILITY(U,$J,112,2551,2)
;;=.59^0^.35^.05^28^.3^.284^.135^75^3.391^8.718^.42^29^.85
;;^UTILITY(U,$J,112,2551,3)
;;=.129^.423^.468^.77^.636^.238^.174^.453^.343^.502^.671^.22^.562^.88^2.027^.553^.653^.535
;;^UTILITY(U,$J,112,2551,4)
;;=^^.04^1.739^.202^1.612^8.517
;;^UTILITY(U,$J,112,2551,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2552,0)
;;=FF, SHRIMP, BREADED AND FRIED^21-059^shrimps^23.4^100^N
;;^UTILITY(U,$J,112,2552,1)
;;=11.51^15.18^24.39^277^47.82^^^51^1.8^24^210^112^882^.74^.088^.203^^73^0^.13
;;^UTILITY(U,$J,112,2552,2)
;;=.55^0^.29^.04^29^.09^.368^.026^122^3.28^10.597^.393^22^1.1
;;^UTILITY(U,$J,112,2552,3)
;;=.154^.431^.529^.874^.774^.291^.167^.516^.37^.55^.822^.239^.572^.992^2.326^.579^.611^.52
;;^UTILITY(U,$J,112,2552,4)
;;=^^.063^1.628^.31^1.588^10.286
;;^UTILITY(U,$J,112,2552,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2553,0)
;;=FF, BURRITO, W/ BEANS^21-060^burritos^108.5^100^N
;;^UTILITY(U,$J,112,2553,1)
;;=6.48^6.22^32.92^206^52.53^^^52^2.08^40^45^301^454^.7^.174^.4^^153^.9^.29
;;^UTILITY(U,$J,112,2553,2)
;;=.28^1.87^.92^.14^54^.5^.439^.112^2^3.174^2.184^.551^15^1.85
;;^UTILITY(U,$J,112,2553,3)
;;=.079^.244^.27^.504^.343^.107^.098^.351^.192^.319^.359^.172^.255^.61^1.469^.251^.463^.351
;;^UTILITY(U,$J,112,2553,4)
;;=^^.23^1.965^^.98^2.184
;;^UTILITY(U,$J,112,2553,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2554,0)
;;=FF, BURRITO, W/ BEANS AND CHEESE^21-061^burritos^93^100^N
;;^UTILITY(U,$J,112,2554,1)
;;=8.1^6.29^29.55^203^53.91^^^115^1.22^43^97^267^627^.88^.189^.232^^672^.9^.12
;;^UTILITY(U,$J,112,2554,2)
;;=.38^1.92^.86^.13^44^.48^.848^.111^15^3.682^1.335^.959^128^2.15
;;^UTILITY(U,$J,112,2554,3)
;;=.095^.272^.382^.634^.492^.156^.081^.394^.289^.423^.355^.229^.259^.612^1.971^.213^.697^.416
;;^UTILITY(U,$J,112,2554,4)
;;=0^.146^.372^2.187^^.978^1.335
;;^UTILITY(U,$J,112,2554,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2555,0)
;;=FF, BURRITO, W/ BEANS AND CHILI PEPPERS^21-062^burritos^102^100^N
;;^UTILITY(U,$J,112,2555,1)
;;=8.03^7.19^28.47^202^54.37^^^49^2.23^35^56^284^512^1.67^.163^.384^^100^.6^.22
;;^UTILITY(U,$J,112,2555,2)
;;=.35^2.15^.92^.14^58^.57^.405^.068^16^3.729^2.632^.473^10^1.94
;;^UTILITY(U,$J,112,2555,3)
;;=.094^.273^.304^.556^.362^.121^.121^.391^.222^.351^.407^.197^.296^.715^2.083^.288^.573^.395
;;^UTILITY(U,$J,112,2555,4)
;;=.04^.09^.422^2.144^^1.033^2.632
;;^UTILITY(U,$J,112,2555,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2556,0)
;;=FF, BURRITO, W/ BEANS AND MEAT^21-063^burritos^115.5^100^N
;;^UTILITY(U,$J,112,2556,1)
;;=9.73^7.71^28.58^220^51.89^^^46^2.12^36^61^284^578^1.66^.163^.36^^275^.8^.23
;;^UTILITY(U,$J,112,2556,2)
;;=.36^2.34^.97^.16^32^.75^.49^.039^21^3.6^3.038^.529^28^2.09
;;^UTILITY(U,$J,112,2556,3)
;;=.117^.358^.388^.727^.594^.19^.127^.425^.288^.445^.558^.269^.486^.802^2.057^.532^.648^.428
;;^UTILITY(U,$J,112,2556,4)
;;=^^.351^2.248^^1.002^3.038
;;^UTILITY(U,$J,112,2556,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2557,0)
;;=FF, BURRITO, W/ BEANS, CHEESE, AND BEEF^21-064^burritos^101.5^100^N
;;^UTILITY(U,$J,112,2557,1)
;;=7.18^6.55^19.55^163^64.94^^^64^1.84^25^69^202^488^1.16^.162^.195^^394^2.5^.15
;;^UTILITY(U,$J,112,2557,2)
;;=.35^1.9^.82^.11^30^.54^.451^.051^61^3.522^2.196^.502^74^1.77
;;^UTILITY(U,$J,112,2557,3)
;;=.086^.261^.324^.564^.459^.144^.081^.334^.241^.363^.37^.204^.298^.569^1.536^.296^.547^.346
;;^UTILITY(U,$J,112,2557,4)
;;=.022^.145^.571^1.854^^.931^2.196
;;^UTILITY(U,$J,112,2557,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2558,0)
;;=FF, BURRITO, W/ BEANS, CHEESE, AND CHILI PEPPERS^21-065^burritos^168^100^N
;;^UTILITY(U,$J,112,2558,1)
;;=9.91^6.84^25.35^197^55.77^^^86^2.29^29^85^241^613^1.81^.175^.242^^475^2^.16
;;^UTILITY(U,$J,112,2558,2)
;;=.36^2.29^.86^.12^43^.59^.377^^47^3.332^2.515^.377^114^2.14
;;^UTILITY(U,$J,112,2558,3)
;;=.118^.33^.441^.766^.537^.186^.121^.495^.335^.498^.443^.268^.325^.716^2.4^.294^.866^.512
;;^UTILITY(U,$J,112,2558,4)
;;=^^.247^1.932^^1.153^2.515
;;^UTILITY(U,$J,112,2558,20)
;;=USDA Std. Reference, Release 10
FHINI07B ; ; 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,2550,3)
+2 ;;=.093^.329^.412^.641^.657^.207^.088^.348^.303^.426^.456^.248^.397^.698^1.42^.314^.456^.375
+3 ;;^UTILITY(U,$J,112,2550,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,2551,0)
+6 ;;=FF, SCALLOPS, BREADED AND FRIED^21-058^scallops^24^100^N
+7 ;;^UTILITY(U,$J,112,2551,1)
+8 ;;=10.94^13.47^26.73^268^48.01^^^13^1.42^22^203^204^638^.75^.15^.207^^96^0^.14
+9 ;;^UTILITY(U,$J,112,2551,2)
+10 ;;=.59^0^.35^.05^28^.3^.284^.135^75^3.391^8.718^.42^29^.85
+11 ;;^UTILITY(U,$J,112,2551,3)
+12 ;;=.129^.423^.468^.77^.636^.238^.174^.453^.343^.502^.671^.22^.562^.88^2.027^.553^.653^.535
+13 ;;^UTILITY(U,$J,112,2551,4)
+14 ;;=^^.04^1.739^.202^1.612^8.517
+15 ;;^UTILITY(U,$J,112,2551,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,2552,0)
+18 ;;=FF, SHRIMP, BREADED AND FRIED^21-059^shrimps^23.4^100^N
+19 ;;^UTILITY(U,$J,112,2552,1)
+20 ;;=11.51^15.18^24.39^277^47.82^^^51^1.8^24^210^112^882^.74^.088^.203^^73^0^.13
+21 ;;^UTILITY(U,$J,112,2552,2)
+22 ;;=.55^0^.29^.04^29^.09^.368^.026^122^3.28^10.597^.393^22^1.1
+23 ;;^UTILITY(U,$J,112,2552,3)
+24 ;;=.154^.431^.529^.874^.774^.291^.167^.516^.37^.55^.822^.239^.572^.992^2.326^.579^.611^.52
+25 ;;^UTILITY(U,$J,112,2552,4)
+26 ;;=^^.063^1.628^.31^1.588^10.286
+27 ;;^UTILITY(U,$J,112,2552,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,2553,0)
+30 ;;=FF, BURRITO, W/ BEANS^21-060^burritos^108.5^100^N
+31 ;;^UTILITY(U,$J,112,2553,1)
+32 ;;=6.48^6.22^32.92^206^52.53^^^52^2.08^40^45^301^454^.7^.174^.4^^153^.9^.29
+33 ;;^UTILITY(U,$J,112,2553,2)
+34 ;;=.28^1.87^.92^.14^54^.5^.439^.112^2^3.174^2.184^.551^15^1.85
+35 ;;^UTILITY(U,$J,112,2553,3)
+36 ;;=.079^.244^.27^.504^.343^.107^.098^.351^.192^.319^.359^.172^.255^.61^1.469^.251^.463^.351
+37 ;;^UTILITY(U,$J,112,2553,4)
+38 ;;=^^.23^1.965^^.98^2.184
+39 ;;^UTILITY(U,$J,112,2553,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,2554,0)
+42 ;;=FF, BURRITO, W/ BEANS AND CHEESE^21-061^burritos^93^100^N
+43 ;;^UTILITY(U,$J,112,2554,1)
+44 ;;=8.1^6.29^29.55^203^53.91^^^115^1.22^43^97^267^627^.88^.189^.232^^672^.9^.12
+45 ;;^UTILITY(U,$J,112,2554,2)
+46 ;;=.38^1.92^.86^.13^44^.48^.848^.111^15^3.682^1.335^.959^128^2.15
+47 ;;^UTILITY(U,$J,112,2554,3)
+48 ;;=.095^.272^.382^.634^.492^.156^.081^.394^.289^.423^.355^.229^.259^.612^1.971^.213^.697^.416
+49 ;;^UTILITY(U,$J,112,2554,4)
+50 ;;=0^.146^.372^2.187^^.978^1.335
+51 ;;^UTILITY(U,$J,112,2554,20)
+52 ;;=USDA Std. Reference, Release 10
+53 ;;^UTILITY(U,$J,112,2555,0)
+54 ;;=FF, BURRITO, W/ BEANS AND CHILI PEPPERS^21-062^burritos^102^100^N
+55 ;;^UTILITY(U,$J,112,2555,1)
+56 ;;=8.03^7.19^28.47^202^54.37^^^49^2.23^35^56^284^512^1.67^.163^.384^^100^.6^.22
+57 ;;^UTILITY(U,$J,112,2555,2)
+58 ;;=.35^2.15^.92^.14^58^.57^.405^.068^16^3.729^2.632^.473^10^1.94
+59 ;;^UTILITY(U,$J,112,2555,3)
+60 ;;=.094^.273^.304^.556^.362^.121^.121^.391^.222^.351^.407^.197^.296^.715^2.083^.288^.573^.395
+61 ;;^UTILITY(U,$J,112,2555,4)
+62 ;;=.04^.09^.422^2.144^^1.033^2.632
+63 ;;^UTILITY(U,$J,112,2555,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,2556,0)
+66 ;;=FF, BURRITO, W/ BEANS AND MEAT^21-063^burritos^115.5^100^N
+67 ;;^UTILITY(U,$J,112,2556,1)
+68 ;;=9.73^7.71^28.58^220^51.89^^^46^2.12^36^61^284^578^1.66^.163^.36^^275^.8^.23
+69 ;;^UTILITY(U,$J,112,2556,2)
+70 ;;=.36^2.34^.97^.16^32^.75^.49^.039^21^3.6^3.038^.529^28^2.09
+71 ;;^UTILITY(U,$J,112,2556,3)
+72 ;;=.117^.358^.388^.727^.594^.19^.127^.425^.288^.445^.558^.269^.486^.802^2.057^.532^.648^.428
+73 ;;^UTILITY(U,$J,112,2556,4)
+74 ;;=^^.351^2.248^^1.002^3.038
+75 ;;^UTILITY(U,$J,112,2556,20)
+76 ;;=USDA Std. Reference, Release 10
+77 ;;^UTILITY(U,$J,112,2557,0)
+78 ;;=FF, BURRITO, W/ BEANS, CHEESE, AND BEEF^21-064^burritos^101.5^100^N
+79 ;;^UTILITY(U,$J,112,2557,1)
+80 ;;=7.18^6.55^19.55^163^64.94^^^64^1.84^25^69^202^488^1.16^.162^.195^^394^2.5^.15
+81 ;;^UTILITY(U,$J,112,2557,2)
+82 ;;=.35^1.9^.82^.11^30^.54^.451^.051^61^3.522^2.196^.502^74^1.77
+83 ;;^UTILITY(U,$J,112,2557,3)
+84 ;;=.086^.261^.324^.564^.459^.144^.081^.334^.241^.363^.37^.204^.298^.569^1.536^.296^.547^.346
+85 ;;^UTILITY(U,$J,112,2557,4)
+86 ;;=.022^.145^.571^1.854^^.931^2.196
+87 ;;^UTILITY(U,$J,112,2557,20)
+88 ;;=USDA Std. Reference, Release 10
+89 ;;^UTILITY(U,$J,112,2558,0)
+90 ;;=FF, BURRITO, W/ BEANS, CHEESE, AND CHILI PEPPERS^21-065^burritos^168^100^N
+91 ;;^UTILITY(U,$J,112,2558,1)
+92 ;;=9.91^6.84^25.35^197^55.77^^^86^2.29^29^85^241^613^1.81^.175^.242^^475^2^.16
+93 ;;^UTILITY(U,$J,112,2558,2)
+94 ;;=.36^2.29^.86^.12^43^.59^.377^^47^3.332^2.515^.377^114^2.14
+95 ;;^UTILITY(U,$J,112,2558,3)
+96 ;;=.118^.33^.441^.766^.537^.186^.121^.495^.335^.498^.443^.268^.325^.716^2.4^.294^.866^.512
+97 ;;^UTILITY(U,$J,112,2558,4)
+98 ;;=^^.247^1.932^^1.153^2.515
+99 ;;^UTILITY(U,$J,112,2558,20)
+100 ;;=USDA Std. Reference, Release 10