FHINI073 ; ; 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,2478,0)
;;=BF, VEGETABLES, GARDEN VEGETABLE, STRAINED^3-283^jars^128^100^N
;;^UTILITY(U,$J,112,2478,1)
;;=2.3^.2^6.8^37^90^^^28^.83^21^28^168^35^.26^.07^^^6067^5.7^.061
;;^UTILITY(U,$J,112,2478,2)
;;=.069^.779^.26^.1^40.2^0^^^^^^^607^.7^^^1.5
;;^UTILITY(U,$J,112,2478,3)
;;=.027^.073^.086^.143^.116^.043^.02^.088^.095^.099^.196^.045^.107^.192^.293^.079^.122^.077
;;^UTILITY(U,$J,112,2478,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2479,0)
;;=BF, VEGETABLES, MIX VEG, STR^3-286^jars^128^100^N
;;^UTILITY(U,$J,112,2479,1)
;;=1.2^.5^8^41^89.8^^^13^.32^10^22^127^13^.145^.04^^^3991^1.7^.022
;;^UTILITY(U,$J,112,2479,2)
;;=.025^.327^.25^.055^3.9^0^^^^^^^399^.5^^^1.5
;;^UTILITY(U,$J,112,2479,3)
;;=.013^.038^.047^.077^.04^.018^.024^.047^.044^.058^.079^.026^.052^.139^.31^.046^.092^.046
;;^UTILITY(U,$J,112,2479,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2480,0)
;;=BF, DINNER, BEEF NOODLE, JNR^3-287^jars^213^100^N
;;^UTILITY(U,$J,112,2480,1)
;;=2.5^1.9^7.4^57^87.8^^^8^.43^7^30^46^17^.401^.032^^^656^1.4^.028
;;^UTILITY(U,$J,112,2480,2)
;;=.036^.582^.23^.031^5.5^.1^^^^^^^88^.5^^^1.1
;;^UTILITY(U,$J,112,2480,3)
;;=.027^.099^.138^.208^.185^.053^.029^.117^.093^.132^.157^.074^.149^.22^.517^.153^.186^.098
;;^UTILITY(U,$J,112,2480,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2481,0)
;;=BF, HI-MT DINNER, COTTAGE CHEESE W/PINEAPPLE, STRAINED^3-288^jars^135^100^N
;;^UTILITY(U,$J,112,2481,1)
;;=6.3^2.2^18.9^116^72^^^65^.1^7^73^95^149^.285^.031^^^77^1.4^.038
;;^UTILITY(U,$J,112,2481,2)
;;=.142^.107^^.047^4^.23^^^^^^^8^.7
;;^UTILITY(U,$J,112,2481,3)
;;=.095^.217^.277^.557^.433^.198^.045^.292^.3^.351^.213^.176^.171^.424^1.274^.118^.693^.29
;;^UTILITY(U,$J,112,2481,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2482,0)
;;=BF, CEREAL, BARLEY, PPD W/WHOLE MILK^3-681^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2482,1)
;;=4.6^3.3^16.3^111^74.7^^^230^12.34^30^150^192^49^.832^.084^^^105^^.481
;;^UTILITY(U,$J,112,2482,2)
;;=.578^5.984^.348^.096^8.9^.3^^^^^^^^1.2
;;^UTILITY(U,$J,112,2482,3)
;;=.06^.186^.235^.402^.278^.103^.068^.24^.2^.281^.192^.115^.163^.314^1.099^.127^.504^.228
;;^UTILITY(U,$J,112,2482,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2483,0)
;;=BF, CEREAL, HI-PROT, PPD W/WHOLE MILK^3-682^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2483,1)
;;=8.7^3.8^11.6^111^74.5^^^218^12.14^48^177^349^49^1.044^.217^^^105^^.47
;;^UTILITY(U,$J,112,2483,2)
;;=.579^5.668^.465^.113^35.4^.3^^^^^^^^1.5
;;^UTILITY(U,$J,112,2483,3)
;;=.129^.364^.454^.752^.607^.169^.144^.443^.363^.488^.558^.241^.364^.934^1.791^.333^.608^.465
;;^UTILITY(U,$J,112,2483,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2484,0)
;;=BF, CEREAL, MIXED, PPD W/WHOLE MILK^3-685^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2484,1)
;;=4.8^3.5^15.9^113^74.6^^^220^10.43^27^142^199^47^.711^.063^^^105^^.432
;;^UTILITY(U,$J,112,2484,2)
;;=.581^5.775^.438^.066^11.2^.3^^^^^^^^1.1
;;^UTILITY(U,$J,112,2484,3)
;;=.064^.19^.244^.44^.284^.108^.081^.243^.213^.291^.214^.121^.19^.328^1.099^.149^.438^.243
;;^UTILITY(U,$J,112,2484,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2485,0)
;;=BF, CEREAL, MIXED, W/BANANAS, PPD W/WHOLE MILK^3-686^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2485,1)
;;=4.5^3.6^16.6^115^74.3^^^214^11.15^26^138^237^60^.547^.05^^^^^.653
;;^UTILITY(U,$J,112,2485,2)
;;=.72^3.449^^.102^7^.34^^^^^^^28^1.1
;;^UTILITY(U,$J,112,2485,3)
;;=.059^.184^.236^.426^.293^.105^.058^.222^.205^.283^.182^.126^.166^.337^.983^.119^.408^.232
;;^UTILITY(U,$J,112,2485,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2486,0)
;;=BF, CEREAL, OATMEAL, PPD W/WHOLE MILK^3-689^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2486,1)
;;=5^4.1^15.3^116^74.5^^^220^12.14^35^160^204^46^.923^.094^^^105^^.506
;;^UTILITY(U,$J,112,2486,2)
;;=.563^5.981^.514^.06^10^.3^^^^^^^^1.1
;;^UTILITY(U,$J,112,2486,3)
;;=.067^.201^.256^.445^.311^.112^.104^.222^.223^.31^.269^.113^.203^.398^1.102^.177^.381^.261
;;^UTILITY(U,$J,112,2486,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2487,0)
;;=BF, CEREAL, OATMEAL, W/BANANAS, PPD W/WHOLE MILK^3-690^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2487,1)
;;=4.7^3.8^16^116^74.3^^^206^11.23^30^151^247^61^.629^.072^^^99^1.6^.623
;;^UTILITY(U,$J,112,2487,2)
;;=.745^3.375^^.104^7.3^.33^^^^^^^27^1.2
;;^UTILITY(U,$J,112,2487,3)
;;=.064^.193^.248^.429^.309^.113^.069^.235^.214^.298^.216^.133^.175^.37^1.003^.141^.399^.245
;;^UTILITY(U,$J,112,2487,20)
;;=USDA Std. Reference, Release 10
FHINI073 ; ; 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,2478,0)
+2 ;;=BF, VEGETABLES, GARDEN VEGETABLE, STRAINED^3-283^jars^128^100^N
+3 ;;^UTILITY(U,$J,112,2478,1)
+4 ;;=2.3^.2^6.8^37^90^^^28^.83^21^28^168^35^.26^.07^^^6067^5.7^.061
+5 ;;^UTILITY(U,$J,112,2478,2)
+6 ;;=.069^.779^.26^.1^40.2^0^^^^^^^607^.7^^^1.5
+7 ;;^UTILITY(U,$J,112,2478,3)
+8 ;;=.027^.073^.086^.143^.116^.043^.02^.088^.095^.099^.196^.045^.107^.192^.293^.079^.122^.077
+9 ;;^UTILITY(U,$J,112,2478,20)
+10 ;;=USDA Std. Reference, Release 10
+11 ;;^UTILITY(U,$J,112,2479,0)
+12 ;;=BF, VEGETABLES, MIX VEG, STR^3-286^jars^128^100^N
+13 ;;^UTILITY(U,$J,112,2479,1)
+14 ;;=1.2^.5^8^41^89.8^^^13^.32^10^22^127^13^.145^.04^^^3991^1.7^.022
+15 ;;^UTILITY(U,$J,112,2479,2)
+16 ;;=.025^.327^.25^.055^3.9^0^^^^^^^399^.5^^^1.5
+17 ;;^UTILITY(U,$J,112,2479,3)
+18 ;;=.013^.038^.047^.077^.04^.018^.024^.047^.044^.058^.079^.026^.052^.139^.31^.046^.092^.046
+19 ;;^UTILITY(U,$J,112,2479,20)
+20 ;;=USDA Std. Reference, Release 10
+21 ;;^UTILITY(U,$J,112,2480,0)
+22 ;;=BF, DINNER, BEEF NOODLE, JNR^3-287^jars^213^100^N
+23 ;;^UTILITY(U,$J,112,2480,1)
+24 ;;=2.5^1.9^7.4^57^87.8^^^8^.43^7^30^46^17^.401^.032^^^656^1.4^.028
+25 ;;^UTILITY(U,$J,112,2480,2)
+26 ;;=.036^.582^.23^.031^5.5^.1^^^^^^^88^.5^^^1.1
+27 ;;^UTILITY(U,$J,112,2480,3)
+28 ;;=.027^.099^.138^.208^.185^.053^.029^.117^.093^.132^.157^.074^.149^.22^.517^.153^.186^.098
+29 ;;^UTILITY(U,$J,112,2480,20)
+30 ;;=USDA Std. Reference, Release 10
+31 ;;^UTILITY(U,$J,112,2481,0)
+32 ;;=BF, HI-MT DINNER, COTTAGE CHEESE W/PINEAPPLE, STRAINED^3-288^jars^135^100^N
+33 ;;^UTILITY(U,$J,112,2481,1)
+34 ;;=6.3^2.2^18.9^116^72^^^65^.1^7^73^95^149^.285^.031^^^77^1.4^.038
+35 ;;^UTILITY(U,$J,112,2481,2)
+36 ;;=.142^.107^^.047^4^.23^^^^^^^8^.7
+37 ;;^UTILITY(U,$J,112,2481,3)
+38 ;;=.095^.217^.277^.557^.433^.198^.045^.292^.3^.351^.213^.176^.171^.424^1.274^.118^.693^.29
+39 ;;^UTILITY(U,$J,112,2481,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,2482,0)
+42 ;;=BF, CEREAL, BARLEY, PPD W/WHOLE MILK^3-681^oz.^28.3^100^N
+43 ;;^UTILITY(U,$J,112,2482,1)
+44 ;;=4.6^3.3^16.3^111^74.7^^^230^12.34^30^150^192^49^.832^.084^^^105^^.481
+45 ;;^UTILITY(U,$J,112,2482,2)
+46 ;;=.578^5.984^.348^.096^8.9^.3^^^^^^^^1.2
+47 ;;^UTILITY(U,$J,112,2482,3)
+48 ;;=.06^.186^.235^.402^.278^.103^.068^.24^.2^.281^.192^.115^.163^.314^1.099^.127^.504^.228
+49 ;;^UTILITY(U,$J,112,2482,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,2483,0)
+52 ;;=BF, CEREAL, HI-PROT, PPD W/WHOLE MILK^3-682^oz.^28.3^100^N
+53 ;;^UTILITY(U,$J,112,2483,1)
+54 ;;=8.7^3.8^11.6^111^74.5^^^218^12.14^48^177^349^49^1.044^.217^^^105^^.47
+55 ;;^UTILITY(U,$J,112,2483,2)
+56 ;;=.579^5.668^.465^.113^35.4^.3^^^^^^^^1.5
+57 ;;^UTILITY(U,$J,112,2483,3)
+58 ;;=.129^.364^.454^.752^.607^.169^.144^.443^.363^.488^.558^.241^.364^.934^1.791^.333^.608^.465
+59 ;;^UTILITY(U,$J,112,2483,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,2484,0)
+62 ;;=BF, CEREAL, MIXED, PPD W/WHOLE MILK^3-685^oz.^28.3^100^N
+63 ;;^UTILITY(U,$J,112,2484,1)
+64 ;;=4.8^3.5^15.9^113^74.6^^^220^10.43^27^142^199^47^.711^.063^^^105^^.432
+65 ;;^UTILITY(U,$J,112,2484,2)
+66 ;;=.581^5.775^.438^.066^11.2^.3^^^^^^^^1.1
+67 ;;^UTILITY(U,$J,112,2484,3)
+68 ;;=.064^.19^.244^.44^.284^.108^.081^.243^.213^.291^.214^.121^.19^.328^1.099^.149^.438^.243
+69 ;;^UTILITY(U,$J,112,2484,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,2485,0)
+72 ;;=BF, CEREAL, MIXED, W/BANANAS, PPD W/WHOLE MILK^3-686^oz.^28.3^100^N
+73 ;;^UTILITY(U,$J,112,2485,1)
+74 ;;=4.5^3.6^16.6^115^74.3^^^214^11.15^26^138^237^60^.547^.05^^^^^.653
+75 ;;^UTILITY(U,$J,112,2485,2)
+76 ;;=.72^3.449^^.102^7^.34^^^^^^^28^1.1
+77 ;;^UTILITY(U,$J,112,2485,3)
+78 ;;=.059^.184^.236^.426^.293^.105^.058^.222^.205^.283^.182^.126^.166^.337^.983^.119^.408^.232
+79 ;;^UTILITY(U,$J,112,2485,20)
+80 ;;=USDA Std. Reference, Release 10
+81 ;;^UTILITY(U,$J,112,2486,0)
+82 ;;=BF, CEREAL, OATMEAL, PPD W/WHOLE MILK^3-689^oz.^28.3^100^N
+83 ;;^UTILITY(U,$J,112,2486,1)
+84 ;;=5^4.1^15.3^116^74.5^^^220^12.14^35^160^204^46^.923^.094^^^105^^.506
+85 ;;^UTILITY(U,$J,112,2486,2)
+86 ;;=.563^5.981^.514^.06^10^.3^^^^^^^^1.1
+87 ;;^UTILITY(U,$J,112,2486,3)
+88 ;;=.067^.201^.256^.445^.311^.112^.104^.222^.223^.31^.269^.113^.203^.398^1.102^.177^.381^.261
+89 ;;^UTILITY(U,$J,112,2486,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,2487,0)
+92 ;;=BF, CEREAL, OATMEAL, W/BANANAS, PPD W/WHOLE MILK^3-690^oz.^28.3^100^N
+93 ;;^UTILITY(U,$J,112,2487,1)
+94 ;;=4.7^3.8^16^116^74.3^^^206^11.23^30^151^247^61^.629^.072^^^99^1.6^.623
+95 ;;^UTILITY(U,$J,112,2487,2)
+96 ;;=.745^3.375^^.104^7.3^.33^^^^^^^27^1.2
+97 ;;^UTILITY(U,$J,112,2487,3)
+98 ;;=.064^.193^.248^.429^.309^.113^.069^.235^.214^.298^.216^.133^.175^.37^1.003^.141^.399^.245
+99 ;;^UTILITY(U,$J,112,2487,20)
+100 ;;=USDA Std. Reference, Release 10