FHINI042 ; ; 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,1323,0)
;;=MACARONI AND CHEESE, CND^1305-0^cups^240^100^N
;;^UTILITY(U,$J,112,1323,1)
;;=3.9^4^10.7^95^80.2^^^83^.4^^76^58^304^^^^^110^.1^.05
;;^UTILITY(U,$J,112,1323,2)
;;=.1^.4^^^^^.6^^10^1.76^^^^1.2
;;^UTILITY(U,$J,112,1323,4)
;;=^^^^^^1.28
;;^UTILITY(U,$J,112,1323,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1324,0)
;;=MACKEREL, ATLANTIC, CND, SOL+LIQ^1307-0^oz.^28.3^^N
;;^UTILITY(U,$J,112,1324,1)
;;=19.3^11.1^0^183^66^^^185^2.1^^274^420^74^^^^^430^0^.06
;;^UTILITY(U,$J,112,1324,2)
;;=.21^5.8^^^^^0^^94^3
;;^UTILITY(U,$J,112,1324,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1325,0)
;;=MACKEREL, ATLANTIC, COOKED, DRY HEAT^15-047^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1325,1)
;;=23.85^17.81^0^262^53.27^^^15^1.57^97^278^401^83^.94^.094^.02^^180^.4^.159
;;^UTILITY(U,$J,112,1325,2)
;;=.412^6.85^.99^.46^1.5^19^.147^.113^75^4.176^7.006^4.3^54^1.53^^^0
;;^UTILITY(U,$J,112,1325,3)
;;=.267^1.045^1.099^1.938^2.19^.706^.256^.931^.805^1.228^1.427^.702^1.442^2.442^3.559^1.145^.843^.973
;;^UTILITY(U,$J,112,1325,4)
;;=^^.592^1.375^.534^.256^1.202^.051^^51.6
;;^UTILITY(U,$J,112,1325,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1326,0)
;;=MACKEREL, JACK, CANNED, DRAINED SOLIDS^15-048^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1326,1)
;;=23.19^6.3^0^156^69.17^^^241^2.04^37^301^194^379^1.02^.147^.04^^434^.9^.04
;;^UTILITY(U,$J,112,1326,2)
;;=.212^6.18^.305^.21^5^6.94^.099^.043^79^1.857^2.225^1.651^130^1.73^^^0
;;^UTILITY(U,$J,112,1326,3)
;;=.26^1.017^1.069^1.885^2.13^.686^.249^.905^.783^1.195^1.388^.683^1.403^2.375^3.462^1.113^.82^.946
;;^UTILITY(U,$J,112,1326,4)
;;=^.007^.289^1.185^.4^.376^1.132^.069
;;^UTILITY(U,$J,112,1326,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1327,0)
;;=MACKEREL, SALTED^1311-0^oz.^28.3^^N
;;^UTILITY(U,$J,112,1327,1)
;;=18.5^25.1^0^305^43^^^66^1.4^^254^157^6231^^^^^30^0^.02
;;^UTILITY(U,$J,112,1327,2)
;;=.19^3.3^^^^^0^^95^8
;;^UTILITY(U,$J,112,1327,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1328,0)
;;=MACKEREL, SMOKED^1312-0^oz.^28.3^^N
;;^UTILITY(U,$J,112,1328,1)
;;=23.8^13^0^219^59.4^^^66^1.4^^254^157^6231^^^^^30^0^.02
;;^UTILITY(U,$J,112,1328,2)
;;=.28^3.3^^^^^0^^95^4
;;^UTILITY(U,$J,112,1328,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1329,0)
;;=MALT, DRY^1313-0^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1329,1)
;;=13.1^1.9^77.4^368^5.2^^^48^4^^294^230^80^^^^^0^0^.49
;;^UTILITY(U,$J,112,1329,2)
;;=.31^9^^^^^0^^0^0^^^^2.4
;;^UTILITY(U,$J,112,1329,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1329,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1330,0)
;;=MALT EXTRACT, DRIED^1314-0^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1330,1)
;;=6^0^89.2^367^3.2^^^48^8.7^^294^230^80^^^^^0^0^.36
;;^UTILITY(U,$J,112,1330,2)
;;=.45^9.8^^^^^0^^0^0^^^^1.6
;;^UTILITY(U,$J,112,1330,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1330,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1331,0)
;;=MARMALADE, CITRUS^19-303^tbsp.^20^100^N
;;^UTILITY(U,$J,112,1331,1)
;;=.3^0^66.3^246^33.2^^^38^.15^2^6^37^56^.04^.09^.02^^47^4.8^.005
;;^UTILITY(U,$J,112,1331,2)
;;=.006^.052^.015^.014^36^0^^^0^^^^5^.2^^^.2
;;^UTILITY(U,$J,112,1331,3)
;;=.003^.005^.008^.007^.015^.006^.003^.01^.005^.013^.021^.006^.016^.036^.03^.03^.015^.01
;;^UTILITY(U,$J,112,1331,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1331,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1332,0)
;;=MENHADEN, ATLANTIC, CND, SOL+LIQ^1319-0^oz.^28.3^^N
;;^UTILITY(U,$J,112,1332,1)
;;=18.7^10.2^0^172^67.9^^^147^1.3^^297^420^74^^^^^110^3^.02
;;^UTILITY(U,$J,112,1332,2)
;;=.18^3.6^^^^^0^^55^3
;;^UTILITY(U,$J,112,1332,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1333,0)
;;=MOLASSES, CANE, FIRST EXTRACTION OR LIGHT^19-304^tbsp.^20^100^N
;;^UTILITY(U,$J,112,1333,1)
;;=0^.1^68.8^266^25.9^^^205^4.72^242^31^1464^37^.29^.487^1.53^^0^0^.041
;;^UTILITY(U,$J,112,1333,2)
;;=.002^.93^.804^.67^0^0^^^0^^^^0^3.3^^^0
;;^UTILITY(U,$J,112,1333,4)
;;=^^^^^^0^^^17.8
;;^UTILITY(U,$J,112,1333,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1334,0)
;;=MOLASSES, CANE, SECOND EXTRACTION OR MEDIUM^19-304^tbsp.^20^100^N
;;^UTILITY(U,$J,112,1334,1)
;;=0^.1^68.8^266^25.9^^^205^4.72^242^31^1464^37^.29^.487^1.53^^0^0^.041
;;^UTILITY(U,$J,112,1334,2)
;;=.002^.93^.804^.67^0^0^^^0^^^^0^3.3^^^0
;;^UTILITY(U,$J,112,1334,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1334,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1335,0)
;;=MOLASSES, CANE, THIRD EXTRACTION OR BLACKSTRAP^19-305^tbsp.^20^100^N
FHINI042 ; ; 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,1323,0)
+2 ;;=MACARONI AND CHEESE, CND^1305-0^cups^240^100^N
+3 ;;^UTILITY(U,$J,112,1323,1)
+4 ;;=3.9^4^10.7^95^80.2^^^83^.4^^76^58^304^^^^^110^.1^.05
+5 ;;^UTILITY(U,$J,112,1323,2)
+6 ;;=.1^.4^^^^^.6^^10^1.76^^^^1.2
+7 ;;^UTILITY(U,$J,112,1323,4)
+8 ;;=^^^^^^1.28
+9 ;;^UTILITY(U,$J,112,1323,20)
+10 ;;=USDA Std. Reference, Release 8
+11 ;;^UTILITY(U,$J,112,1324,0)
+12 ;;=MACKEREL, ATLANTIC, CND, SOL+LIQ^1307-0^oz.^28.3^^N
+13 ;;^UTILITY(U,$J,112,1324,1)
+14 ;;=19.3^11.1^0^183^66^^^185^2.1^^274^420^74^^^^^430^0^.06
+15 ;;^UTILITY(U,$J,112,1324,2)
+16 ;;=.21^5.8^^^^^0^^94^3
+17 ;;^UTILITY(U,$J,112,1324,20)
+18 ;;=USDA Std. Reference, Release 8
+19 ;;^UTILITY(U,$J,112,1325,0)
+20 ;;=MACKEREL, ATLANTIC, COOKED, DRY HEAT^15-047^oz.^28.3^100^N
+21 ;;^UTILITY(U,$J,112,1325,1)
+22 ;;=23.85^17.81^0^262^53.27^^^15^1.57^97^278^401^83^.94^.094^.02^^180^.4^.159
+23 ;;^UTILITY(U,$J,112,1325,2)
+24 ;;=.412^6.85^.99^.46^1.5^19^.147^.113^75^4.176^7.006^4.3^54^1.53^^^0
+25 ;;^UTILITY(U,$J,112,1325,3)
+26 ;;=.267^1.045^1.099^1.938^2.19^.706^.256^.931^.805^1.228^1.427^.702^1.442^2.442^3.559^1.145^.843^.973
+27 ;;^UTILITY(U,$J,112,1325,4)
+28 ;;=^^.592^1.375^.534^.256^1.202^.051^^51.6
+29 ;;^UTILITY(U,$J,112,1325,20)
+30 ;;=USDA Std. Reference, Release 10
+31 ;;^UTILITY(U,$J,112,1326,0)
+32 ;;=MACKEREL, JACK, CANNED, DRAINED SOLIDS^15-048^oz.^28.3^100^N
+33 ;;^UTILITY(U,$J,112,1326,1)
+34 ;;=23.19^6.3^0^156^69.17^^^241^2.04^37^301^194^379^1.02^.147^.04^^434^.9^.04
+35 ;;^UTILITY(U,$J,112,1326,2)
+36 ;;=.212^6.18^.305^.21^5^6.94^.099^.043^79^1.857^2.225^1.651^130^1.73^^^0
+37 ;;^UTILITY(U,$J,112,1326,3)
+38 ;;=.26^1.017^1.069^1.885^2.13^.686^.249^.905^.783^1.195^1.388^.683^1.403^2.375^3.462^1.113^.82^.946
+39 ;;^UTILITY(U,$J,112,1326,4)
+40 ;;=^.007^.289^1.185^.4^.376^1.132^.069
+41 ;;^UTILITY(U,$J,112,1326,20)
+42 ;;=USDA Std. Reference, Release 10
+43 ;;^UTILITY(U,$J,112,1327,0)
+44 ;;=MACKEREL, SALTED^1311-0^oz.^28.3^^N
+45 ;;^UTILITY(U,$J,112,1327,1)
+46 ;;=18.5^25.1^0^305^43^^^66^1.4^^254^157^6231^^^^^30^0^.02
+47 ;;^UTILITY(U,$J,112,1327,2)
+48 ;;=.19^3.3^^^^^0^^95^8
+49 ;;^UTILITY(U,$J,112,1327,20)
+50 ;;=USDA Std. Reference, Release 8
+51 ;;^UTILITY(U,$J,112,1328,0)
+52 ;;=MACKEREL, SMOKED^1312-0^oz.^28.3^^N
+53 ;;^UTILITY(U,$J,112,1328,1)
+54 ;;=23.8^13^0^219^59.4^^^66^1.4^^254^157^6231^^^^^30^0^.02
+55 ;;^UTILITY(U,$J,112,1328,2)
+56 ;;=.28^3.3^^^^^0^^95^4
+57 ;;^UTILITY(U,$J,112,1328,20)
+58 ;;=USDA Std. Reference, Release 8
+59 ;;^UTILITY(U,$J,112,1329,0)
+60 ;;=MALT, DRY^1313-0^oz.^28.3^100^N
+61 ;;^UTILITY(U,$J,112,1329,1)
+62 ;;=13.1^1.9^77.4^368^5.2^^^48^4^^294^230^80^^^^^0^0^.49
+63 ;;^UTILITY(U,$J,112,1329,2)
+64 ;;=.31^9^^^^^0^^0^0^^^^2.4
+65 ;;^UTILITY(U,$J,112,1329,4)
+66 ;;=^^^^^^0
+67 ;;^UTILITY(U,$J,112,1329,20)
+68 ;;=USDA Std. Reference, Release 8
+69 ;;^UTILITY(U,$J,112,1330,0)
+70 ;;=MALT EXTRACT, DRIED^1314-0^oz.^28.3^100^N
+71 ;;^UTILITY(U,$J,112,1330,1)
+72 ;;=6^0^89.2^367^3.2^^^48^8.7^^294^230^80^^^^^0^0^.36
+73 ;;^UTILITY(U,$J,112,1330,2)
+74 ;;=.45^9.8^^^^^0^^0^0^^^^1.6
+75 ;;^UTILITY(U,$J,112,1330,4)
+76 ;;=^^^^^^0
+77 ;;^UTILITY(U,$J,112,1330,20)
+78 ;;=USDA Std. Reference, Release 8
+79 ;;^UTILITY(U,$J,112,1331,0)
+80 ;;=MARMALADE, CITRUS^19-303^tbsp.^20^100^N
+81 ;;^UTILITY(U,$J,112,1331,1)
+82 ;;=.3^0^66.3^246^33.2^^^38^.15^2^6^37^56^.04^.09^.02^^47^4.8^.005
+83 ;;^UTILITY(U,$J,112,1331,2)
+84 ;;=.006^.052^.015^.014^36^0^^^0^^^^5^.2^^^.2
+85 ;;^UTILITY(U,$J,112,1331,3)
+86 ;;=.003^.005^.008^.007^.015^.006^.003^.01^.005^.013^.021^.006^.016^.036^.03^.03^.015^.01
+87 ;;^UTILITY(U,$J,112,1331,4)
+88 ;;=^^^^^^0
+89 ;;^UTILITY(U,$J,112,1331,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,1332,0)
+92 ;;=MENHADEN, ATLANTIC, CND, SOL+LIQ^1319-0^oz.^28.3^^N
+93 ;;^UTILITY(U,$J,112,1332,1)
+94 ;;=18.7^10.2^0^172^67.9^^^147^1.3^^297^420^74^^^^^110^3^.02
+95 ;;^UTILITY(U,$J,112,1332,2)
+96 ;;=.18^3.6^^^^^0^^55^3
+97 ;;^UTILITY(U,$J,112,1332,20)
+98 ;;=USDA Std. Reference, Release 8
+99 ;;^UTILITY(U,$J,112,1333,0)
+100 ;;=MOLASSES, CANE, FIRST EXTRACTION OR LIGHT^19-304^tbsp.^20^100^N
+101 ;;^UTILITY(U,$J,112,1333,1)
+102 ;;=0^.1^68.8^266^25.9^^^205^4.72^242^31^1464^37^.29^.487^1.53^^0^0^.041
+103 ;;^UTILITY(U,$J,112,1333,2)
+104 ;;=.002^.93^.804^.67^0^0^^^0^^^^0^3.3^^^0
+105 ;;^UTILITY(U,$J,112,1333,4)
+106 ;;=^^^^^^0^^^17.8
+107 ;;^UTILITY(U,$J,112,1333,20)
+108 ;;=USDA Std. Reference, Release 10
+109 ;;^UTILITY(U,$J,112,1334,0)
+110 ;;=MOLASSES, CANE, SECOND EXTRACTION OR MEDIUM^19-304^tbsp.^20^100^N
+111 ;;^UTILITY(U,$J,112,1334,1)
+112 ;;=0^.1^68.8^266^25.9^^^205^4.72^242^31^1464^37^.29^.487^1.53^^0^0^.041
+113 ;;^UTILITY(U,$J,112,1334,2)
+114 ;;=.002^.93^.804^.67^0^0^^^0^^^^0^3.3^^^0
+115 ;;^UTILITY(U,$J,112,1334,4)
+116 ;;=^^^^^^0
+117 ;;^UTILITY(U,$J,112,1334,20)
+118 ;;=USDA Std. Reference, Release 10
+119 ;;^UTILITY(U,$J,112,1335,0)
+120 ;;=MOLASSES, CANE, THIRD EXTRACTION OR BLACKSTRAP^19-305^tbsp.^20^100^N