FHINI070 ; ; 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,2440,1)
;;=2.2^1.5^8^58^87.2^^^27^.54^3^46^44^38^.326^.025^^^161^.8^.01
;;^UTILITY(U,$J,112,2440,2)
;;=.05^.056^1.003^.024^9.4^.08^.29^.02^51.4^.49^.61^.33^^.6
;;^UTILITY(U,$J,112,2440,4)
;;=^^.01^.35^.04^.12^.57^.02
;;^UTILITY(U,$J,112,2440,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2441,0)
;;=BF, CEREAL, EGG YOLKS AND BACON, JNR^3-201^jars^128^100^N
;;^UTILITY(U,$J,112,2441,1)
;;=2.5^5^6.2^79^85.9^^^28^.47^5^50^35^48^.27^.02^^^94^.9^.05
;;^UTILITY(U,$J,112,2441,2)
;;=.077^.266^1.105^.026^4.1^.09^^^^^^^28^.4^^^.9
;;^UTILITY(U,$J,112,2441,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2442,0)
;;=BF, CEREAL, EGG YOLKS AND BACON, STR^3-202^jars^213^100^N
;;^UTILITY(U,$J,112,2442,1)
;;=2.5^5.2^7.1^84^84.9^^^25^.5^5^54^37^46^.287^.021^^^67^1.2^.019
;;^UTILITY(U,$J,112,2442,2)
;;=.051^.161^1.173^.027^4.4^.08^^^^^^^20^.3^^^.9
;;^UTILITY(U,$J,112,2442,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2443,0)
;;=BF, CEREAL, GRITS & EGG YOLKS, STRAINED^3-203^jars^128^100^N
;;^UTILITY(U,$J,112,2443,1)
;;=1.8^2.3^7.4^57^88^^^28^.5^5^36^56^35^.225^.024^^^122^.5^.032
;;^UTILITY(U,$J,112,2443,2)
;;=.072^.293^.941^.026^2.9^.04^^^^^^^30^.5
;;^UTILITY(U,$J,112,2443,3)
;;=.022^.072^.087^.183^.111^.054^.027^.098^.089^.106^.084^.056^.088^.144^.341^.051^.172^.092
;;^UTILITY(U,$J,112,2443,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2444,0)
;;=BF, CEREAL, MIXED, W/HONEY, DRY^3-204^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2444,1)
;;=13.8^5.1^73.3^391^4.1^^^1183^68.34^103^649^269^44^2.467^.343^^^23^0^2.529
;;^UTILITY(U,$J,112,2444,2)
;;=2.729^37.662^1.104^.194^44^0^^^^^^^2^3.7
;;^UTILITY(U,$J,112,2444,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2445,0)
;;=BF, CEREAL, RICE, W/MIXED FRUIT, JUNIOR^3-210^jars^220^100^N
;;^UTILITY(U,$J,112,2445,1)
;;=1^.2^18.7^84^79.6^^^20^4.71^5^23^33^11^.18^0^^^15^20.2^.251
;;^UTILITY(U,$J,112,2445,2)
;;=.594^2.73^.272^.247^2.7^.04^^^^^^^2^.4^^^1
;;^UTILITY(U,$J,112,2445,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2446,0)
;;=BF, CEREAL, HI-PROT, W/APPLE & ORANGE, DRY^3-211^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2446,1)
;;=25.4^6.5^57.6^374^5.3^^^751^87.5^159^539^1330^104^2.7^.964^^^54^3.1^3.79
;;^UTILITY(U,$J,112,2446,2)
;;=4.33^23.83^^.351^190^.3^^^^^^^5^5.2^^^7.1
;;^UTILITY(U,$J,112,2446,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2447,0)
;;=BF, CEREAL, RICE, W/BANANAS, DRY^3-212^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2447,1)
;;=8.7^4.2^79.9^404^4.7^^^691^66.9^141^410^769^96^1.5^.254^^^29^2^3.97
;;^UTILITY(U,$J,112,2447,2)
;;=3.8^23.32^^.686^12^.21^^^^^^^3^2.5^^^1
;;^UTILITY(U,$J,112,2447,3)
;;=.154^.444^.464^.821^.452^.229^.184^.4^.368^.547^.603^.273^.496^.857^1.523^.364^.418^.467
;;^UTILITY(U,$J,112,2447,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2448,0)
;;=BF, COOKIES, ARROWROOT^3-214^cookies^6^100^N
;;^UTILITY(U,$J,112,2448,1)
;;=7.6^14.3^71.2^442^5.6^^^32^3^22^116^156^370^.53^.074^^^0^5.5^.499
;;^UTILITY(U,$J,112,2448,2)
;;=.429^5.739^.531^.04^10^.07^.78^.04^1.07^3.33^8.98^.84^^1.4^^^.2
;;^UTILITY(U,$J,112,2448,4)
;;=^^.02^1.54^^1.67^8.98
;;^UTILITY(U,$J,112,2448,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2449,0)
;;=BF, DESSERT, APPLE BETTY, STRAINED^3-218^jars^135^100^N
;;^UTILITY(U,$J,112,2449,1)
;;=.4^0^19.6^72^79.9^^^19^.18^2^3^50^10^.011^.061^^^17^34.7^.013
;;^UTILITY(U,$J,112,2449,2)
;;=.037^.046^^.012^.4^.04^^^^^^^2^.1^^^1
;;^UTILITY(U,$J,112,2449,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2450,0)
;;=BF, DESSERT, APPLE BETTY, JUNIOR^3-219^jars^220^100^N
;;^UTILITY(U,$J,112,2450,1)
;;=.4^0^19^70^80.5^^^16^.2^2^4^53^9^.027^.064^^^16^27.1^.011
;;^UTILITY(U,$J,112,2450,2)
;;=.051^.046^^.013^.4^.04^^^^^^^2^.2^^^1
;;^UTILITY(U,$J,112,2450,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2451,0)
;;=BF, DESSERT, DUTCH APPLE, STRAINED^3-220^jars^135^100^N
;;^UTILITY(U,$J,112,2451,1)
;;=0^.9^16.7^68^82.2^^^5^.2^2^3^33^16^.01^.059^^^49^21.4^.011
;;^UTILITY(U,$J,112,2451,2)
;;=.013^.048^^.011^.7^0^.02^.01^^.58^.24^.03^5^.1^^^.9
;;^UTILITY(U,$J,112,2451,4)
;;=.03^.03^.09^.25^.02^.09^.21^0
;;^UTILITY(U,$J,112,2451,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2452,0)
;;=BF, DESSERT, DUTCH APPLE, JUNIOR^3-221^jars^220^100^N
;;^UTILITY(U,$J,112,2452,1)
;;=0^1^16.8^69^82.1^^^4^.2^2^4^37^16^.025^.06^^^50^21.4^.012
;;^UTILITY(U,$J,112,2452,2)
;;=.014^.048^^.012^.7^0^.02^.01^^.62^.26^.03^5^.1^^^.9
FHINI070 ; ; 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,2440,1)
+2 ;;=2.2^1.5^8^58^87.2^^^27^.54^3^46^44^38^.326^.025^^^161^.8^.01
+3 ;;^UTILITY(U,$J,112,2440,2)
+4 ;;=.05^.056^1.003^.024^9.4^.08^.29^.02^51.4^.49^.61^.33^^.6
+5 ;;^UTILITY(U,$J,112,2440,4)
+6 ;;=^^.01^.35^.04^.12^.57^.02
+7 ;;^UTILITY(U,$J,112,2440,20)
+8 ;;=USDA Std. Reference, Release 10
+9 ;;^UTILITY(U,$J,112,2441,0)
+10 ;;=BF, CEREAL, EGG YOLKS AND BACON, JNR^3-201^jars^128^100^N
+11 ;;^UTILITY(U,$J,112,2441,1)
+12 ;;=2.5^5^6.2^79^85.9^^^28^.47^5^50^35^48^.27^.02^^^94^.9^.05
+13 ;;^UTILITY(U,$J,112,2441,2)
+14 ;;=.077^.266^1.105^.026^4.1^.09^^^^^^^28^.4^^^.9
+15 ;;^UTILITY(U,$J,112,2441,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,2442,0)
+18 ;;=BF, CEREAL, EGG YOLKS AND BACON, STR^3-202^jars^213^100^N
+19 ;;^UTILITY(U,$J,112,2442,1)
+20 ;;=2.5^5.2^7.1^84^84.9^^^25^.5^5^54^37^46^.287^.021^^^67^1.2^.019
+21 ;;^UTILITY(U,$J,112,2442,2)
+22 ;;=.051^.161^1.173^.027^4.4^.08^^^^^^^20^.3^^^.9
+23 ;;^UTILITY(U,$J,112,2442,20)
+24 ;;=USDA Std. Reference, Release 10
+25 ;;^UTILITY(U,$J,112,2443,0)
+26 ;;=BF, CEREAL, GRITS & EGG YOLKS, STRAINED^3-203^jars^128^100^N
+27 ;;^UTILITY(U,$J,112,2443,1)
+28 ;;=1.8^2.3^7.4^57^88^^^28^.5^5^36^56^35^.225^.024^^^122^.5^.032
+29 ;;^UTILITY(U,$J,112,2443,2)
+30 ;;=.072^.293^.941^.026^2.9^.04^^^^^^^30^.5
+31 ;;^UTILITY(U,$J,112,2443,3)
+32 ;;=.022^.072^.087^.183^.111^.054^.027^.098^.089^.106^.084^.056^.088^.144^.341^.051^.172^.092
+33 ;;^UTILITY(U,$J,112,2443,20)
+34 ;;=USDA Std. Reference, Release 10
+35 ;;^UTILITY(U,$J,112,2444,0)
+36 ;;=BF, CEREAL, MIXED, W/HONEY, DRY^3-204^oz.^28.3^100^N
+37 ;;^UTILITY(U,$J,112,2444,1)
+38 ;;=13.8^5.1^73.3^391^4.1^^^1183^68.34^103^649^269^44^2.467^.343^^^23^0^2.529
+39 ;;^UTILITY(U,$J,112,2444,2)
+40 ;;=2.729^37.662^1.104^.194^44^0^^^^^^^2^3.7
+41 ;;^UTILITY(U,$J,112,2444,20)
+42 ;;=USDA Std. Reference, Release 10
+43 ;;^UTILITY(U,$J,112,2445,0)
+44 ;;=BF, CEREAL, RICE, W/MIXED FRUIT, JUNIOR^3-210^jars^220^100^N
+45 ;;^UTILITY(U,$J,112,2445,1)
+46 ;;=1^.2^18.7^84^79.6^^^20^4.71^5^23^33^11^.18^0^^^15^20.2^.251
+47 ;;^UTILITY(U,$J,112,2445,2)
+48 ;;=.594^2.73^.272^.247^2.7^.04^^^^^^^2^.4^^^1
+49 ;;^UTILITY(U,$J,112,2445,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,2446,0)
+52 ;;=BF, CEREAL, HI-PROT, W/APPLE & ORANGE, DRY^3-211^oz.^28.3^100^N
+53 ;;^UTILITY(U,$J,112,2446,1)
+54 ;;=25.4^6.5^57.6^374^5.3^^^751^87.5^159^539^1330^104^2.7^.964^^^54^3.1^3.79
+55 ;;^UTILITY(U,$J,112,2446,2)
+56 ;;=4.33^23.83^^.351^190^.3^^^^^^^5^5.2^^^7.1
+57 ;;^UTILITY(U,$J,112,2446,20)
+58 ;;=USDA Std. Reference, Release 10
+59 ;;^UTILITY(U,$J,112,2447,0)
+60 ;;=BF, CEREAL, RICE, W/BANANAS, DRY^3-212^oz.^28.3^100^N
+61 ;;^UTILITY(U,$J,112,2447,1)
+62 ;;=8.7^4.2^79.9^404^4.7^^^691^66.9^141^410^769^96^1.5^.254^^^29^2^3.97
+63 ;;^UTILITY(U,$J,112,2447,2)
+64 ;;=3.8^23.32^^.686^12^.21^^^^^^^3^2.5^^^1
+65 ;;^UTILITY(U,$J,112,2447,3)
+66 ;;=.154^.444^.464^.821^.452^.229^.184^.4^.368^.547^.603^.273^.496^.857^1.523^.364^.418^.467
+67 ;;^UTILITY(U,$J,112,2447,20)
+68 ;;=USDA Std. Reference, Release 10
+69 ;;^UTILITY(U,$J,112,2448,0)
+70 ;;=BF, COOKIES, ARROWROOT^3-214^cookies^6^100^N
+71 ;;^UTILITY(U,$J,112,2448,1)
+72 ;;=7.6^14.3^71.2^442^5.6^^^32^3^22^116^156^370^.53^.074^^^0^5.5^.499
+73 ;;^UTILITY(U,$J,112,2448,2)
+74 ;;=.429^5.739^.531^.04^10^.07^.78^.04^1.07^3.33^8.98^.84^^1.4^^^.2
+75 ;;^UTILITY(U,$J,112,2448,4)
+76 ;;=^^.02^1.54^^1.67^8.98
+77 ;;^UTILITY(U,$J,112,2448,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,2449,0)
+80 ;;=BF, DESSERT, APPLE BETTY, STRAINED^3-218^jars^135^100^N
+81 ;;^UTILITY(U,$J,112,2449,1)
+82 ;;=.4^0^19.6^72^79.9^^^19^.18^2^3^50^10^.011^.061^^^17^34.7^.013
+83 ;;^UTILITY(U,$J,112,2449,2)
+84 ;;=.037^.046^^.012^.4^.04^^^^^^^2^.1^^^1
+85 ;;^UTILITY(U,$J,112,2449,20)
+86 ;;=USDA Std. Reference, Release 10
+87 ;;^UTILITY(U,$J,112,2450,0)
+88 ;;=BF, DESSERT, APPLE BETTY, JUNIOR^3-219^jars^220^100^N
+89 ;;^UTILITY(U,$J,112,2450,1)
+90 ;;=.4^0^19^70^80.5^^^16^.2^2^4^53^9^.027^.064^^^16^27.1^.011
+91 ;;^UTILITY(U,$J,112,2450,2)
+92 ;;=.051^.046^^.013^.4^.04^^^^^^^2^.2^^^1
+93 ;;^UTILITY(U,$J,112,2450,20)
+94 ;;=USDA Std. Reference, Release 10
+95 ;;^UTILITY(U,$J,112,2451,0)
+96 ;;=BF, DESSERT, DUTCH APPLE, STRAINED^3-220^jars^135^100^N
+97 ;;^UTILITY(U,$J,112,2451,1)
+98 ;;=0^.9^16.7^68^82.2^^^5^.2^2^3^33^16^.01^.059^^^49^21.4^.011
+99 ;;^UTILITY(U,$J,112,2451,2)
+100 ;;=.013^.048^^.011^.7^0^.02^.01^^.58^.24^.03^5^.1^^^.9
+101 ;;^UTILITY(U,$J,112,2451,4)
+102 ;;=.03^.03^.09^.25^.02^.09^.21^0
+103 ;;^UTILITY(U,$J,112,2451,20)
+104 ;;=USDA Std. Reference, Release 10
+105 ;;^UTILITY(U,$J,112,2452,0)
+106 ;;=BF, DESSERT, DUTCH APPLE, JUNIOR^3-221^jars^220^100^N
+107 ;;^UTILITY(U,$J,112,2452,1)
+108 ;;=0^1^16.8^69^82.1^^^4^.2^2^4^37^16^.025^.06^^^50^21.4^.012
+109 ;;^UTILITY(U,$J,112,2452,2)
+110 ;;=.014^.048^^.012^.7^0^.02^.01^^.62^.26^.03^5^.1^^^.9
