FHINI07E ; ; 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,2575,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2576,0)
;;=FF, TACO SALAD^21-083^cups^132^100^N
;;^UTILITY(U,$J,112,2576,1)
;;=6.68^7.46^11.91^141^72.35^^^97^1.15^26^72^210^385^1.36^.113^.167^^297^1.8^.05
;;^UTILITY(U,$J,112,2576,2)
;;=.18^1.24^.68^.11^20^.32^.838^.045^22^3.446^2.606^.883^39^1.59
;;^UTILITY(U,$J,112,2576,3)
;;=.075^.254^.311^.549^.486^.145^.06^.277^.232^.343^.357^.201^.339^.554^1.291^.326^.452^.287
;;^UTILITY(U,$J,112,2576,4)
;;=.089^.146^.493^1.898^^.82^2.606
;;^UTILITY(U,$J,112,2576,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2577,0)
;;=FF, TACO SALAD WITH CHILI CON CARNE^21-084^cups^174^100^N
;;^UTILITY(U,$J,112,2577,1)
;;=6.67^5.03^10.18^111^76.79^^^94^1.02^20^59^150^339^1.26^.115^.129^^603^1.3^.06
;;^UTILITY(U,$J,112,2577,2)
;;=.19^.97^.55^.2^24^.28^.559^.03^2^2.299^1.739^.589^82^1.33
;;^UTILITY(U,$J,112,2577,3)
;;=.074^.248^.313^.555^.466^.139^.061^.295^.235^.349^.338^.199^.307^.57^1.313^.275^.463^.306
;;^UTILITY(U,$J,112,2577,4)
;;=.06^.097^.329^1.266^^.547^1.739
;;^UTILITY(U,$J,112,2577,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2578,0)
;;=FF, TOSTADA, W/ BEANS AND CHEESE^21-085^tostadas^144^100^N
;;^UTILITY(U,$J,112,2578,1)
;;=6.67^6.85^18.42^155^66.24^^^146^1.31^41^81^280^377^1.32^.143^.255^^432^.9^.07
;;^UTILITY(U,$J,112,2578,2)
;;=.23^.92^.79^.11^52^.48^.479^.041^21^3.727^2.121^.52^59^1.83
;;^UTILITY(U,$J,112,2578,3)
;;=.07^.245^.301^.574^.403^.122^.067^.323^.231^.349^.323^.191^.28^.606^1.336^.203^.46^.334
;;^UTILITY(U,$J,112,2578,4)
;;=.169^.474^.533^1.722^^.829^2.121
;;^UTILITY(U,$J,112,2578,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2579,0)
;;=FF, TOSTADA, W/ BEANS, BEEF, AND CHEESE^21-086^tostadas^225^100^N
;;^UTILITY(U,$J,112,2579,1)
;;=7.15^7.53^13.18^148^70.44^^^84^1.09^30^77^218^387^1.41^.14^.16^^567^1.8^.04
;;^UTILITY(U,$J,112,2579,2)
;;=.22^1.27^.83^.11^43^.5^.239^.026^33^5.1^1.561^.265^77^1.7
;;^UTILITY(U,$J,112,2579,3)
;;=.077^.266^.32^.609^.466^.143^.071^.321^.247^.367^.369^.211^.343^.623^1.408^.29^.484^.333
;;^UTILITY(U,$J,112,2579,4)
;;=.556^1.231^1.024^1.645^^.643^1.561
;;^UTILITY(U,$J,112,2579,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2580,0)
;;=FF, TOSTADA, W/ BEEF AND CHEESE^21-087^tostadas^163^100^N
;;^UTILITY(U,$J,112,2580,1)
;;=11.65^10.03^13.97^193^62.05^^^133^1.76^39^110^351^550^2.26^.162^.309^^437^1.6^.06
;;^UTILITY(U,$J,112,2580,2)
;;=.34^1.93^1.16^.14^9^.72^.541^.057^25^6.377^2.052^.598^59^2.3
;;^UTILITY(U,$J,112,2580,3)
;;=.134^.453^.511^.97^.86^.26^.112^.468^.392^.58^.678^.361^.667^.991^2.132^.669^.727^.485
;;^UTILITY(U,$J,112,2580,4)
;;=.387^.583^.89^2.743^^1.774^2.052
;;^UTILITY(U,$J,112,2580,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2581,0)
;;=FF, TOSTADA, W/ GUACAMOLE^21-088^tostadas^130.5^100^N
;;^UTILITY(U,$J,112,2581,1)
;;=4.78^8.91^12.27^138^72.51^^^162^.62^28^89^249^306^1.56^.097^.135^^671^1.4^.05
;;^UTILITY(U,$J,112,2581,2)
;;=.22^.76^.77^.1^42^.38^1.11^.06^15^3.78^3.25^1.17^83^1.53
;;^UTILITY(U,$J,112,2581,3)
;;=.047^.159^.213^.411^.259^.096^.046^.207^.175^.247^.185^.129^.213^.392^1.027^.131^.378^.221
;;^UTILITY(U,$J,112,2581,4)
;;=.12^.16^.51^2.07^^.92^3.25
;;^UTILITY(U,$J,112,2581,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2582,0)
;;=FF, CHEESEBURGER, REGULAR, SINGLE PATTY, PLAIN^21-089^burgers^102^100^N
;;^UTILITY(U,$J,112,2582,1)
;;=14.48^14.85^31.13^313^37.3^^^138^2.39^21^192^161^490^2.32^.092^.221^^150^0^.39
;;^UTILITY(U,$J,112,2582,2)
;;=.39^3.63^.42^.09^26^.95^^^49^6.34^5.66^1.51^36^2.24
;;^UTILITY(U,$J,112,2582,3)
;;=.182^.524^.618^1.135^.998^.31^.164^.635^.483^.739^.787^.438^.701^1.064^3.102^.756^1.128^.592
;;^UTILITY(U,$J,112,2582,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2583,0)
;;=FF, CHEESEBURGER, REGULAR, SINGLE PATTY, W/ CONDIMENTS^21-090^burgers^113^100^N
;;^UTILITY(U,$J,112,2583,1)
;;=14.12^12.52^23.48^261^47.66^^^98^2.15^18^156^197^545^1.85^.089^.156^.47^409^1.7^.22
;;^UTILITY(U,$J,112,2583,2)
;;=.2^3.29^.28^.1^16^.83^.782^.163^33^5.582^4.732^.965^83^2.22
;;^UTILITY(U,$J,112,2583,3)
;;=.178^.511^.601^1.103^.971^.303^.162^.617^.469^.719^.765^.425^.682^1.04^3.033^.735^1.096^.576
;;^UTILITY(U,$J,112,2583,4)
;;=.098^.118^.616^2.823^.471^1.552^4.098^.021
;;^UTILITY(U,$J,112,2583,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2584,0)
;;=FF, CHEESEBURGER, REGULAR, SINGLE PATTY, W/ CONDIMENTS & VEG^21-091^burgers^154^100^N
FHINI07E ; ; 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,2575,20)
+2 ;;=USDA Std. Reference, Release 10
+3 ;;^UTILITY(U,$J,112,2576,0)
+4 ;;=FF, TACO SALAD^21-083^cups^132^100^N
+5 ;;^UTILITY(U,$J,112,2576,1)
+6 ;;=6.68^7.46^11.91^141^72.35^^^97^1.15^26^72^210^385^1.36^.113^.167^^297^1.8^.05
+7 ;;^UTILITY(U,$J,112,2576,2)
+8 ;;=.18^1.24^.68^.11^20^.32^.838^.045^22^3.446^2.606^.883^39^1.59
+9 ;;^UTILITY(U,$J,112,2576,3)
+10 ;;=.075^.254^.311^.549^.486^.145^.06^.277^.232^.343^.357^.201^.339^.554^1.291^.326^.452^.287
+11 ;;^UTILITY(U,$J,112,2576,4)
+12 ;;=.089^.146^.493^1.898^^.82^2.606
+13 ;;^UTILITY(U,$J,112,2576,20)
+14 ;;=USDA Std. Reference, Release 10
+15 ;;^UTILITY(U,$J,112,2577,0)
+16 ;;=FF, TACO SALAD WITH CHILI CON CARNE^21-084^cups^174^100^N
+17 ;;^UTILITY(U,$J,112,2577,1)
+18 ;;=6.67^5.03^10.18^111^76.79^^^94^1.02^20^59^150^339^1.26^.115^.129^^603^1.3^.06
+19 ;;^UTILITY(U,$J,112,2577,2)
+20 ;;=.19^.97^.55^.2^24^.28^.559^.03^2^2.299^1.739^.589^82^1.33
+21 ;;^UTILITY(U,$J,112,2577,3)
+22 ;;=.074^.248^.313^.555^.466^.139^.061^.295^.235^.349^.338^.199^.307^.57^1.313^.275^.463^.306
+23 ;;^UTILITY(U,$J,112,2577,4)
+24 ;;=.06^.097^.329^1.266^^.547^1.739
+25 ;;^UTILITY(U,$J,112,2577,20)
+26 ;;=USDA Std. Reference, Release 10
+27 ;;^UTILITY(U,$J,112,2578,0)
+28 ;;=FF, TOSTADA, W/ BEANS AND CHEESE^21-085^tostadas^144^100^N
+29 ;;^UTILITY(U,$J,112,2578,1)
+30 ;;=6.67^6.85^18.42^155^66.24^^^146^1.31^41^81^280^377^1.32^.143^.255^^432^.9^.07
+31 ;;^UTILITY(U,$J,112,2578,2)
+32 ;;=.23^.92^.79^.11^52^.48^.479^.041^21^3.727^2.121^.52^59^1.83
+33 ;;^UTILITY(U,$J,112,2578,3)
+34 ;;=.07^.245^.301^.574^.403^.122^.067^.323^.231^.349^.323^.191^.28^.606^1.336^.203^.46^.334
+35 ;;^UTILITY(U,$J,112,2578,4)
+36 ;;=.169^.474^.533^1.722^^.829^2.121
+37 ;;^UTILITY(U,$J,112,2578,20)
+38 ;;=USDA Std. Reference, Release 10
+39 ;;^UTILITY(U,$J,112,2579,0)
+40 ;;=FF, TOSTADA, W/ BEANS, BEEF, AND CHEESE^21-086^tostadas^225^100^N
+41 ;;^UTILITY(U,$J,112,2579,1)
+42 ;;=7.15^7.53^13.18^148^70.44^^^84^1.09^30^77^218^387^1.41^.14^.16^^567^1.8^.04
+43 ;;^UTILITY(U,$J,112,2579,2)
+44 ;;=.22^1.27^.83^.11^43^.5^.239^.026^33^5.1^1.561^.265^77^1.7
+45 ;;^UTILITY(U,$J,112,2579,3)
+46 ;;=.077^.266^.32^.609^.466^.143^.071^.321^.247^.367^.369^.211^.343^.623^1.408^.29^.484^.333
+47 ;;^UTILITY(U,$J,112,2579,4)
+48 ;;=.556^1.231^1.024^1.645^^.643^1.561
+49 ;;^UTILITY(U,$J,112,2579,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,2580,0)
+52 ;;=FF, TOSTADA, W/ BEEF AND CHEESE^21-087^tostadas^163^100^N
+53 ;;^UTILITY(U,$J,112,2580,1)
+54 ;;=11.65^10.03^13.97^193^62.05^^^133^1.76^39^110^351^550^2.26^.162^.309^^437^1.6^.06
+55 ;;^UTILITY(U,$J,112,2580,2)
+56 ;;=.34^1.93^1.16^.14^9^.72^.541^.057^25^6.377^2.052^.598^59^2.3
+57 ;;^UTILITY(U,$J,112,2580,3)
+58 ;;=.134^.453^.511^.97^.86^.26^.112^.468^.392^.58^.678^.361^.667^.991^2.132^.669^.727^.485
+59 ;;^UTILITY(U,$J,112,2580,4)
+60 ;;=.387^.583^.89^2.743^^1.774^2.052
+61 ;;^UTILITY(U,$J,112,2580,20)
+62 ;;=USDA Std. Reference, Release 10
+63 ;;^UTILITY(U,$J,112,2581,0)
+64 ;;=FF, TOSTADA, W/ GUACAMOLE^21-088^tostadas^130.5^100^N
+65 ;;^UTILITY(U,$J,112,2581,1)
+66 ;;=4.78^8.91^12.27^138^72.51^^^162^.62^28^89^249^306^1.56^.097^.135^^671^1.4^.05
+67 ;;^UTILITY(U,$J,112,2581,2)
+68 ;;=.22^.76^.77^.1^42^.38^1.11^.06^15^3.78^3.25^1.17^83^1.53
+69 ;;^UTILITY(U,$J,112,2581,3)
+70 ;;=.047^.159^.213^.411^.259^.096^.046^.207^.175^.247^.185^.129^.213^.392^1.027^.131^.378^.221
+71 ;;^UTILITY(U,$J,112,2581,4)
+72 ;;=.12^.16^.51^2.07^^.92^3.25
+73 ;;^UTILITY(U,$J,112,2581,20)
+74 ;;=USDA Std. Reference, Release 10
+75 ;;^UTILITY(U,$J,112,2582,0)
+76 ;;=FF, CHEESEBURGER, REGULAR, SINGLE PATTY, PLAIN^21-089^burgers^102^100^N
+77 ;;^UTILITY(U,$J,112,2582,1)
+78 ;;=14.48^14.85^31.13^313^37.3^^^138^2.39^21^192^161^490^2.32^.092^.221^^150^0^.39
+79 ;;^UTILITY(U,$J,112,2582,2)
+80 ;;=.39^3.63^.42^.09^26^.95^^^49^6.34^5.66^1.51^36^2.24
+81 ;;^UTILITY(U,$J,112,2582,3)
+82 ;;=.182^.524^.618^1.135^.998^.31^.164^.635^.483^.739^.787^.438^.701^1.064^3.102^.756^1.128^.592
+83 ;;^UTILITY(U,$J,112,2582,20)
+84 ;;=USDA Std. Reference, Release 10
+85 ;;^UTILITY(U,$J,112,2583,0)
+86 ;;=FF, CHEESEBURGER, REGULAR, SINGLE PATTY, W/ CONDIMENTS^21-090^burgers^113^100^N
+87 ;;^UTILITY(U,$J,112,2583,1)
+88 ;;=14.12^12.52^23.48^261^47.66^^^98^2.15^18^156^197^545^1.85^.089^.156^.47^409^1.7^.22
+89 ;;^UTILITY(U,$J,112,2583,2)
+90 ;;=.2^3.29^.28^.1^16^.83^.782^.163^33^5.582^4.732^.965^83^2.22
+91 ;;^UTILITY(U,$J,112,2583,3)
+92 ;;=.178^.511^.601^1.103^.971^.303^.162^.617^.469^.719^.765^.425^.682^1.04^3.033^.735^1.096^.576
+93 ;;^UTILITY(U,$J,112,2583,4)
+94 ;;=.098^.118^.616^2.823^.471^1.552^4.098^.021
+95 ;;^UTILITY(U,$J,112,2583,20)
+96 ;;=USDA Std. Reference, Release 10
+97 ;;^UTILITY(U,$J,112,2584,0)
+98 ;;=FF, CHEESEBURGER, REGULAR, SINGLE PATTY, W/ CONDIMENTS & VEG^21-091^burgers^154^100^N
