FHINI046 ; ; 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,1368,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1369,0)
;;=OKRA, CKD W/SALT^11-803^cups^160^100^N
;;^UTILITY(U,$J,112,1369,1)
;;=1.87^.17^7.21^32^89.91^^^63^.45^57^56^322^241^.55^.086^.911^^575^16.3^.132
;;^UTILITY(U,$J,112,1369,2)
;;=.055^.871^.213^.187^45.7^0^.045^.001^0^.045^.028^.046^58^.84
;;^UTILITY(U,$J,112,1369,3)
;;=.016^.061^.065^.098^.075^.02^.018^.061^.081^.085^.078^.029^.068^.135^.253^.041^.042^.041
;;^UTILITY(U,$J,112,1369,4)
;;=^^0^.038^0^.004^.028^0
;;^UTILITY(U,$J,112,1369,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1370,0)
;;=OKRA, FRZ, CKD WO/SALT^11-281^cups^185^100^N
;;^UTILITY(U,$J,112,1370,1)
;;=2.08^.3^8.17^37^91.12^^^96^.67^51^46^234^3^.62^.097^1.021^^514^12.2^.099
;;^UTILITY(U,$J,112,1370,2)
;;=.123^.785^.24^.047^145.6^0^.079^.002^0^.079^.05^.081^51^.75^^^4.5
;;^UTILITY(U,$J,112,1370,3)
;;=.017^.068^.072^.109^.084^.022^.02^.068^.091^.095^.087^.033^.075^.151^.282^.046^.046^.045
;;^UTILITY(U,$J,112,1370,4)
;;=^^0^.068^.001^.008^.05^0
;;^UTILITY(U,$J,112,1370,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1371,0)
;;=OKRA, FRZ, CKD W/SALT^11-804^cups^185^100^N
;;^UTILITY(U,$J,112,1371,1)
;;=2.08^.3^8.17^37^91.12^^^96^.67^51^46^234^239^.62^.097^1.021^^514^12.2^.099
;;^UTILITY(U,$J,112,1371,2)
;;=.123^.785^.24^.047^145.6^0^.079^.002^0^.079^.05^.081^51^.75
;;^UTILITY(U,$J,112,1371,3)
;;=.017^.068^.072^.109^.084^.022^.02^.068^.091^.095^.087^.033^.075^.151^.282^.046^.046^.045
;;^UTILITY(U,$J,112,1371,4)
;;=^^0^.068^.001^.008^.05^0
;;^UTILITY(U,$J,112,1371,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1372,0)
;;=OLIVES, CND OR BOTTLED, GREEN^1406-0^olives^3.86^100^N
;;^UTILITY(U,$J,112,1372,1)
;;=1.4^12.7^1.3^116^78.2^^^61^1.6^^17^55^2400^^^^^300^0^0
;;^UTILITY(U,$J,112,1372,2)
;;=0^0^^^^^.89^^0^1.4^^^^6.4^^^2.6
;;^UTILITY(U,$J,112,1372,4)
;;=^^^^^^9.65
;;^UTILITY(U,$J,112,1372,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1373,0)
;;=OLIVES, CND OR BOTTLED, RIPE, (ASCOLANO), GIANT^1407-0^olives^5.59^^N
;;^UTILITY(U,$J,112,1373,1)
;;=1.1^13.8^2.6^129^80^^^84^1.6^^16^34^813^^^^^60^0^0
;;^UTILITY(U,$J,112,1373,2)
;;=0^0^^^^^.97^^0^1.52
;;^UTILITY(U,$J,112,1373,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1374,0)
;;=OLIVES, CND OR BOTTLED, RIPE, (MANZANILLA)^9-193^olives^3.44^100^N
;;^UTILITY(U,$J,112,1374,1)
;;=.84^10.68^6.26^115^79.99^^^88^3.3^4^3^8^872^.22^.251^.02^^403^.9^.003
;;^UTILITY(U,$J,112,1374,2)
;;=0^.037^.015^.009^0^0^.847^.064^0^1.415^7.888^.911^40^2.23
;;^UTILITY(U,$J,112,1374,3)
;;=^.026^.031^.05^.032^.012^^.029^.023^.038^.067^.023^.043^.092^.093^.049^.04^.031
;;^UTILITY(U,$J,112,1374,4)
;;=^^0^1.179^.086^.236^7.77^^^.9
;;^UTILITY(U,$J,112,1374,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1375,0)
;;=OLIVES, CND OR BOTTLED, RIPE, (MISSION)^1409-0^olives^3.44^^N
;;^UTILITY(U,$J,112,1375,1)
;;=1.2^20.1^3.2^184^73^^^106^1.7^^17^27^750^^^^^70^0^0
;;^UTILITY(U,$J,112,1375,2)
;;=0^0^^^^^1.41^^0^2.21
;;^UTILITY(U,$J,112,1375,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1376,0)
;;=OLIVES, CND OR BOTTLED, RIPE, (SEVILLANO), GIANT^1410-0^olives^8.17^^N
;;^UTILITY(U,$J,112,1376,1)
;;=1.1^9.5^2.7^93^84.4^^^74^1.6^^20^44^828^^^^^60^0^0
;;^UTILITY(U,$J,112,1376,2)
;;=0^0^^^^^.66^^0^1.04
;;^UTILITY(U,$J,112,1376,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1377,0)
;;=OLIVES, RIPE, SALT-CURED, OIL-COATED, GREEK STYLE^1411-0^olives^1.92^100^N
;;^UTILITY(U,$J,112,1377,1)
;;=2.2^35.8^8.7^338^43.8^^^84^1.6^^29^34^3288^^^^^60^0^0
;;^UTILITY(U,$J,112,1377,2)
;;=0^0^^^^^2.51^^0^3.94^^^^9.5
;;^UTILITY(U,$J,112,1377,4)
;;=^^^^^^27.21
;;^UTILITY(U,$J,112,1377,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1378,0)
;;=ONIONS, YEL, RAW^11-282^cups^170^90^N
;;^UTILITY(U,$J,112,1378,1)
;;=1.16^.16^8.63^38^89.68^^^20^.22^10^33^157^3^.19^.06^.137^.31^0^6.4^.042
;;^UTILITY(U,$J,112,1378,2)
;;=.02^.148^.106^.116^19^0^.059^.003^0^.026^.023^.062^0^.37^^^2.1
;;^UTILITY(U,$J,112,1378,3)
;;=.017^.028^.041^.041^.055^.01^.021^.03^.029^.027^.156^.019^.032^.063^.187^.048^.036^.034
;;^UTILITY(U,$J,112,1378,4)
;;=^^.001^.024^^.002^.023^^2^.6
;;^UTILITY(U,$J,112,1378,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1380,0)
;;=ONIONS, YEL, CKD WO/SALT^11-283^cups^210^100^N
;;^UTILITY(U,$J,112,1380,1)
;;=1.36^.19^10.15^44^87.86^^^22^.24^11^35^166^3^.21^.067^.153^^0^5.2^.042
FHINI046 ; ; 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,1368,20)
+2 ;;=USDA Std. Reference, Release 10
+3 ;;^UTILITY(U,$J,112,1369,0)
+4 ;;=OKRA, CKD W/SALT^11-803^cups^160^100^N
+5 ;;^UTILITY(U,$J,112,1369,1)
+6 ;;=1.87^.17^7.21^32^89.91^^^63^.45^57^56^322^241^.55^.086^.911^^575^16.3^.132
+7 ;;^UTILITY(U,$J,112,1369,2)
+8 ;;=.055^.871^.213^.187^45.7^0^.045^.001^0^.045^.028^.046^58^.84
+9 ;;^UTILITY(U,$J,112,1369,3)
+10 ;;=.016^.061^.065^.098^.075^.02^.018^.061^.081^.085^.078^.029^.068^.135^.253^.041^.042^.041
+11 ;;^UTILITY(U,$J,112,1369,4)
+12 ;;=^^0^.038^0^.004^.028^0
+13 ;;^UTILITY(U,$J,112,1369,20)
+14 ;;=USDA Std. Reference, Release 10
+15 ;;^UTILITY(U,$J,112,1370,0)
+16 ;;=OKRA, FRZ, CKD WO/SALT^11-281^cups^185^100^N
+17 ;;^UTILITY(U,$J,112,1370,1)
+18 ;;=2.08^.3^8.17^37^91.12^^^96^.67^51^46^234^3^.62^.097^1.021^^514^12.2^.099
+19 ;;^UTILITY(U,$J,112,1370,2)
+20 ;;=.123^.785^.24^.047^145.6^0^.079^.002^0^.079^.05^.081^51^.75^^^4.5
+21 ;;^UTILITY(U,$J,112,1370,3)
+22 ;;=.017^.068^.072^.109^.084^.022^.02^.068^.091^.095^.087^.033^.075^.151^.282^.046^.046^.045
+23 ;;^UTILITY(U,$J,112,1370,4)
+24 ;;=^^0^.068^.001^.008^.05^0
+25 ;;^UTILITY(U,$J,112,1370,20)
+26 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+27 ;;^UTILITY(U,$J,112,1371,0)
+28 ;;=OKRA, FRZ, CKD W/SALT^11-804^cups^185^100^N
+29 ;;^UTILITY(U,$J,112,1371,1)
+30 ;;=2.08^.3^8.17^37^91.12^^^96^.67^51^46^234^239^.62^.097^1.021^^514^12.2^.099
+31 ;;^UTILITY(U,$J,112,1371,2)
+32 ;;=.123^.785^.24^.047^145.6^0^.079^.002^0^.079^.05^.081^51^.75
+33 ;;^UTILITY(U,$J,112,1371,3)
+34 ;;=.017^.068^.072^.109^.084^.022^.02^.068^.091^.095^.087^.033^.075^.151^.282^.046^.046^.045
+35 ;;^UTILITY(U,$J,112,1371,4)
+36 ;;=^^0^.068^.001^.008^.05^0
+37 ;;^UTILITY(U,$J,112,1371,20)
+38 ;;=USDA Std. Reference, Release 10
+39 ;;^UTILITY(U,$J,112,1372,0)
+40 ;;=OLIVES, CND OR BOTTLED, GREEN^1406-0^olives^3.86^100^N
+41 ;;^UTILITY(U,$J,112,1372,1)
+42 ;;=1.4^12.7^1.3^116^78.2^^^61^1.6^^17^55^2400^^^^^300^0^0
+43 ;;^UTILITY(U,$J,112,1372,2)
+44 ;;=0^0^^^^^.89^^0^1.4^^^^6.4^^^2.6
+45 ;;^UTILITY(U,$J,112,1372,4)
+46 ;;=^^^^^^9.65
+47 ;;^UTILITY(U,$J,112,1372,20)
+48 ;;=USDA Std. Reference, Release 8
+49 ;;^UTILITY(U,$J,112,1373,0)
+50 ;;=OLIVES, CND OR BOTTLED, RIPE, (ASCOLANO), GIANT^1407-0^olives^5.59^^N
+51 ;;^UTILITY(U,$J,112,1373,1)
+52 ;;=1.1^13.8^2.6^129^80^^^84^1.6^^16^34^813^^^^^60^0^0
+53 ;;^UTILITY(U,$J,112,1373,2)
+54 ;;=0^0^^^^^.97^^0^1.52
+55 ;;^UTILITY(U,$J,112,1373,20)
+56 ;;=USDA Std. Reference, Release 8
+57 ;;^UTILITY(U,$J,112,1374,0)
+58 ;;=OLIVES, CND OR BOTTLED, RIPE, (MANZANILLA)^9-193^olives^3.44^100^N
+59 ;;^UTILITY(U,$J,112,1374,1)
+60 ;;=.84^10.68^6.26^115^79.99^^^88^3.3^4^3^8^872^.22^.251^.02^^403^.9^.003
+61 ;;^UTILITY(U,$J,112,1374,2)
+62 ;;=0^.037^.015^.009^0^0^.847^.064^0^1.415^7.888^.911^40^2.23
+63 ;;^UTILITY(U,$J,112,1374,3)
+64 ;;=^.026^.031^.05^.032^.012^^.029^.023^.038^.067^.023^.043^.092^.093^.049^.04^.031
+65 ;;^UTILITY(U,$J,112,1374,4)
+66 ;;=^^0^1.179^.086^.236^7.77^^^.9
+67 ;;^UTILITY(U,$J,112,1374,20)
+68 ;;=USDA Std. Reference, Release 10
+69 ;;^UTILITY(U,$J,112,1375,0)
+70 ;;=OLIVES, CND OR BOTTLED, RIPE, (MISSION)^1409-0^olives^3.44^^N
+71 ;;^UTILITY(U,$J,112,1375,1)
+72 ;;=1.2^20.1^3.2^184^73^^^106^1.7^^17^27^750^^^^^70^0^0
+73 ;;^UTILITY(U,$J,112,1375,2)
+74 ;;=0^0^^^^^1.41^^0^2.21
+75 ;;^UTILITY(U,$J,112,1375,20)
+76 ;;=USDA Std. Reference, Release 8
+77 ;;^UTILITY(U,$J,112,1376,0)
+78 ;;=OLIVES, CND OR BOTTLED, RIPE, (SEVILLANO), GIANT^1410-0^olives^8.17^^N
+79 ;;^UTILITY(U,$J,112,1376,1)
+80 ;;=1.1^9.5^2.7^93^84.4^^^74^1.6^^20^44^828^^^^^60^0^0
+81 ;;^UTILITY(U,$J,112,1376,2)
+82 ;;=0^0^^^^^.66^^0^1.04
+83 ;;^UTILITY(U,$J,112,1376,20)
+84 ;;=USDA Std. Reference, Release 8
+85 ;;^UTILITY(U,$J,112,1377,0)
+86 ;;=OLIVES, RIPE, SALT-CURED, OIL-COATED, GREEK STYLE^1411-0^olives^1.92^100^N
+87 ;;^UTILITY(U,$J,112,1377,1)
+88 ;;=2.2^35.8^8.7^338^43.8^^^84^1.6^^29^34^3288^^^^^60^0^0
+89 ;;^UTILITY(U,$J,112,1377,2)
+90 ;;=0^0^^^^^2.51^^0^3.94^^^^9.5
+91 ;;^UTILITY(U,$J,112,1377,4)
+92 ;;=^^^^^^27.21
+93 ;;^UTILITY(U,$J,112,1377,20)
+94 ;;=USDA Std. Reference, Release 8
+95 ;;^UTILITY(U,$J,112,1378,0)
+96 ;;=ONIONS, YEL, RAW^11-282^cups^170^90^N
+97 ;;^UTILITY(U,$J,112,1378,1)
+98 ;;=1.16^.16^8.63^38^89.68^^^20^.22^10^33^157^3^.19^.06^.137^.31^0^6.4^.042
+99 ;;^UTILITY(U,$J,112,1378,2)
+100 ;;=.02^.148^.106^.116^19^0^.059^.003^0^.026^.023^.062^0^.37^^^2.1
+101 ;;^UTILITY(U,$J,112,1378,3)
+102 ;;=.017^.028^.041^.041^.055^.01^.021^.03^.029^.027^.156^.019^.032^.063^.187^.048^.036^.034
+103 ;;^UTILITY(U,$J,112,1378,4)
+104 ;;=^^.001^.024^^.002^.023^^2^.6
+105 ;;^UTILITY(U,$J,112,1378,20)
+106 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+107 ;;^UTILITY(U,$J,112,1380,0)
+108 ;;=ONIONS, YEL, CKD WO/SALT^11-283^cups^210^100^N
+109 ;;^UTILITY(U,$J,112,1380,1)
+110 ;;=1.36^.19^10.15^44^87.86^^^22^.24^11^35^166^3^.21^.067^.153^^0^5.2^.042