FHINI077 ; ; 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,2515,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2516,0)
;;=FF, FRENCH TOAST WITH BUTTER^21-023^slices^67.5^100^N
;;^UTILITY(U,$J,112,2516,1)
;;=7.66^13.9^26.7^264^50.72^^^54^1.4^12^108^131^380^.44^.048^.155^^350^.1^.43
;;^UTILITY(U,$J,112,2516,2)
;;=.37^2.9^.4^.04^22^.27^^^86^5.74^5.24^1.81^108^1.02
;;^UTILITY(U,$J,112,2516,3)
;;=.106^.3^.394^.605^.375^.182^.148^.397^.256^.463^.384^.174^.346^.571^1.659^.265^.572^.472
;;^UTILITY(U,$J,112,2516,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2517,0)
;;=FF, FRENCH TOAST STICKS^21-024^sticks^28.2^100^N
;;^UTILITY(U,$J,112,2517,1)
;;=5.87^20.6^41.03^364^29.96^^^55^2.1^19^87^90^354^.66^.192^.155^^32^0^.16
;;^UTILITY(U,$J,112,2517,2)
;;=.18^2.1^.4^.18^95^.05^^^53^3.34^8.97^7.05^9^2.54^^^1.9
;;^UTILITY(U,$J,112,2517,3)
;;=.073^.204^.242^.43^.23^.11^.112^.291^.198^.273^.267^.139^.247^.347^1.631^.227^.553^.3
;;^UTILITY(U,$J,112,2517,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2518,0)
;;=FF, PANCAKES WITH BUTTER AND SYRUP^21-025^cakes^77.3^100^N
;;^UTILITY(U,$J,112,2518,1)
;;=3.56^6.03^39.18^224^49.72^^^55^1.13^21^205^108^476^.44^.065^.139^.6^121^1.5^.17
;;^UTILITY(U,$J,112,2518,2)
;;=.24^1.46^.29^.05^15^.1^.753^.064^25^2.522^2.271^.844^30^1.51
;;^UTILITY(U,$J,112,2518,3)
;;=.044^.131^.166^.307^.181^.075^.055^.173^.137^.195^.151^.089^.14^.233^.868^.11^.34^.18
;;^UTILITY(U,$J,112,2518,4)
;;=.075^.104^.163^1.114^.081^.716^2.138^.027
;;^UTILITY(U,$J,112,2518,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2519,0)
;;=FF, POTATOES, HASHED BROWN^21-026^cups^144^100^N
;;^UTILITY(U,$J,112,2519,1)
;;=2.7^12.8^22.43^210^60.14^^^10^.67^22^96^371^403^.3^.097^.153^.17^25^7.6^.11
;;^UTILITY(U,$J,112,2519,2)
;;=.02^1.49^.47^.23^11^.02^.556^.095^13^6.005^5.359^.653^4^1.92
;;^UTILITY(U,$J,112,2519,3)
;;=.036^.123^.116^.163^.143^.03^.017^.115^.068^.137^.128^.045^.093^.626^.422^.098^.087^.097
;;^UTILITY(U,$J,112,2519,4)
;;=.006^.01^.38^3.14^.501^2.215^4.731^.002
;;^UTILITY(U,$J,112,2519,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2520,0)
;;=FF, BROWNIE^21-027^brownies^60^100^N
;;^UTILITY(U,$J,112,2520,1)
;;=4.57^16.84^64.95^405^12.65^^^42^2.15^27^146^139^255^.92^0^.181^^18^5.3^.12
;;^UTILITY(U,$J,112,2520,2)
;;=.21^.97^.55^.04^7^.26^^^16^5.22^6.377^4.398^4^1
;;^UTILITY(U,$J,112,2520,3)
;;=.057^.158^.199^.339^.223^.082^.06^.207^.167^.236^.176^.1^.151^.287^1.038^.131^.396^.214
;;^UTILITY(U,$J,112,2520,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2521,0)
;;=FF, ICE MILK, VANILLA, SOFT-SERVE, WITH CONE^21-028^cones^103^100^N
;;^UTILITY(U,$J,112,2521,1)
;;=3.78^5.94^23.41^159^65.47^^^149^.15^15^135^164^89^.55^.018^.02^.37^205^1.1^.05
;;^UTILITY(U,$J,112,2521,2)
;;=.25^.3^.26^.06^5^.2^.249^.074^27^3.429^1.763^.348^50^1.4
;;^UTILITY(U,$J,112,2521,3)
;;=.05^.155^.207^.34^.26^.087^.039^.176^.166^.23^.133^.097^.123^.259^.817^.083^.359^.195
;;^UTILITY(U,$J,112,2521,4)
;;=.115^.149^.501^1.5^.155^.868^1.516^.025
;;^UTILITY(U,$J,112,2521,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2522,0)
;;=FF, COOKIES, ANIMAL CRACKERS^21-029^boxes^55^100^N
;;^UTILITY(U,$J,112,2522,1)
;;=6.18^13.43^75.33^446^3.75^^^17^2.2^16^96^84^408^.45^.076^.487^.47^40^1.2^.37
;;^UTILITY(U,$J,112,2522,2)
;;=.36^3.67^.32^.03^33^.07^1.367^.168^16^5.272^5.649^1.558^12^1.31
;;^UTILITY(U,$J,112,2522,3)
;;=.081^.202^.261^.474^.229^.127^.12^.315^.216^.299^.259^.148^.216^.333^1.866^.207^.67^.329
;;^UTILITY(U,$J,112,2522,4)
;;=.01^.019^.215^3.109^.409^1.741^5.2^.024
;;^UTILITY(U,$J,112,2522,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2523,0)
;;=FF, COOKIES, CHOCOLATE CHIP^21-030^boxes^85^100^N
;;^UTILITY(U,$J,112,2523,1)
;;=5.25^22.08^65.86^423^5.36^^^36^2.68^30^95^149^342^.61^.335^.431^.67^94^1^.16
;;^UTILITY(U,$J,112,2523,2)
;;=.35^2.53^.26^.05^29^.19^1.697^.168^21^9.709^9.185^1.865^27^1.44
;;^UTILITY(U,$J,112,2523,3)
;;=.063^.146^.175^.332^.137^.081^.096^.246^.156^.218^.215^.107^.171^.261^1.491^.185^.505^.24
;;^UTILITY(U,$J,112,2523,4)
;;=^.006^.174^5.14^.46^4.333^8.725
;;^UTILITY(U,$J,112,2523,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2524,0)
;;=FF, FRIED PIE, FRUIT (APPLE, CHERRY, OR LEMON)^21-031^pies^85^100^N
;;^UTILITY(U,$J,112,2524,1)
;;=2.84^16.91^38.88^313^40.16^^^15^1.04^9^44^60^382^.2^.051^.203^.43^175^1.3^.12
;;^UTILITY(U,$J,112,2524,2)
;;=.09^1.15^.18^.04^5^.09^1.211^.14^15^7.663^6.859^1.364^39^1.21
;;^UTILITY(U,$J,112,2524,3)
;;=.035^.077^.098^.193^.065^.05^.059^.14^.084^.114^.113^.063^.091^.139^.935^.101^.322^.14
FHINI077 ; ; 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,2515,20)
+2 ;;=USDA Std. Reference, Release 10
+3 ;;^UTILITY(U,$J,112,2516,0)
+4 ;;=FF, FRENCH TOAST WITH BUTTER^21-023^slices^67.5^100^N
+5 ;;^UTILITY(U,$J,112,2516,1)
+6 ;;=7.66^13.9^26.7^264^50.72^^^54^1.4^12^108^131^380^.44^.048^.155^^350^.1^.43
+7 ;;^UTILITY(U,$J,112,2516,2)
+8 ;;=.37^2.9^.4^.04^22^.27^^^86^5.74^5.24^1.81^108^1.02
+9 ;;^UTILITY(U,$J,112,2516,3)
+10 ;;=.106^.3^.394^.605^.375^.182^.148^.397^.256^.463^.384^.174^.346^.571^1.659^.265^.572^.472
+11 ;;^UTILITY(U,$J,112,2516,20)
+12 ;;=USDA Std. Reference, Release 10
+13 ;;^UTILITY(U,$J,112,2517,0)
+14 ;;=FF, FRENCH TOAST STICKS^21-024^sticks^28.2^100^N
+15 ;;^UTILITY(U,$J,112,2517,1)
+16 ;;=5.87^20.6^41.03^364^29.96^^^55^2.1^19^87^90^354^.66^.192^.155^^32^0^.16
+17 ;;^UTILITY(U,$J,112,2517,2)
+18 ;;=.18^2.1^.4^.18^95^.05^^^53^3.34^8.97^7.05^9^2.54^^^1.9
+19 ;;^UTILITY(U,$J,112,2517,3)
+20 ;;=.073^.204^.242^.43^.23^.11^.112^.291^.198^.273^.267^.139^.247^.347^1.631^.227^.553^.3
+21 ;;^UTILITY(U,$J,112,2517,20)
+22 ;;=USDA Std. Reference, Release 10
+23 ;;^UTILITY(U,$J,112,2518,0)
+24 ;;=FF, PANCAKES WITH BUTTER AND SYRUP^21-025^cakes^77.3^100^N
+25 ;;^UTILITY(U,$J,112,2518,1)
+26 ;;=3.56^6.03^39.18^224^49.72^^^55^1.13^21^205^108^476^.44^.065^.139^.6^121^1.5^.17
+27 ;;^UTILITY(U,$J,112,2518,2)
+28 ;;=.24^1.46^.29^.05^15^.1^.753^.064^25^2.522^2.271^.844^30^1.51
+29 ;;^UTILITY(U,$J,112,2518,3)
+30 ;;=.044^.131^.166^.307^.181^.075^.055^.173^.137^.195^.151^.089^.14^.233^.868^.11^.34^.18
+31 ;;^UTILITY(U,$J,112,2518,4)
+32 ;;=.075^.104^.163^1.114^.081^.716^2.138^.027
+33 ;;^UTILITY(U,$J,112,2518,20)
+34 ;;=USDA Std. Reference, Release 10
+35 ;;^UTILITY(U,$J,112,2519,0)
+36 ;;=FF, POTATOES, HASHED BROWN^21-026^cups^144^100^N
+37 ;;^UTILITY(U,$J,112,2519,1)
+38 ;;=2.7^12.8^22.43^210^60.14^^^10^.67^22^96^371^403^.3^.097^.153^.17^25^7.6^.11
+39 ;;^UTILITY(U,$J,112,2519,2)
+40 ;;=.02^1.49^.47^.23^11^.02^.556^.095^13^6.005^5.359^.653^4^1.92
+41 ;;^UTILITY(U,$J,112,2519,3)
+42 ;;=.036^.123^.116^.163^.143^.03^.017^.115^.068^.137^.128^.045^.093^.626^.422^.098^.087^.097
+43 ;;^UTILITY(U,$J,112,2519,4)
+44 ;;=.006^.01^.38^3.14^.501^2.215^4.731^.002
+45 ;;^UTILITY(U,$J,112,2519,20)
+46 ;;=USDA Std. Reference, Release 10
+47 ;;^UTILITY(U,$J,112,2520,0)
+48 ;;=FF, BROWNIE^21-027^brownies^60^100^N
+49 ;;^UTILITY(U,$J,112,2520,1)
+50 ;;=4.57^16.84^64.95^405^12.65^^^42^2.15^27^146^139^255^.92^0^.181^^18^5.3^.12
+51 ;;^UTILITY(U,$J,112,2520,2)
+52 ;;=.21^.97^.55^.04^7^.26^^^16^5.22^6.377^4.398^4^1
+53 ;;^UTILITY(U,$J,112,2520,3)
+54 ;;=.057^.158^.199^.339^.223^.082^.06^.207^.167^.236^.176^.1^.151^.287^1.038^.131^.396^.214
+55 ;;^UTILITY(U,$J,112,2520,20)
+56 ;;=USDA Std. Reference, Release 10
+57 ;;^UTILITY(U,$J,112,2521,0)
+58 ;;=FF, ICE MILK, VANILLA, SOFT-SERVE, WITH CONE^21-028^cones^103^100^N
+59 ;;^UTILITY(U,$J,112,2521,1)
+60 ;;=3.78^5.94^23.41^159^65.47^^^149^.15^15^135^164^89^.55^.018^.02^.37^205^1.1^.05
+61 ;;^UTILITY(U,$J,112,2521,2)
+62 ;;=.25^.3^.26^.06^5^.2^.249^.074^27^3.429^1.763^.348^50^1.4
+63 ;;^UTILITY(U,$J,112,2521,3)
+64 ;;=.05^.155^.207^.34^.26^.087^.039^.176^.166^.23^.133^.097^.123^.259^.817^.083^.359^.195
+65 ;;^UTILITY(U,$J,112,2521,4)
+66 ;;=.115^.149^.501^1.5^.155^.868^1.516^.025
+67 ;;^UTILITY(U,$J,112,2521,20)
+68 ;;=USDA Std. Reference, Release 10
+69 ;;^UTILITY(U,$J,112,2522,0)
+70 ;;=FF, COOKIES, ANIMAL CRACKERS^21-029^boxes^55^100^N
+71 ;;^UTILITY(U,$J,112,2522,1)
+72 ;;=6.18^13.43^75.33^446^3.75^^^17^2.2^16^96^84^408^.45^.076^.487^.47^40^1.2^.37
+73 ;;^UTILITY(U,$J,112,2522,2)
+74 ;;=.36^3.67^.32^.03^33^.07^1.367^.168^16^5.272^5.649^1.558^12^1.31
+75 ;;^UTILITY(U,$J,112,2522,3)
+76 ;;=.081^.202^.261^.474^.229^.127^.12^.315^.216^.299^.259^.148^.216^.333^1.866^.207^.67^.329
+77 ;;^UTILITY(U,$J,112,2522,4)
+78 ;;=.01^.019^.215^3.109^.409^1.741^5.2^.024
+79 ;;^UTILITY(U,$J,112,2522,20)
+80 ;;=USDA Std. Reference, Release 10
+81 ;;^UTILITY(U,$J,112,2523,0)
+82 ;;=FF, COOKIES, CHOCOLATE CHIP^21-030^boxes^85^100^N
+83 ;;^UTILITY(U,$J,112,2523,1)
+84 ;;=5.25^22.08^65.86^423^5.36^^^36^2.68^30^95^149^342^.61^.335^.431^.67^94^1^.16
+85 ;;^UTILITY(U,$J,112,2523,2)
+86 ;;=.35^2.53^.26^.05^29^.19^1.697^.168^21^9.709^9.185^1.865^27^1.44
+87 ;;^UTILITY(U,$J,112,2523,3)
+88 ;;=.063^.146^.175^.332^.137^.081^.096^.246^.156^.218^.215^.107^.171^.261^1.491^.185^.505^.24
+89 ;;^UTILITY(U,$J,112,2523,4)
+90 ;;=^.006^.174^5.14^.46^4.333^8.725
+91 ;;^UTILITY(U,$J,112,2523,20)
+92 ;;=USDA Std. Reference, Release 10
+93 ;;^UTILITY(U,$J,112,2524,0)
+94 ;;=FF, FRIED PIE, FRUIT (APPLE, CHERRY, OR LEMON)^21-031^pies^85^100^N
+95 ;;^UTILITY(U,$J,112,2524,1)
+96 ;;=2.84^16.91^38.88^313^40.16^^^15^1.04^9^44^60^382^.2^.051^.203^.43^175^1.3^.12
+97 ;;^UTILITY(U,$J,112,2524,2)
+98 ;;=.09^1.15^.18^.04^5^.09^1.211^.14^15^7.663^6.859^1.364^39^1.21
+99 ;;^UTILITY(U,$J,112,2524,3)
+100 ;;=.035^.077^.098^.193^.065^.05^.059^.14^.084^.114^.113^.063^.091^.139^.935^.101^.322^.14