FHINI01X ; ; 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,492,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,493,0)
;;=TURKEY SALAMI^5-299^oz.^28.3^100^N
;;^UTILITY(U,$J,112,493,1)
;;=16.37^13.8^.55^196^65.86^^^20^1.61^15^106^244^1004^1.81^.054^.012^^0^0^.065
;;^UTILITY(U,$J,112,493,2)
;;=.175^3.527^.512^.24^4^.21^2.93^.16^82^4.02^4.55^3.52^0^3.42^^^0
;;^UTILITY(U,$J,112,493,3)
;;=.181^.711^.818^1.267^1.482^.457^.184^.638^.619^.849^1.15^.489^1.039^1.57^2.603^.983^.758^.719
;;^UTILITY(U,$J,112,493,4)
;;=0^.02^.1^2.46^.75^.99^3.69^.28
;;^UTILITY(U,$J,112,493,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,494,0)
;;=TURKEY STICKS, BREADED, BATTERED, FRIED^5-300^sticks^64^100^N
;;^UTILITY(U,$J,112,494,1)
;;=14.2^16.9^17^279^49.4^^^14^2.2^15^234^260^838^1.46^.073^.083^^40^0^.1
;;^UTILITY(U,$J,112,494,2)
;;=.18^2.1^.533^.2^9^.23^4.01^.24^64^4.38^6.92^4.39^12^2.5
;;^UTILITY(U,$J,112,494,3)
;;=.17^.606^.726^1.134^1.168^.387^.178^.604^.549^.751^.923^.421^.808^1.256^2.831^.668^.798^.679
;;^UTILITY(U,$J,112,494,4)
;;=0^0^.06^2.48^.08^1.72^6.83^.09
;;^UTILITY(U,$J,112,494,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,495,0)
;;=POULTRY, MECHANICALLY DEBONED, RAW^5-303^oz.^28.3^100^N
;;^UTILITY(U,$J,112,495,1)
;;=14.72^19.98^0^243^62.95^^^187^1.22^12^132^104^40^1.9^.065^.019^^149^2^.096
;;^UTILITY(U,$J,112,495,2)
;;=.14^5.254^.772^.28^5^.27^4.11^.24^143^4.73^9.3^4.55^44^1.15^^^0
;;^UTILITY(U,$J,112,495,3)
;;=.118^.692^.57^1.22^1.314^.398^.111^.584^.485^.584^.996^.525^.958^1.594^2.44^.864^.666^.716
;;^UTILITY(U,$J,112,495,4)
;;=0^0^.15^3.53^.86^.98^8.36^.1
;;^UTILITY(U,$J,112,495,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,496,0)
;;=TURKEY, MECHANICALLY DEBONED, RAW^5-304^oz.^28.3^100^N
;;^UTILITY(U,$J,112,496,1)
;;=13.29^15.96^0^201^69.09^^^145^1.61^13^115^173^48^2.9^.093^.015^^0^0^.048
;;^UTILITY(U,$J,112,496,2)
;;=.134^1.969^.673^.21^7^.26^4.18^.33^95^5.31^5.02^4.51^0^1.1^^^0
;;^UTILITY(U,$J,112,496,3)
;;=.106^.636^.502^1.082^1.152^.374^.098^.551^.472^.544^.867^.504^.87^1.352^2.23^.778^.648^.621
;;^UTILITY(U,$J,112,496,4)
;;=0^.13^.27^3.26^.25^1.65^4.77^0
;;^UTILITY(U,$J,112,496,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,497,0)
;;=SOUP, BEAN W/HAM, CND, CHUNKY, READY-TO-SERVE^6-007^cups^243^100^N
;;^UTILITY(U,$J,112,497,1)
;;=5.19^3.5^11.16^95^78.63^^^32^1.33^19^59^175^400^.44^.16^.29^^1626^1.8^.06
;;^UTILITY(U,$J,112,497,2)
;;=.06^.7^.04^.05^12^.03^.36^.04^9^1.37^1.58^.39^163^1.52^^^4.6
;;^UTILITY(U,$J,112,497,4)
;;=0^.01^.05^.83^.09^.47^1.44
;;^UTILITY(U,$J,112,497,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,498,0)
;;=SOUP, BEEF BROTH OR BOULLION, CND, READY-TO-SERVE^6-008^cups^240^100^N
;;^UTILITY(U,$J,112,498,1)
;;=1.14^.22^.04^7^97.55^^^6^.17^2^13^54^326^0^0^.01^^0^0^.002
;;^UTILITY(U,$J,112,498,2)
;;=.021^.78^.02^.01^2^.07^.01^0^0^.11^.09^.01^0^1.05^^^0
;;^UTILITY(U,$J,112,498,4)
;;=^0^.01^.06^.01^.04^.08^^^.7
;;^UTILITY(U,$J,112,498,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,499,0)
;;=SOUP, CHICKEN NOODLE, CND, CHUNKY, READY-TO-SERVE^6-018^cups^240^100^N
;;^UTILITY(U,$J,112,499,1)
;;=5.3^2.5^7.1^73^84^^^10^.6^4^30^45^354^.4^.1^.1^^509^0^.03
;;^UTILITY(U,$J,112,499,2)
;;=.07^1.8^.15^.02^2^.13^.63^0^8^.58^1.11^.63^51^1.1^^^1.6
;;^UTILITY(U,$J,112,499,3)
;;=.051^.182^.23^.385^.356^.102^.068^.21^.136^.262^.276^.13^.326^.454^1.437^.389^.349^.179
;;^UTILITY(U,$J,112,499,4)
;;=^^^.48^.11^.11^1
;;^UTILITY(U,$J,112,499,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,500,0)
;;=SOUP, CHICKEN NOODLE, W/MEATBALLS, CND, CHUNKY, R-T-S^6-021^cups^248^100^N
;;^UTILITY(U,$J,112,500,1)
;;=3.27^1.44^3.37^40^90.72^^^12^.7^4^34^62^419^.2^.1^.2^^938^3.1^.05
;;^UTILITY(U,$J,112,500,2)
;;=.05^1.01^.15^.02^2^.1^.28^.01^4^.43^.65^.3^94^1.2
;;^UTILITY(U,$J,112,500,4)
;;=^0^.01^.31^.08^.09^.54^0
;;^UTILITY(U,$J,112,500,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,501,0)
;;=SOUP, CHICKEN RICE, CND, CHUNKY, READY-TO-SERVE^6-022^cups^240^100^N
;;^UTILITY(U,$J,112,501,1)
;;=5.11^1.33^5.41^53^86.78^^^14^.78^4^30^45^370^.4^.1^.1^^2441^1.6^.01
;;^UTILITY(U,$J,112,501,2)
;;=.041^1.71^.15^.02^1.6^.13^.26^.01^5^.4^.6^.28^244^1.37^^^.4
;;^UTILITY(U,$J,112,501,4)
;;=^0^.01^.29^.08^.08^.5^0
;;^UTILITY(U,$J,112,501,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,502,0)
;;=SOUP, CHICKEN VEGETABLE, CND, CHUNKY, READY-TO-SERVE^6-024^cups^240^100^N
;;^UTILITY(U,$J,112,502,1)
;;=5.13^2.01^7.87^69^83.44^^^11^.61^4^44^153^445^.9^.1^.1^^2496^2.3^.017
FHINI01X ; ; 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,492,20)
+2 ;;=USDA Std. Reference, Release 10
+3 ;;^UTILITY(U,$J,112,493,0)
+4 ;;=TURKEY SALAMI^5-299^oz.^28.3^100^N
+5 ;;^UTILITY(U,$J,112,493,1)
+6 ;;=16.37^13.8^.55^196^65.86^^^20^1.61^15^106^244^1004^1.81^.054^.012^^0^0^.065
+7 ;;^UTILITY(U,$J,112,493,2)
+8 ;;=.175^3.527^.512^.24^4^.21^2.93^.16^82^4.02^4.55^3.52^0^3.42^^^0
+9 ;;^UTILITY(U,$J,112,493,3)
+10 ;;=.181^.711^.818^1.267^1.482^.457^.184^.638^.619^.849^1.15^.489^1.039^1.57^2.603^.983^.758^.719
+11 ;;^UTILITY(U,$J,112,493,4)
+12 ;;=0^.02^.1^2.46^.75^.99^3.69^.28
+13 ;;^UTILITY(U,$J,112,493,20)
+14 ;;=USDA Std. Reference, Release 10
+15 ;;^UTILITY(U,$J,112,494,0)
+16 ;;=TURKEY STICKS, BREADED, BATTERED, FRIED^5-300^sticks^64^100^N
+17 ;;^UTILITY(U,$J,112,494,1)
+18 ;;=14.2^16.9^17^279^49.4^^^14^2.2^15^234^260^838^1.46^.073^.083^^40^0^.1
+19 ;;^UTILITY(U,$J,112,494,2)
+20 ;;=.18^2.1^.533^.2^9^.23^4.01^.24^64^4.38^6.92^4.39^12^2.5
+21 ;;^UTILITY(U,$J,112,494,3)
+22 ;;=.17^.606^.726^1.134^1.168^.387^.178^.604^.549^.751^.923^.421^.808^1.256^2.831^.668^.798^.679
+23 ;;^UTILITY(U,$J,112,494,4)
+24 ;;=0^0^.06^2.48^.08^1.72^6.83^.09
+25 ;;^UTILITY(U,$J,112,494,20)
+26 ;;=USDA Std. Reference, Release 10
+27 ;;^UTILITY(U,$J,112,495,0)
+28 ;;=POULTRY, MECHANICALLY DEBONED, RAW^5-303^oz.^28.3^100^N
+29 ;;^UTILITY(U,$J,112,495,1)
+30 ;;=14.72^19.98^0^243^62.95^^^187^1.22^12^132^104^40^1.9^.065^.019^^149^2^.096
+31 ;;^UTILITY(U,$J,112,495,2)
+32 ;;=.14^5.254^.772^.28^5^.27^4.11^.24^143^4.73^9.3^4.55^44^1.15^^^0
+33 ;;^UTILITY(U,$J,112,495,3)
+34 ;;=.118^.692^.57^1.22^1.314^.398^.111^.584^.485^.584^.996^.525^.958^1.594^2.44^.864^.666^.716
+35 ;;^UTILITY(U,$J,112,495,4)
+36 ;;=0^0^.15^3.53^.86^.98^8.36^.1
+37 ;;^UTILITY(U,$J,112,495,20)
+38 ;;=USDA Std. Reference, Release 10
+39 ;;^UTILITY(U,$J,112,496,0)
+40 ;;=TURKEY, MECHANICALLY DEBONED, RAW^5-304^oz.^28.3^100^N
+41 ;;^UTILITY(U,$J,112,496,1)
+42 ;;=13.29^15.96^0^201^69.09^^^145^1.61^13^115^173^48^2.9^.093^.015^^0^0^.048
+43 ;;^UTILITY(U,$J,112,496,2)
+44 ;;=.134^1.969^.673^.21^7^.26^4.18^.33^95^5.31^5.02^4.51^0^1.1^^^0
+45 ;;^UTILITY(U,$J,112,496,3)
+46 ;;=.106^.636^.502^1.082^1.152^.374^.098^.551^.472^.544^.867^.504^.87^1.352^2.23^.778^.648^.621
+47 ;;^UTILITY(U,$J,112,496,4)
+48 ;;=0^.13^.27^3.26^.25^1.65^4.77^0
+49 ;;^UTILITY(U,$J,112,496,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,497,0)
+52 ;;=SOUP, BEAN W/HAM, CND, CHUNKY, READY-TO-SERVE^6-007^cups^243^100^N
+53 ;;^UTILITY(U,$J,112,497,1)
+54 ;;=5.19^3.5^11.16^95^78.63^^^32^1.33^19^59^175^400^.44^.16^.29^^1626^1.8^.06
+55 ;;^UTILITY(U,$J,112,497,2)
+56 ;;=.06^.7^.04^.05^12^.03^.36^.04^9^1.37^1.58^.39^163^1.52^^^4.6
+57 ;;^UTILITY(U,$J,112,497,4)
+58 ;;=0^.01^.05^.83^.09^.47^1.44
+59 ;;^UTILITY(U,$J,112,497,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,498,0)
+62 ;;=SOUP, BEEF BROTH OR BOULLION, CND, READY-TO-SERVE^6-008^cups^240^100^N
+63 ;;^UTILITY(U,$J,112,498,1)
+64 ;;=1.14^.22^.04^7^97.55^^^6^.17^2^13^54^326^0^0^.01^^0^0^.002
+65 ;;^UTILITY(U,$J,112,498,2)
+66 ;;=.021^.78^.02^.01^2^.07^.01^0^0^.11^.09^.01^0^1.05^^^0
+67 ;;^UTILITY(U,$J,112,498,4)
+68 ;;=^0^.01^.06^.01^.04^.08^^^.7
+69 ;;^UTILITY(U,$J,112,498,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,499,0)
+72 ;;=SOUP, CHICKEN NOODLE, CND, CHUNKY, READY-TO-SERVE^6-018^cups^240^100^N
+73 ;;^UTILITY(U,$J,112,499,1)
+74 ;;=5.3^2.5^7.1^73^84^^^10^.6^4^30^45^354^.4^.1^.1^^509^0^.03
+75 ;;^UTILITY(U,$J,112,499,2)
+76 ;;=.07^1.8^.15^.02^2^.13^.63^0^8^.58^1.11^.63^51^1.1^^^1.6
+77 ;;^UTILITY(U,$J,112,499,3)
+78 ;;=.051^.182^.23^.385^.356^.102^.068^.21^.136^.262^.276^.13^.326^.454^1.437^.389^.349^.179
+79 ;;^UTILITY(U,$J,112,499,4)
+80 ;;=^^^.48^.11^.11^1
+81 ;;^UTILITY(U,$J,112,499,20)
+82 ;;=USDA Std. Reference, Release 10
+83 ;;^UTILITY(U,$J,112,500,0)
+84 ;;=SOUP, CHICKEN NOODLE, W/MEATBALLS, CND, CHUNKY, R-T-S^6-021^cups^248^100^N
+85 ;;^UTILITY(U,$J,112,500,1)
+86 ;;=3.27^1.44^3.37^40^90.72^^^12^.7^4^34^62^419^.2^.1^.2^^938^3.1^.05
+87 ;;^UTILITY(U,$J,112,500,2)
+88 ;;=.05^1.01^.15^.02^2^.1^.28^.01^4^.43^.65^.3^94^1.2
+89 ;;^UTILITY(U,$J,112,500,4)
+90 ;;=^0^.01^.31^.08^.09^.54^0
+91 ;;^UTILITY(U,$J,112,500,20)
+92 ;;=USDA Std. Reference, Release 10
+93 ;;^UTILITY(U,$J,112,501,0)
+94 ;;=SOUP, CHICKEN RICE, CND, CHUNKY, READY-TO-SERVE^6-022^cups^240^100^N
+95 ;;^UTILITY(U,$J,112,501,1)
+96 ;;=5.11^1.33^5.41^53^86.78^^^14^.78^4^30^45^370^.4^.1^.1^^2441^1.6^.01
+97 ;;^UTILITY(U,$J,112,501,2)
+98 ;;=.041^1.71^.15^.02^1.6^.13^.26^.01^5^.4^.6^.28^244^1.37^^^.4
+99 ;;^UTILITY(U,$J,112,501,4)
+100 ;;=^0^.01^.29^.08^.08^.5^0
+101 ;;^UTILITY(U,$J,112,501,20)
+102 ;;=USDA Std. Reference, Release 10
+103 ;;^UTILITY(U,$J,112,502,0)
+104 ;;=SOUP, CHICKEN VEGETABLE, CND, CHUNKY, READY-TO-SERVE^6-024^cups^240^100^N
+105 ;;^UTILITY(U,$J,112,502,1)
+106 ;;=5.13^2.01^7.87^69^83.44^^^11^.61^4^44^153^445^.9^.1^.1^^2496^2.3^.017
