FHINI04K ; ; 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,1529,4)
;;=^^.28^7.947^.28^.805^5.952^.035
;;^UTILITY(U,$J,112,1529,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1530,0)
;;=POTATO FLOUR^11-413^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1530,1)
;;=8^.8^79.9^351^7.6^^^33^17.2^88^178^1588^34^1.63^1.08^1.097^^0^19^.42
;;^UTILITY(U,$J,112,1530,2)
;;=.14^3.4^1.502^.008^50.6^0^.258^.082^0^.209^.018^.346^0^3.7^^^6.1
;;^UTILITY(U,$J,112,1530,3)
;;=.133^.324^.346^.492^.479^.124^.081^.366^.26^.413^.433^.192^.38^1.359^1.08^.297^.307^.271
;;^UTILITY(U,$J,112,1530,4)
;;=.005^.027^.006^.13^.007^.028^.009
;;^UTILITY(U,$J,112,1530,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1531,0)
;;=POTATO SALAD^11-414^cups^250^100^N
;;^UTILITY(U,$J,112,1531,1)
;;=2.68^8.2^11.17^143^76^^^19^.65^15^52^254^529^.31^.118^.101^^209^10^.077
;;^UTILITY(U,$J,112,1531,2)
;;=.06^.89^.534^.141^6.7^0^3.345^.37^68^1.429^2.48^3.737^33^1.95
;;^UTILITY(U,$J,112,1531,3)
;;=.042^.116^.141^.202^.171^.066^.051^.135^.104^.172^.152^.062^.124^.425^.387^.086^.102^.164
;;^UTILITY(U,$J,112,1531,4)
;;=0^.011^.013^1.034^.054^.37^2.418
;;^UTILITY(U,$J,112,1531,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1533,0)
;;=POTATO STICKS^11-415^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1533,1)
;;=6.7^34.46^53.34^522^2.22^^^18^2.28^64^172^1237^250^.99^.317^.42^^0^47.3^.097
;;^UTILITY(U,$J,112,1533,2)
;;=.116^4.797^.403^.32^39.5^0^17.562^.068^0^8.829^6.07^17.698^0^3.28
;;^UTILITY(U,$J,112,1533,4)
;;=^^.272^7.741^.272^.784^5.797^.034
;;^UTILITY(U,$J,112,1533,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1534,0)
;;=PRETZELS^19-047^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1534,1)
;;=9.1^3.5^79.2^381^3.3^^^36^4.32^35^113^146^1715^.85^.264^1.789^^0^0^.461
;;^UTILITY(U,$J,112,1534,2)
;;=.623^5.251^.288^.116^83^0^1.15^.06^0^.75^1.36^1.22^0^4.9^^^3.2
;;^UTILITY(U,$J,112,1534,3)
;;=.109^.259^.345^.636^.221^.164^.196^.453^.266^.392^.349^.201^.304^.415^3.037^.327^1.018^.447
;;^UTILITY(U,$J,112,1534,4)
;;=.01^.03^.02^.47^.02^.21^1.35^^1^5.8
;;^UTILITY(U,$J,112,1534,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1535,0)
;;=PRUNE WHIP^1822-0^cups^90^100^N
;;^UTILITY(U,$J,112,1535,1)
;;=4.4^.2^36.9^156^57.3^^^22^1.3^^33^290^164^^^^^460^2^.02
;;^UTILITY(U,$J,112,1535,2)
;;=.14^.5^^^^^0^^0^0^^^^1.2
;;^UTILITY(U,$J,112,1535,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1535,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1536,0)
;;=PUDDINGS, CHOCOLATE, STARCH BASE, PREP FR HOME RECIPE^19-192^cups^260^100^N
;;^UTILITY(U,$J,112,1536,1)
;;=3.1^3.6^25.7^141^66.7^^^97^.45^24^94^161^87^.49^.121^.111^^123^.6^.029
;;^UTILITY(U,$J,112,1536,2)
;;=.137^.126^.256^.033^4^.22^.25^.05^11^1.96^1.14^.3^31^.9
;;^UTILITY(U,$J,112,1536,3)
;;=.042^.132^.17^.274^.222^.067^.029^.145^.139^.197^.12^.076^.11^.24^.596^.077^.261^.157
;;^UTILITY(U,$J,112,1536,4)
;;=.07^.08^.27^.89^.06^.49^1.08^0
;;^UTILITY(U,$J,112,1536,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1537,0)
;;=PUDDINGS, VANILLA, STARCH BASE, PREP FR HOME RECIP^19-210^cups^255^100^N
;;^UTILITY(U,$J,112,1537,1)
;;=3.3^3.3^15.9^106^76.7^^^118^.07^13^93^150^92^.38^.015^.005^^125^.6^.028
;;^UTILITY(U,$J,112,1537,2)
;;=.162^.084^.312^.031^4^.19^.08^.05^13^2.06^.95^.13^30^.8
;;^UTILITY(U,$J,112,1537,3)
;;=.043^.14^.188^.305^.246^.078^.029^.15^.15^.208^.113^.085^.107^.236^.652^.066^.301^.169
;;^UTILITY(U,$J,112,1537,4)
;;=.08^.1^.35^.91^.08^.42^.87^0
;;^UTILITY(U,$J,112,1537,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1538,0)
;;=PUDDINGS, CHOCOLATE, PREP FR STARCH BASE MIX, CKD^19-189^cups^260^100^N
;;^UTILITY(U,$J,112,1538,1)
;;=3.2^3.4^18^111^74.4^^^111^.36^15^93^163^103^.45^.075^.043^^110^.7^.031
;;^UTILITY(U,$J,112,1538,2)
;;=.174^.104^.277^.036^4^.25^.08^.04^12^2.09^1^.13^26^1^^^1
;;^UTILITY(U,$J,112,1538,3)
;;=.044^.137^.179^.288^.233^.071^.03^.149^.145^.205^.12^.08^.111^.244^.624^.075^.278^.164
;;^UTILITY(U,$J,112,1538,4)
;;=.07^.08^.3^.92^.07^.54^.93^0^^1.7
;;^UTILITY(U,$J,112,1538,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1539,0)
;;=PUDDINGS, PREP FR STARCH BASE MIX, WO/COOKING^19-185^cups^260^100^N
;;^UTILITY(U,$J,112,1539,1)
;;=3.1^3.1^18.8^111^73.6^^^102^.29^18^239^166^284^.42^.064^.042^^107^.9^.033
;;^UTILITY(U,$J,112,1539,2)
;;=.141^.096^.269^.038^4^.3^.13^.05^11^1.83^.92^.18^21^1.4^^^1
;;^UTILITY(U,$J,112,1539,3)
;;=.042^.132^.173^.279^.226^.069^.029^.143^.14^.197^.115^.078^.107^.234^.603^.071^.27^.158
;;^UTILITY(U,$J,112,1539,4)
;;=.07^.08^.29^.82^.07^.41^.85^0^^1.7
FHINI04K ; ; 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,1529,4)
+2 ;;=^^.28^7.947^.28^.805^5.952^.035
+3 ;;^UTILITY(U,$J,112,1529,20)
+4 ;;=USDA Std. Reference, Release 8
+5 ;;^UTILITY(U,$J,112,1530,0)
+6 ;;=POTATO FLOUR^11-413^oz.^28.3^100^N
+7 ;;^UTILITY(U,$J,112,1530,1)
+8 ;;=8^.8^79.9^351^7.6^^^33^17.2^88^178^1588^34^1.63^1.08^1.097^^0^19^.42
+9 ;;^UTILITY(U,$J,112,1530,2)
+10 ;;=.14^3.4^1.502^.008^50.6^0^.258^.082^0^.209^.018^.346^0^3.7^^^6.1
+11 ;;^UTILITY(U,$J,112,1530,3)
+12 ;;=.133^.324^.346^.492^.479^.124^.081^.366^.26^.413^.433^.192^.38^1.359^1.08^.297^.307^.271
+13 ;;^UTILITY(U,$J,112,1530,4)
+14 ;;=.005^.027^.006^.13^.007^.028^.009
+15 ;;^UTILITY(U,$J,112,1530,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,1531,0)
+18 ;;=POTATO SALAD^11-414^cups^250^100^N
+19 ;;^UTILITY(U,$J,112,1531,1)
+20 ;;=2.68^8.2^11.17^143^76^^^19^.65^15^52^254^529^.31^.118^.101^^209^10^.077
+21 ;;^UTILITY(U,$J,112,1531,2)
+22 ;;=.06^.89^.534^.141^6.7^0^3.345^.37^68^1.429^2.48^3.737^33^1.95
+23 ;;^UTILITY(U,$J,112,1531,3)
+24 ;;=.042^.116^.141^.202^.171^.066^.051^.135^.104^.172^.152^.062^.124^.425^.387^.086^.102^.164
+25 ;;^UTILITY(U,$J,112,1531,4)
+26 ;;=0^.011^.013^1.034^.054^.37^2.418
+27 ;;^UTILITY(U,$J,112,1531,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,1533,0)
+30 ;;=POTATO STICKS^11-415^oz.^28.3^100^N
+31 ;;^UTILITY(U,$J,112,1533,1)
+32 ;;=6.7^34.46^53.34^522^2.22^^^18^2.28^64^172^1237^250^.99^.317^.42^^0^47.3^.097
+33 ;;^UTILITY(U,$J,112,1533,2)
+34 ;;=.116^4.797^.403^.32^39.5^0^17.562^.068^0^8.829^6.07^17.698^0^3.28
+35 ;;^UTILITY(U,$J,112,1533,4)
+36 ;;=^^.272^7.741^.272^.784^5.797^.034
+37 ;;^UTILITY(U,$J,112,1533,20)
+38 ;;=USDA Std. Reference, Release 8
+39 ;;^UTILITY(U,$J,112,1534,0)
+40 ;;=PRETZELS^19-047^oz.^28.3^100^N
+41 ;;^UTILITY(U,$J,112,1534,1)
+42 ;;=9.1^3.5^79.2^381^3.3^^^36^4.32^35^113^146^1715^.85^.264^1.789^^0^0^.461
+43 ;;^UTILITY(U,$J,112,1534,2)
+44 ;;=.623^5.251^.288^.116^83^0^1.15^.06^0^.75^1.36^1.22^0^4.9^^^3.2
+45 ;;^UTILITY(U,$J,112,1534,3)
+46 ;;=.109^.259^.345^.636^.221^.164^.196^.453^.266^.392^.349^.201^.304^.415^3.037^.327^1.018^.447
+47 ;;^UTILITY(U,$J,112,1534,4)
+48 ;;=.01^.03^.02^.47^.02^.21^1.35^^1^5.8
+49 ;;^UTILITY(U,$J,112,1534,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,1535,0)
+52 ;;=PRUNE WHIP^1822-0^cups^90^100^N
+53 ;;^UTILITY(U,$J,112,1535,1)
+54 ;;=4.4^.2^36.9^156^57.3^^^22^1.3^^33^290^164^^^^^460^2^.02
+55 ;;^UTILITY(U,$J,112,1535,2)
+56 ;;=.14^.5^^^^^0^^0^0^^^^1.2
+57 ;;^UTILITY(U,$J,112,1535,4)
+58 ;;=^^^^^^0
+59 ;;^UTILITY(U,$J,112,1535,20)
+60 ;;=USDA Std. Reference, Release 8
+61 ;;^UTILITY(U,$J,112,1536,0)
+62 ;;=PUDDINGS, CHOCOLATE, STARCH BASE, PREP FR HOME RECIPE^19-192^cups^260^100^N
+63 ;;^UTILITY(U,$J,112,1536,1)
+64 ;;=3.1^3.6^25.7^141^66.7^^^97^.45^24^94^161^87^.49^.121^.111^^123^.6^.029
+65 ;;^UTILITY(U,$J,112,1536,2)
+66 ;;=.137^.126^.256^.033^4^.22^.25^.05^11^1.96^1.14^.3^31^.9
+67 ;;^UTILITY(U,$J,112,1536,3)
+68 ;;=.042^.132^.17^.274^.222^.067^.029^.145^.139^.197^.12^.076^.11^.24^.596^.077^.261^.157
+69 ;;^UTILITY(U,$J,112,1536,4)
+70 ;;=.07^.08^.27^.89^.06^.49^1.08^0
+71 ;;^UTILITY(U,$J,112,1536,20)
+72 ;;=USDA Std. Reference, Release 10
+73 ;;^UTILITY(U,$J,112,1537,0)
+74 ;;=PUDDINGS, VANILLA, STARCH BASE, PREP FR HOME RECIP^19-210^cups^255^100^N
+75 ;;^UTILITY(U,$J,112,1537,1)
+76 ;;=3.3^3.3^15.9^106^76.7^^^118^.07^13^93^150^92^.38^.015^.005^^125^.6^.028
+77 ;;^UTILITY(U,$J,112,1537,2)
+78 ;;=.162^.084^.312^.031^4^.19^.08^.05^13^2.06^.95^.13^30^.8
+79 ;;^UTILITY(U,$J,112,1537,3)
+80 ;;=.043^.14^.188^.305^.246^.078^.029^.15^.15^.208^.113^.085^.107^.236^.652^.066^.301^.169
+81 ;;^UTILITY(U,$J,112,1537,4)
+82 ;;=.08^.1^.35^.91^.08^.42^.87^0
+83 ;;^UTILITY(U,$J,112,1537,20)
+84 ;;=USDA Std. Reference, Release 10
+85 ;;^UTILITY(U,$J,112,1538,0)
+86 ;;=PUDDINGS, CHOCOLATE, PREP FR STARCH BASE MIX, CKD^19-189^cups^260^100^N
+87 ;;^UTILITY(U,$J,112,1538,1)
+88 ;;=3.2^3.4^18^111^74.4^^^111^.36^15^93^163^103^.45^.075^.043^^110^.7^.031
+89 ;;^UTILITY(U,$J,112,1538,2)
+90 ;;=.174^.104^.277^.036^4^.25^.08^.04^12^2.09^1^.13^26^1^^^1
+91 ;;^UTILITY(U,$J,112,1538,3)
+92 ;;=.044^.137^.179^.288^.233^.071^.03^.149^.145^.205^.12^.08^.111^.244^.624^.075^.278^.164
+93 ;;^UTILITY(U,$J,112,1538,4)
+94 ;;=.07^.08^.3^.92^.07^.54^.93^0^^1.7
+95 ;;^UTILITY(U,$J,112,1538,20)
+96 ;;=USDA Std. Reference, Release 10
+97 ;;^UTILITY(U,$J,112,1539,0)
+98 ;;=PUDDINGS, PREP FR STARCH BASE MIX, WO/COOKING^19-185^cups^260^100^N
+99 ;;^UTILITY(U,$J,112,1539,1)
+100 ;;=3.1^3.1^18.8^111^73.6^^^102^.29^18^239^166^284^.42^.064^.042^^107^.9^.033
+101 ;;^UTILITY(U,$J,112,1539,2)
+102 ;;=.141^.096^.269^.038^4^.3^.13^.05^11^1.83^.92^.18^21^1.4^^^1
+103 ;;^UTILITY(U,$J,112,1539,3)
+104 ;;=.042^.132^.173^.279^.226^.069^.029^.143^.14^.197^.115^.078^.107^.234^.603^.071^.27^.158
+105 ;;^UTILITY(U,$J,112,1539,4)
+106 ;;=.07^.08^.29^.82^.07^.41^.85^0^^1.7
