FHINI07J ; ; 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,2619,2)
;;=.13^4.43^.73^.09^22^.63^^^19^2.082^5.235^2.85^16^1.53
;;^UTILITY(U,$J,112,2619,3)
;;=.134^.462^.521^.907^.842^.295^.15^.495^.359^.596^.633^.314^.619^1.022^2.324^.531^.669^.512
;;^UTILITY(U,$J,112,2619,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2620,0)
;;=FF, COLESLAW^21-127^cups^132^100^N
;;^UTILITY(U,$J,112,2620,1)
;;=1.47^11.08^12.88^148^74.02^^^34^.73^9^36^179^270^.2^.042^.125^^341^8.4^.04
;;^UTILITY(U,$J,112,2620,2)
;;=.03^.08^.15^.11^39^.18^5.678^.781^5^1.622^2.444^6.459^50^.55
;;^UTILITY(U,$J,112,2620,3)
;;=.018^.053^.069^.082^.072^.02^.019^.05^.032^.065^.088^.03^.056^.142^.275^.041^.196^.081
;;^UTILITY(U,$J,112,2620,4)
;;=^^.009^1.156^.015^.458^2.429^^57
;;^UTILITY(U,$J,112,2620,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2621,0)
;;=FF, CORN ON THE COB W/ BUTTER^21-128^ears^146^55^N
;;^UTILITY(U,$J,112,2621,1)
;;=3.06^2.35^21.88^106^72.05^^^3^.6^28^74^246^20^.62^0^0^^268^4.7^.17
;;^UTILITY(U,$J,112,2621,2)
;;=.07^1.49^.25^.22^30^0^.384^.035^4^1.125^.688^.419^66^.65
;;^UTILITY(U,$J,112,2621,3)
;;=.022^.123^.123^.331^.131^.064^.025^.143^.117^.177^.124^.085^.28^.232^.606^.121^.278^.146
;;^UTILITY(U,$J,112,2621,4)
;;=.041^.047^.169^.555^.038^.214^.65^0
;;^UTILITY(U,$J,112,2621,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2622,0)
;;=FF, HUSH PUPPIES^21-129^puppies^15.6^100^N
;;^UTILITY(U,$J,112,2622,1)
;;=6.25^14.86^44.74^329^32.29^^^88^1.83^21^244^241^1237^.55^.262^.342^^120^0^0
;;^UTILITY(U,$J,112,2622,2)
;;=.03^2.6^.28^.13^27^.22^.461^.037^173^3.444^10.024^.498^34^1.86
;;^UTILITY(U,$J,112,2622,3)
;;=.067^.258^.291^.667^.29^.153^.115^.314^.258^.363^.329^.173^.395^.488^1.063^.223^.454^.35
;;^UTILITY(U,$J,112,2622,4)
;;=.042^.024^.07^1.761^.238^1.508^9.787
;;^UTILITY(U,$J,112,2622,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2623,0)
;;=FF, ONION RINGS, BREADED AND FRIED^21-130^rings^9.8^100^N
;;^UTILITY(U,$J,112,2623,1)
;;=4.46^18.69^37.74^332^37.09^^^88^1.02^19^104^156^518^.42^.083^.357^.4^10^.7^.1
;;^UTILITY(U,$J,112,2623,2)
;;=.12^1.11^.24^.07^14^.15^.672^.129^17^8.377^8.013^.801^1^2.03
;;^UTILITY(U,$J,112,2623,3)
;;=.059^.126^.178^.292^.126^.068^.09^.203^.131^.181^.271^.091^.144^.205^1.375^.164^.435^.214
;;^UTILITY(U,$J,112,2623,4)
;;=.034^.031^.53^4.897^.227^2.786^7.786
;;^UTILITY(U,$J,112,2623,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2624,0)
;;=FF, POTATO, BAKED AND TOPPED W/ CHEESE SAUCE^21-131^potatos^296^100^N
;;^UTILITY(U,$J,112,2624,1)
;;=4.94^9.71^15.71^160^65.75^^^105^1.02^22^108^394^129^.64^.213^.174^^282^8.8^.08
;;^UTILITY(U,$J,112,2624,2)
;;=.07^1.13^.44^.24^9^.06^^^6^3.567^3.615^2.042^77^1.72
;;^UTILITY(U,$J,112,2624,3)
;;=.064^.167^.256^.391^.353^.106^.035^.233^.208^.295^.189^.143^.136^.579^1.02^.1^.406^.249
;;^UTILITY(U,$J,112,2624,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2625,0)
;;=FF, POTATO, BAKED AND TOPPED W/ CHEESE SAUCE AND BACON^21-132^potatos^299^100^N
;;^UTILITY(U,$J,112,2625,1)
;;=6.16^8.66^14.86^151^65.02^^^103^1.05^23^116^394^325^.72^.216^.169^^210^9.6^.09
;;^UTILITY(U,$J,112,2625,2)
;;=.08^1.33^.43^.25^10^.11^^^10^3.389^3.249^1.589^58^1.72
;;^UTILITY(U,$J,112,2625,3)
;;=.078^.216^.314^.486^.45^.135^.047^.286^.251^.363^.26^.181^.198^.701^1.227^.174^.487^.304
;;^UTILITY(U,$J,112,2625,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2626,0)
;;=FF, POTATO, BAKED AND TOPPED W/ CHEESE SAUCE AND BROCCOLI^21-133^potatos^339^100^N
;;^UTILITY(U,$J,112,2626,1)
;;=4.03^6.32^13.74^119^70.04^^^99^.98^23^102^425^143^.6^.191^.237^^500^14.3^.08
;;^UTILITY(U,$J,112,2626,2)
;;=.08^1.06^.42^.23^18^.1^^^6^2.511^2.265^1.232^82^1.61
;;^UTILITY(U,$J,112,2626,3)
;;=.051^.136^.203^.305^.279^.083^.029^.183^.161^.235^.16^.112^.117^.456^.801^.087^.314^.197
;;^UTILITY(U,$J,112,2626,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2627,0)
;;=FF, POTATO, BAKED AND TOPPED W/ CHEESE SAUCE AND CHILI^21-134^potatos^395^100^N
;;^UTILITY(U,$J,112,2627,1)
;;=5.88^5.53^14.14^122^70.08^^^104^1.55^28^126^398^177^.96^.209^.171^^194^8^.07
;;^UTILITY(U,$J,112,2627,2)
;;=.09^1.06^.65^.24^13^.06^^^8^3.3^1.731^.227^44^1.79
;;^UTILITY(U,$J,112,2627,3)
;;=.074^.205^.292^.461^.423^.124^.045^.269^.231^.336^.252^.17^.193^.663^1.177^.163^.442^.286
;;^UTILITY(U,$J,112,2627,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2628,0)
;;=FF, POTATO, BAKED AND TOPPED W/ SOUR CREAM AND CHIVES^21-135^potatos^302^100^N
;;^UTILITY(U,$J,112,2628,1)
;;=2.21^7.39^16.56^130^69.45^^^35^1.03^23^61^458^60^.3^.227^.192^^446^11.2^.09
FHINI07J ; ; 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,2619,2)
+2 ;;=.13^4.43^.73^.09^22^.63^^^19^2.082^5.235^2.85^16^1.53
+3 ;;^UTILITY(U,$J,112,2619,3)
+4 ;;=.134^.462^.521^.907^.842^.295^.15^.495^.359^.596^.633^.314^.619^1.022^2.324^.531^.669^.512
+5 ;;^UTILITY(U,$J,112,2619,20)
+6 ;;=USDA Std. Reference, Release 10
+7 ;;^UTILITY(U,$J,112,2620,0)
+8 ;;=FF, COLESLAW^21-127^cups^132^100^N
+9 ;;^UTILITY(U,$J,112,2620,1)
+10 ;;=1.47^11.08^12.88^148^74.02^^^34^.73^9^36^179^270^.2^.042^.125^^341^8.4^.04
+11 ;;^UTILITY(U,$J,112,2620,2)
+12 ;;=.03^.08^.15^.11^39^.18^5.678^.781^5^1.622^2.444^6.459^50^.55
+13 ;;^UTILITY(U,$J,112,2620,3)
+14 ;;=.018^.053^.069^.082^.072^.02^.019^.05^.032^.065^.088^.03^.056^.142^.275^.041^.196^.081
+15 ;;^UTILITY(U,$J,112,2620,4)
+16 ;;=^^.009^1.156^.015^.458^2.429^^57
+17 ;;^UTILITY(U,$J,112,2620,20)
+18 ;;=USDA Std. Reference, Release 10
+19 ;;^UTILITY(U,$J,112,2621,0)
+20 ;;=FF, CORN ON THE COB W/ BUTTER^21-128^ears^146^55^N
+21 ;;^UTILITY(U,$J,112,2621,1)
+22 ;;=3.06^2.35^21.88^106^72.05^^^3^.6^28^74^246^20^.62^0^0^^268^4.7^.17
+23 ;;^UTILITY(U,$J,112,2621,2)
+24 ;;=.07^1.49^.25^.22^30^0^.384^.035^4^1.125^.688^.419^66^.65
+25 ;;^UTILITY(U,$J,112,2621,3)
+26 ;;=.022^.123^.123^.331^.131^.064^.025^.143^.117^.177^.124^.085^.28^.232^.606^.121^.278^.146
+27 ;;^UTILITY(U,$J,112,2621,4)
+28 ;;=.041^.047^.169^.555^.038^.214^.65^0
+29 ;;^UTILITY(U,$J,112,2621,20)
+30 ;;=USDA Std. Reference, Release 10
+31 ;;^UTILITY(U,$J,112,2622,0)
+32 ;;=FF, HUSH PUPPIES^21-129^puppies^15.6^100^N
+33 ;;^UTILITY(U,$J,112,2622,1)
+34 ;;=6.25^14.86^44.74^329^32.29^^^88^1.83^21^244^241^1237^.55^.262^.342^^120^0^0
+35 ;;^UTILITY(U,$J,112,2622,2)
+36 ;;=.03^2.6^.28^.13^27^.22^.461^.037^173^3.444^10.024^.498^34^1.86
+37 ;;^UTILITY(U,$J,112,2622,3)
+38 ;;=.067^.258^.291^.667^.29^.153^.115^.314^.258^.363^.329^.173^.395^.488^1.063^.223^.454^.35
+39 ;;^UTILITY(U,$J,112,2622,4)
+40 ;;=.042^.024^.07^1.761^.238^1.508^9.787
+41 ;;^UTILITY(U,$J,112,2622,20)
+42 ;;=USDA Std. Reference, Release 10
+43 ;;^UTILITY(U,$J,112,2623,0)
+44 ;;=FF, ONION RINGS, BREADED AND FRIED^21-130^rings^9.8^100^N
+45 ;;^UTILITY(U,$J,112,2623,1)
+46 ;;=4.46^18.69^37.74^332^37.09^^^88^1.02^19^104^156^518^.42^.083^.357^.4^10^.7^.1
+47 ;;^UTILITY(U,$J,112,2623,2)
+48 ;;=.12^1.11^.24^.07^14^.15^.672^.129^17^8.377^8.013^.801^1^2.03
+49 ;;^UTILITY(U,$J,112,2623,3)
+50 ;;=.059^.126^.178^.292^.126^.068^.09^.203^.131^.181^.271^.091^.144^.205^1.375^.164^.435^.214
+51 ;;^UTILITY(U,$J,112,2623,4)
+52 ;;=.034^.031^.53^4.897^.227^2.786^7.786
+53 ;;^UTILITY(U,$J,112,2623,20)
+54 ;;=USDA Std. Reference, Release 10
+55 ;;^UTILITY(U,$J,112,2624,0)
+56 ;;=FF, POTATO, BAKED AND TOPPED W/ CHEESE SAUCE^21-131^potatos^296^100^N
+57 ;;^UTILITY(U,$J,112,2624,1)
+58 ;;=4.94^9.71^15.71^160^65.75^^^105^1.02^22^108^394^129^.64^.213^.174^^282^8.8^.08
+59 ;;^UTILITY(U,$J,112,2624,2)
+60 ;;=.07^1.13^.44^.24^9^.06^^^6^3.567^3.615^2.042^77^1.72
+61 ;;^UTILITY(U,$J,112,2624,3)
+62 ;;=.064^.167^.256^.391^.353^.106^.035^.233^.208^.295^.189^.143^.136^.579^1.02^.1^.406^.249
+63 ;;^UTILITY(U,$J,112,2624,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,2625,0)
+66 ;;=FF, POTATO, BAKED AND TOPPED W/ CHEESE SAUCE AND BACON^21-132^potatos^299^100^N
+67 ;;^UTILITY(U,$J,112,2625,1)
+68 ;;=6.16^8.66^14.86^151^65.02^^^103^1.05^23^116^394^325^.72^.216^.169^^210^9.6^.09
+69 ;;^UTILITY(U,$J,112,2625,2)
+70 ;;=.08^1.33^.43^.25^10^.11^^^10^3.389^3.249^1.589^58^1.72
+71 ;;^UTILITY(U,$J,112,2625,3)
+72 ;;=.078^.216^.314^.486^.45^.135^.047^.286^.251^.363^.26^.181^.198^.701^1.227^.174^.487^.304
+73 ;;^UTILITY(U,$J,112,2625,20)
+74 ;;=USDA Std. Reference, Release 10
+75 ;;^UTILITY(U,$J,112,2626,0)
+76 ;;=FF, POTATO, BAKED AND TOPPED W/ CHEESE SAUCE AND BROCCOLI^21-133^potatos^339^100^N
+77 ;;^UTILITY(U,$J,112,2626,1)
+78 ;;=4.03^6.32^13.74^119^70.04^^^99^.98^23^102^425^143^.6^.191^.237^^500^14.3^.08
+79 ;;^UTILITY(U,$J,112,2626,2)
+80 ;;=.08^1.06^.42^.23^18^.1^^^6^2.511^2.265^1.232^82^1.61
+81 ;;^UTILITY(U,$J,112,2626,3)
+82 ;;=.051^.136^.203^.305^.279^.083^.029^.183^.161^.235^.16^.112^.117^.456^.801^.087^.314^.197
+83 ;;^UTILITY(U,$J,112,2626,20)
+84 ;;=USDA Std. Reference, Release 10
+85 ;;^UTILITY(U,$J,112,2627,0)
+86 ;;=FF, POTATO, BAKED AND TOPPED W/ CHEESE SAUCE AND CHILI^21-134^potatos^395^100^N
+87 ;;^UTILITY(U,$J,112,2627,1)
+88 ;;=5.88^5.53^14.14^122^70.08^^^104^1.55^28^126^398^177^.96^.209^.171^^194^8^.07
+89 ;;^UTILITY(U,$J,112,2627,2)
+90 ;;=.09^1.06^.65^.24^13^.06^^^8^3.3^1.731^.227^44^1.79
+91 ;;^UTILITY(U,$J,112,2627,3)
+92 ;;=.074^.205^.292^.461^.423^.124^.045^.269^.231^.336^.252^.17^.193^.663^1.177^.163^.442^.286
+93 ;;^UTILITY(U,$J,112,2627,20)
+94 ;;=USDA Std. Reference, Release 10
+95 ;;^UTILITY(U,$J,112,2628,0)
+96 ;;=FF, POTATO, BAKED AND TOPPED W/ SOUR CREAM AND CHIVES^21-135^potatos^302^100^N
+97 ;;^UTILITY(U,$J,112,2628,1)
+98 ;;=2.21^7.39^16.56^130^69.45^^^35^1.03^23^61^458^60^.3^.227^.192^^446^11.2^.09
