FHINI05G ; ; 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,1858,0)
;;=SPAGHETTI, IN TOMATO SAUCE W/CHEESE, HOME RECIPE^2163-0^cups^250^100^N
;;^UTILITY(U,$J,112,1858,1)
;;=3.5^3.5^14.8^104^77^^^32^.9^^54^163^382^^^^^430^5^.1
;;^UTILITY(U,$J,112,1858,2)
;;=.07^.9^^^^^.28^^3^.8^^^^1.2
;;^UTILITY(U,$J,112,1858,4)
;;=^^^^^^2.16
;;^UTILITY(U,$J,112,1858,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1859,0)
;;=SPAGHETTI, IN TOMATO SAUCE W/CHEESE, CND^2164-0^cups^250^100^N
;;^UTILITY(U,$J,112,1859,1)
;;=2.2^.6^15.4^76^80.1^^^16^1.1^^35^121^382^^^^^370^4^.14
;;^UTILITY(U,$J,112,1859,2)
;;=.11^1.8^^^^^0^^3^0^^^^1.7
;;^UTILITY(U,$J,112,1859,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1859,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1860,0)
;;=SPAGHETTI AND MEAT BALLS, IN TOMATO SAUCE, HOME RECIPE^2165-0^servings^537^100^N
;;^UTILITY(U,$J,112,1860,1)
;;=7.5^4.7^15.6^134^70^^^50^1.5^^95^268^407^^^^^640^9^.1
;;^UTILITY(U,$J,112,1860,2)
;;=.12^1.6^^^^^.36^^30^1.34^^^^2.2
;;^UTILITY(U,$J,112,1860,4)
;;=^^^^^^2.55
;;^UTILITY(U,$J,112,1860,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1861,0)
;;=SPAGHETTI AND MEAT BALLS, IN TOMATO SAUCE, CND^2166-0^cups^250^100^N
;;^UTILITY(U,$J,112,1861,1)
;;=4.9^4.1^11.4^103^78^^^21^1.3^^45^98^488^^^^^400^2^.06
;;^UTILITY(U,$J,112,1861,2)
;;=.07^.9^^^^^1.57^^9^.86^^^^1.6
;;^UTILITY(U,$J,112,1861,4)
;;=^^^^^^1.3
;;^UTILITY(U,$J,112,1861,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1862,0)
;;=RICE, SPANISH STYLE, HOME RECIPE^2168-0^cups^245^465^N
;;^UTILITY(U,$J,112,1862,1)
;;=1.8^1.7^16.6^87^78.5^^^14^.6^^39^231^316^^^^^660^15^.04
;;^UTILITY(U,$J,112,1862,2)
;;=.03^.7^^^^^0^^0^0^^^^1.4
;;^UTILITY(U,$J,112,1862,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1862,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1863,0)
;;=SPINACH, RAW^11-457^cups^55^72^N
;;^UTILITY(U,$J,112,1863,1)
;;=2.86^.35^3.5^22^91.58^^^99^2.71^79^49^558^79^.53^.13^.897^^6715^28.1^.078
;;^UTILITY(U,$J,112,1863,2)
;;=.189^.724^.065^.195^194.4^0^.022^.115^0^.056^.01^.146^672^1.72^^^2.7
;;^UTILITY(U,$J,112,1863,3)
;;=.039^.122^.147^.223^.174^.053^.035^.129^.108^.161^.162^.064^.142^.24^.343^.134^.112^.104
;;^UTILITY(U,$J,112,1863,4)
;;=^^.008^.041^.004^.003^.004^^400^1
;;^UTILITY(U,$J,112,1863,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1864,0)
;;=SPINACH, CKD WO/SALT^11-458^cups^180^100^N
;;^UTILITY(U,$J,112,1864,1)
;;=2.97^.26^3.75^23^91.21^^^136^3.57^87^56^466^70^.76^.174^.935^^8190^9.8^.095
;;^UTILITY(U,$J,112,1864,2)
;;=.236^.49^.145^.242^145.8^0^.016^.085^0^.042^.007^.108^819^1.81^^^1.8
;;^UTILITY(U,$J,112,1864,3)
;;=.04^.127^.152^.231^.182^.055^.035^.134^.113^.168^.168^.066^.147^.25^.357^.14^.116^.107
;;^UTILITY(U,$J,112,1864,4)
;;=^^.006^.031^.003^.003^.003^^^1.5
;;^UTILITY(U,$J,112,1864,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1865,0)
;;=SPINACH, CKD W/SALT^11-854^cups^180^100^N
;;^UTILITY(U,$J,112,1865,1)
;;=2.97^.26^3.75^23^91.21^^^136^3.57^87^56^466^306^.76^.174^.935^^8190^9.8^.095
;;^UTILITY(U,$J,112,1865,2)
;;=.236^.49^.145^.242^145.8^0^.016^.085^0^.042^.007^.108^819^1.81
;;^UTILITY(U,$J,112,1865,3)
;;=.04^.127^.152^.231^.182^.055^.035^.134^.113^.168^.168^.066^.147^.25^.357^.14^.116^.107
;;^UTILITY(U,$J,112,1865,4)
;;=^^.006^.031^.003^.003^.003
;;^UTILITY(U,$J,112,1865,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1867,0)
;;=SPINACH, CND, REG PK, DRAINED SOLIDS^11-461^cups^205^100^N
;;^UTILITY(U,$J,112,1867,1)
;;=2.81^.5^3.4^23^91.78^^^127^2.3^76^44^346^27^.46^.18^.597^^8776^14.3^.016
;;^UTILITY(U,$J,112,1867,2)
;;=.138^.388^.047^.1^97.8^0^.031^.165^0^.081^.014^.209^878^1.51
;;^UTILITY(U,$J,112,1867,3)
;;=.038^.12^.144^.219^.172^.052^.034^.127^.106^.158^.159^.062^.139^.236^.338^.132^.11^.102
;;^UTILITY(U,$J,112,1867,4)
;;=^^.011^.059^.006^.005^.006
;;^UTILITY(U,$J,112,1867,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1868,0)
;;=SPINACH, CND, DIET PK, LO NA^11-855^cups^232^100^N
;;^UTILITY(U,$J,112,1868,1)
;;=2.11^.37^2.92^19^93.22^^^83^1.58^56^32^230^75^.42^.116^.493^^6432^13.5^.018
;;^UTILITY(U,$J,112,1868,2)
;;=.106^.271^.038^.08^58^0^.023^.122^0^.06^.01^.155^643^1.38^^^2.2
;;^UTILITY(U,$J,112,1868,3)
;;=.028^.09^.108^.164^.129^.039^.025^.095^.08^.119^.119^.047^.104^.177^.253^.099^.082^.076
;;^UTILITY(U,$J,112,1868,4)
;;=^^.008^.044^.005^.004^.005
;;^UTILITY(U,$J,112,1868,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1870,0)
;;=SPINACH, FRZ, CHOPPED, CKD WO/SALT^11-464^cups^205^100^N
FHINI05G ; ; 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,1858,0)
+2 ;;=SPAGHETTI, IN TOMATO SAUCE W/CHEESE, HOME RECIPE^2163-0^cups^250^100^N
+3 ;;^UTILITY(U,$J,112,1858,1)
+4 ;;=3.5^3.5^14.8^104^77^^^32^.9^^54^163^382^^^^^430^5^.1
+5 ;;^UTILITY(U,$J,112,1858,2)
+6 ;;=.07^.9^^^^^.28^^3^.8^^^^1.2
+7 ;;^UTILITY(U,$J,112,1858,4)
+8 ;;=^^^^^^2.16
+9 ;;^UTILITY(U,$J,112,1858,20)
+10 ;;=USDA Std. Reference, Release 8
+11 ;;^UTILITY(U,$J,112,1859,0)
+12 ;;=SPAGHETTI, IN TOMATO SAUCE W/CHEESE, CND^2164-0^cups^250^100^N
+13 ;;^UTILITY(U,$J,112,1859,1)
+14 ;;=2.2^.6^15.4^76^80.1^^^16^1.1^^35^121^382^^^^^370^4^.14
+15 ;;^UTILITY(U,$J,112,1859,2)
+16 ;;=.11^1.8^^^^^0^^3^0^^^^1.7
+17 ;;^UTILITY(U,$J,112,1859,4)
+18 ;;=^^^^^^0
+19 ;;^UTILITY(U,$J,112,1859,20)
+20 ;;=USDA Std. Reference, Release 8
+21 ;;^UTILITY(U,$J,112,1860,0)
+22 ;;=SPAGHETTI AND MEAT BALLS, IN TOMATO SAUCE, HOME RECIPE^2165-0^servings^537^100^N
+23 ;;^UTILITY(U,$J,112,1860,1)
+24 ;;=7.5^4.7^15.6^134^70^^^50^1.5^^95^268^407^^^^^640^9^.1
+25 ;;^UTILITY(U,$J,112,1860,2)
+26 ;;=.12^1.6^^^^^.36^^30^1.34^^^^2.2
+27 ;;^UTILITY(U,$J,112,1860,4)
+28 ;;=^^^^^^2.55
+29 ;;^UTILITY(U,$J,112,1860,20)
+30 ;;=USDA Std. Reference, Release 8
+31 ;;^UTILITY(U,$J,112,1861,0)
+32 ;;=SPAGHETTI AND MEAT BALLS, IN TOMATO SAUCE, CND^2166-0^cups^250^100^N
+33 ;;^UTILITY(U,$J,112,1861,1)
+34 ;;=4.9^4.1^11.4^103^78^^^21^1.3^^45^98^488^^^^^400^2^.06
+35 ;;^UTILITY(U,$J,112,1861,2)
+36 ;;=.07^.9^^^^^1.57^^9^.86^^^^1.6
+37 ;;^UTILITY(U,$J,112,1861,4)
+38 ;;=^^^^^^1.3
+39 ;;^UTILITY(U,$J,112,1861,20)
+40 ;;=USDA Std. Reference, Release 8
+41 ;;^UTILITY(U,$J,112,1862,0)
+42 ;;=RICE, SPANISH STYLE, HOME RECIPE^2168-0^cups^245^465^N
+43 ;;^UTILITY(U,$J,112,1862,1)
+44 ;;=1.8^1.7^16.6^87^78.5^^^14^.6^^39^231^316^^^^^660^15^.04
+45 ;;^UTILITY(U,$J,112,1862,2)
+46 ;;=.03^.7^^^^^0^^0^0^^^^1.4
+47 ;;^UTILITY(U,$J,112,1862,4)
+48 ;;=^^^^^^0
+49 ;;^UTILITY(U,$J,112,1862,20)
+50 ;;=USDA Std. Reference, Release 8
+51 ;;^UTILITY(U,$J,112,1863,0)
+52 ;;=SPINACH, RAW^11-457^cups^55^72^N
+53 ;;^UTILITY(U,$J,112,1863,1)
+54 ;;=2.86^.35^3.5^22^91.58^^^99^2.71^79^49^558^79^.53^.13^.897^^6715^28.1^.078
+55 ;;^UTILITY(U,$J,112,1863,2)
+56 ;;=.189^.724^.065^.195^194.4^0^.022^.115^0^.056^.01^.146^672^1.72^^^2.7
+57 ;;^UTILITY(U,$J,112,1863,3)
+58 ;;=.039^.122^.147^.223^.174^.053^.035^.129^.108^.161^.162^.064^.142^.24^.343^.134^.112^.104
+59 ;;^UTILITY(U,$J,112,1863,4)
+60 ;;=^^.008^.041^.004^.003^.004^^400^1
+61 ;;^UTILITY(U,$J,112,1863,20)
+62 ;;=USDA Std. Reference, Release 10
+63 ;;^UTILITY(U,$J,112,1864,0)
+64 ;;=SPINACH, CKD WO/SALT^11-458^cups^180^100^N
+65 ;;^UTILITY(U,$J,112,1864,1)
+66 ;;=2.97^.26^3.75^23^91.21^^^136^3.57^87^56^466^70^.76^.174^.935^^8190^9.8^.095
+67 ;;^UTILITY(U,$J,112,1864,2)
+68 ;;=.236^.49^.145^.242^145.8^0^.016^.085^0^.042^.007^.108^819^1.81^^^1.8
+69 ;;^UTILITY(U,$J,112,1864,3)
+70 ;;=.04^.127^.152^.231^.182^.055^.035^.134^.113^.168^.168^.066^.147^.25^.357^.14^.116^.107
+71 ;;^UTILITY(U,$J,112,1864,4)
+72 ;;=^^.006^.031^.003^.003^.003^^^1.5
+73 ;;^UTILITY(U,$J,112,1864,20)
+74 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+75 ;;^UTILITY(U,$J,112,1865,0)
+76 ;;=SPINACH, CKD W/SALT^11-854^cups^180^100^N
+77 ;;^UTILITY(U,$J,112,1865,1)
+78 ;;=2.97^.26^3.75^23^91.21^^^136^3.57^87^56^466^306^.76^.174^.935^^8190^9.8^.095
+79 ;;^UTILITY(U,$J,112,1865,2)
+80 ;;=.236^.49^.145^.242^145.8^0^.016^.085^0^.042^.007^.108^819^1.81
+81 ;;^UTILITY(U,$J,112,1865,3)
+82 ;;=.04^.127^.152^.231^.182^.055^.035^.134^.113^.168^.168^.066^.147^.25^.357^.14^.116^.107
+83 ;;^UTILITY(U,$J,112,1865,4)
+84 ;;=^^.006^.031^.003^.003^.003
+85 ;;^UTILITY(U,$J,112,1865,20)
+86 ;;=USDA Std. Reference, Release 10
+87 ;;^UTILITY(U,$J,112,1867,0)
+88 ;;=SPINACH, CND, REG PK, DRAINED SOLIDS^11-461^cups^205^100^N
+89 ;;^UTILITY(U,$J,112,1867,1)
+90 ;;=2.81^.5^3.4^23^91.78^^^127^2.3^76^44^346^27^.46^.18^.597^^8776^14.3^.016
+91 ;;^UTILITY(U,$J,112,1867,2)
+92 ;;=.138^.388^.047^.1^97.8^0^.031^.165^0^.081^.014^.209^878^1.51
+93 ;;^UTILITY(U,$J,112,1867,3)
+94 ;;=.038^.12^.144^.219^.172^.052^.034^.127^.106^.158^.159^.062^.139^.236^.338^.132^.11^.102
+95 ;;^UTILITY(U,$J,112,1867,4)
+96 ;;=^^.011^.059^.006^.005^.006
+97 ;;^UTILITY(U,$J,112,1867,20)
+98 ;;=USDA Std. Reference, Release 10
+99 ;;^UTILITY(U,$J,112,1868,0)
+100 ;;=SPINACH, CND, DIET PK, LO NA^11-855^cups^232^100^N
+101 ;;^UTILITY(U,$J,112,1868,1)
+102 ;;=2.11^.37^2.92^19^93.22^^^83^1.58^56^32^230^75^.42^.116^.493^^6432^13.5^.018
+103 ;;^UTILITY(U,$J,112,1868,2)
+104 ;;=.106^.271^.038^.08^58^0^.023^.122^0^.06^.01^.155^643^1.38^^^2.2
+105 ;;^UTILITY(U,$J,112,1868,3)
+106 ;;=.028^.09^.108^.164^.129^.039^.025^.095^.08^.119^.119^.047^.104^.177^.253^.099^.082^.076
+107 ;;^UTILITY(U,$J,112,1868,4)
+108 ;;=^^.008^.044^.005^.004^.005
+109 ;;^UTILITY(U,$J,112,1868,20)
+110 ;;=USDA Std. Reference, Release 10
+111 ;;^UTILITY(U,$J,112,1870,0)
+112 ;;=SPINACH, FRZ, CHOPPED, CKD WO/SALT^11-464^cups^205^100^N