FHINI01V ; ; 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,474,4)
;;=0^.05^.18^4.12^1.2^1.1^7.14^0
;;^UTILITY(U,$J,112,474,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,475,0)
;;=CHICKEN ROLL, LIGHT MEAT^5-280^slices^28.4^100^N
;;^UTILITY(U,$J,112,475,1)
;;=19.53^7.38^2.45^159^68.6^^^43^.97^19^157^228^584^.72^.041^.013^^82^0^.065
;;^UTILITY(U,$J,112,475,2)
;;=.13^5.291^.39^.21^2^.15^1.36^.06^50^2.02^2.96^1.6^24^2.05^^^0
;;^UTILITY(U,$J,112,475,3)
;;=.222^.815^.999^1.44^1.62^.528^.256^.766^.642^.957^1.204^.588^1.107^1.74^2.885^1.131^.884^.682
;;^UTILITY(U,$J,112,475,4)
;;=0^.01^.06^1.51^.41^.39^2.43^.08
;;^UTILITY(U,$J,112,475,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,476,0)
;;=CHICKEN SPREAD, CND^5-281^tbsp.^13^100^N
;;^UTILITY(U,$J,112,476,1)
;;=15.41^11.72^5.39^192^66.22^^^125^2.33^12^89^106^386^1.15^.037^.012^^87^0^.009
;;^UTILITY(U,$J,112,476,2)
;;=.114^2.748^.433^.15^3^.13^2.23^.12^52^3.38^4.86^2.51^25^1.26^^^0
;;^UTILITY(U,$J,112,476,3)
;;=.179^.65^.807^1.152^1.301^.424^.199^.61^.516^.762^.939^.474^.854^1.377^2.302^.807^.658^.534
;;^UTILITY(U,$J,112,476,4)
;;=0^0^.1^2.41^.63^.72^4.06^0
;;^UTILITY(U,$J,112,476,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,477,0)
;;=POULTRY SALAD SANDWICH SPREAD^5-283^tbsp.^13^100^N
;;^UTILITY(U,$J,112,477,1)
;;=11.64^13.52^7.41^200^66.17^^^10^.61^10^33^183^377^1.04^.033^.009^^139^1.2^.024
;;^UTILITY(U,$J,112,477,2)
;;=.071^1.669^.27^.11^5^.38^5.97^.05^30^3.45^3.25^6.22^42^1.26^^^0
;;^UTILITY(U,$J,112,477,3)
;;=.13^.497^.584^.88^1.01^.32^.141^.455^.412^.589^.779^.347^.713^1.085^1.789^.722^.551^.466
;;^UTILITY(U,$J,112,477,4)
;;=0^0^0^2.96^.25^.44^2.71^0
;;^UTILITY(U,$J,112,477,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,478,0)
;;=TURKEY, CND, MEAT ONLY, W/BROTH^5-284^oz.^28.3^100^N
;;^UTILITY(U,$J,112,478,1)
;;=23.68^6.86^0^163^66.07^^^12^1.86^20^162^224^467^2.37^.074^.017^^0^2^.014
;;^UTILITY(U,$J,112,478,2)
;;=.171^6.622^.686^.33^6^.28^1.46^.08^66^2^2.26^1.75^0^1.92^^^0
;;^UTILITY(U,$J,112,478,3)
;;=.261^1.029^1.183^1.833^2.143^.661^.266^.922^.895^1.228^1.663^.708^1.503^2.27^3.765^1.422^1.096^1.04
;;^UTILITY(U,$J,112,478,4)
;;=0^.01^.05^1.22^.37^.49^1.83^.14
;;^UTILITY(U,$J,112,478,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,479,0)
;;=TURKEY, DICED, LIGHT & DARK MEAT, SEASONED^5-285^oz.^28.3^100^N
;;^UTILITY(U,$J,112,479,1)
;;=18.7^6^1^138^71.7^^^1^1.8^17^240^310^850^2.02^.063^.013^^0^0^.04
;;^UTILITY(U,$J,112,479,2)
;;=.11^4.8^.589^.28^5^.24^1.27^.07^55^1.75^1.98^1.53^0^2.6^^^0
;;^UTILITY(U,$J,112,479,3)
;;=.206^.813^.934^1.447^1.693^.522^.21^.729^.707^.97^1.313^.559^1.187^1.793^2.974^1.123^.866^.821
;;^UTILITY(U,$J,112,479,4)
;;=0^.01^.04^1.07^.32^.43^1.6^.12
;;^UTILITY(U,$J,112,479,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,480,0)
;;=TURKEY & GRAVY, FRZ^5-286^oz.^28.3^100^N
;;^UTILITY(U,$J,112,480,1)
;;=5.88^2.63^4.61^67^85.07^^^14^.93^8^81^61^554^.7^.022^.005^^42^0^.024
;;^UTILITY(U,$J,112,480,2)
;;=.127^1.799^.213^.1^4^.24^.44^.03^18^.85^.97^.47^13^1.81^^^0
;;^UTILITY(U,$J,112,480,3)
;;=.067^.262^.306^.469^.554^.17^.061^.233^.232^.312^.41^.183^.364^.571^.96^.292^.245^.262
;;^UTILITY(U,$J,112,480,4)
;;=0^0^.03^.54^.11^.27^.86^0
;;^UTILITY(U,$J,112,480,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,481,0)
;;=TURKEY LUNCHEON MEAT, HAM, CURED TURKEY THIGH MEAT^5-287^slices^28.35^100^N
;;^UTILITY(U,$J,112,481,1)
;;=18.93^5.08^.37^128^71.38^^^10^2.76^16^191^325^996^2.94^.106^.015^^0^0^.052
;;^UTILITY(U,$J,112,481,2)
;;=.247^3.527^.849^.24^6^.24^1.23^.05^56^1.7^1.15^1.52^0^4.23^^^0
;;^UTILITY(U,$J,112,481,3)
;;=.215^.842^.984^1.508^1.784^.548^.197^.751^.748^1.006^1.321^.591^1.172^1.839^3.09^.939^.788^.842
;;^UTILITY(U,$J,112,481,4)
;;=0^.01^.03^.9^.17^.51^.95^.18
;;^UTILITY(U,$J,112,481,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,482,0)
;;=TURKEY LUNCHEON MEAT, LOAF, BREAST MEAT^5-288^slices^21.3^100^N
;;^UTILITY(U,$J,112,482,1)
;;=22.5^1.58^0^110^71.85^^^7^.4^20^229^278^1431^1.13^.053^.015^^0^0^.04
;;^UTILITY(U,$J,112,482,2)
;;=.107^8.322^.59^.36^4^2.02^.26^.02^41^.48^.45^.28^0^4.18^^^0
;;^UTILITY(U,$J,112,482,3)
;;=.256^1.001^1.17^1.793^2.12^.652^.234^.893^.889^1.195^1.57^.702^1.393^2.185^3.672^1.116^.936^1.001
;;^UTILITY(U,$J,112,482,4)
;;=0^0^.02^.3^.07^.15^.38^0
;;^UTILITY(U,$J,112,482,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,483,0)
;;=TURKEY PASTRAMI^5-289^slices^28.35^100^N
;;^UTILITY(U,$J,112,483,1)
;;=18.36^6.21^1.66^141^70.64^^^9^1.66^14^200^260^1045^2.16^.053^.013^^0^0^.055
FHINI01V ; ; 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,474,4)
+2 ;;=0^.05^.18^4.12^1.2^1.1^7.14^0
+3 ;;^UTILITY(U,$J,112,474,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,475,0)
+6 ;;=CHICKEN ROLL, LIGHT MEAT^5-280^slices^28.4^100^N
+7 ;;^UTILITY(U,$J,112,475,1)
+8 ;;=19.53^7.38^2.45^159^68.6^^^43^.97^19^157^228^584^.72^.041^.013^^82^0^.065
+9 ;;^UTILITY(U,$J,112,475,2)
+10 ;;=.13^5.291^.39^.21^2^.15^1.36^.06^50^2.02^2.96^1.6^24^2.05^^^0
+11 ;;^UTILITY(U,$J,112,475,3)
+12 ;;=.222^.815^.999^1.44^1.62^.528^.256^.766^.642^.957^1.204^.588^1.107^1.74^2.885^1.131^.884^.682
+13 ;;^UTILITY(U,$J,112,475,4)
+14 ;;=0^.01^.06^1.51^.41^.39^2.43^.08
+15 ;;^UTILITY(U,$J,112,475,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,476,0)
+18 ;;=CHICKEN SPREAD, CND^5-281^tbsp.^13^100^N
+19 ;;^UTILITY(U,$J,112,476,1)
+20 ;;=15.41^11.72^5.39^192^66.22^^^125^2.33^12^89^106^386^1.15^.037^.012^^87^0^.009
+21 ;;^UTILITY(U,$J,112,476,2)
+22 ;;=.114^2.748^.433^.15^3^.13^2.23^.12^52^3.38^4.86^2.51^25^1.26^^^0
+23 ;;^UTILITY(U,$J,112,476,3)
+24 ;;=.179^.65^.807^1.152^1.301^.424^.199^.61^.516^.762^.939^.474^.854^1.377^2.302^.807^.658^.534
+25 ;;^UTILITY(U,$J,112,476,4)
+26 ;;=0^0^.1^2.41^.63^.72^4.06^0
+27 ;;^UTILITY(U,$J,112,476,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,477,0)
+30 ;;=POULTRY SALAD SANDWICH SPREAD^5-283^tbsp.^13^100^N
+31 ;;^UTILITY(U,$J,112,477,1)
+32 ;;=11.64^13.52^7.41^200^66.17^^^10^.61^10^33^183^377^1.04^.033^.009^^139^1.2^.024
+33 ;;^UTILITY(U,$J,112,477,2)
+34 ;;=.071^1.669^.27^.11^5^.38^5.97^.05^30^3.45^3.25^6.22^42^1.26^^^0
+35 ;;^UTILITY(U,$J,112,477,3)
+36 ;;=.13^.497^.584^.88^1.01^.32^.141^.455^.412^.589^.779^.347^.713^1.085^1.789^.722^.551^.466
+37 ;;^UTILITY(U,$J,112,477,4)
+38 ;;=0^0^0^2.96^.25^.44^2.71^0
+39 ;;^UTILITY(U,$J,112,477,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,478,0)
+42 ;;=TURKEY, CND, MEAT ONLY, W/BROTH^5-284^oz.^28.3^100^N
+43 ;;^UTILITY(U,$J,112,478,1)
+44 ;;=23.68^6.86^0^163^66.07^^^12^1.86^20^162^224^467^2.37^.074^.017^^0^2^.014
+45 ;;^UTILITY(U,$J,112,478,2)
+46 ;;=.171^6.622^.686^.33^6^.28^1.46^.08^66^2^2.26^1.75^0^1.92^^^0
+47 ;;^UTILITY(U,$J,112,478,3)
+48 ;;=.261^1.029^1.183^1.833^2.143^.661^.266^.922^.895^1.228^1.663^.708^1.503^2.27^3.765^1.422^1.096^1.04
+49 ;;^UTILITY(U,$J,112,478,4)
+50 ;;=0^.01^.05^1.22^.37^.49^1.83^.14
+51 ;;^UTILITY(U,$J,112,478,20)
+52 ;;=USDA Std. Reference, Release 10
+53 ;;^UTILITY(U,$J,112,479,0)
+54 ;;=TURKEY, DICED, LIGHT & DARK MEAT, SEASONED^5-285^oz.^28.3^100^N
+55 ;;^UTILITY(U,$J,112,479,1)
+56 ;;=18.7^6^1^138^71.7^^^1^1.8^17^240^310^850^2.02^.063^.013^^0^0^.04
+57 ;;^UTILITY(U,$J,112,479,2)
+58 ;;=.11^4.8^.589^.28^5^.24^1.27^.07^55^1.75^1.98^1.53^0^2.6^^^0
+59 ;;^UTILITY(U,$J,112,479,3)
+60 ;;=.206^.813^.934^1.447^1.693^.522^.21^.729^.707^.97^1.313^.559^1.187^1.793^2.974^1.123^.866^.821
+61 ;;^UTILITY(U,$J,112,479,4)
+62 ;;=0^.01^.04^1.07^.32^.43^1.6^.12
+63 ;;^UTILITY(U,$J,112,479,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,480,0)
+66 ;;=TURKEY & GRAVY, FRZ^5-286^oz.^28.3^100^N
+67 ;;^UTILITY(U,$J,112,480,1)
+68 ;;=5.88^2.63^4.61^67^85.07^^^14^.93^8^81^61^554^.7^.022^.005^^42^0^.024
+69 ;;^UTILITY(U,$J,112,480,2)
+70 ;;=.127^1.799^.213^.1^4^.24^.44^.03^18^.85^.97^.47^13^1.81^^^0
+71 ;;^UTILITY(U,$J,112,480,3)
+72 ;;=.067^.262^.306^.469^.554^.17^.061^.233^.232^.312^.41^.183^.364^.571^.96^.292^.245^.262
+73 ;;^UTILITY(U,$J,112,480,4)
+74 ;;=0^0^.03^.54^.11^.27^.86^0
+75 ;;^UTILITY(U,$J,112,480,20)
+76 ;;=USDA Std. Reference, Release 10
+77 ;;^UTILITY(U,$J,112,481,0)
+78 ;;=TURKEY LUNCHEON MEAT, HAM, CURED TURKEY THIGH MEAT^5-287^slices^28.35^100^N
+79 ;;^UTILITY(U,$J,112,481,1)
+80 ;;=18.93^5.08^.37^128^71.38^^^10^2.76^16^191^325^996^2.94^.106^.015^^0^0^.052
+81 ;;^UTILITY(U,$J,112,481,2)
+82 ;;=.247^3.527^.849^.24^6^.24^1.23^.05^56^1.7^1.15^1.52^0^4.23^^^0
+83 ;;^UTILITY(U,$J,112,481,3)
+84 ;;=.215^.842^.984^1.508^1.784^.548^.197^.751^.748^1.006^1.321^.591^1.172^1.839^3.09^.939^.788^.842
+85 ;;^UTILITY(U,$J,112,481,4)
+86 ;;=0^.01^.03^.9^.17^.51^.95^.18
+87 ;;^UTILITY(U,$J,112,481,20)
+88 ;;=USDA Std. Reference, Release 10
+89 ;;^UTILITY(U,$J,112,482,0)
+90 ;;=TURKEY LUNCHEON MEAT, LOAF, BREAST MEAT^5-288^slices^21.3^100^N
+91 ;;^UTILITY(U,$J,112,482,1)
+92 ;;=22.5^1.58^0^110^71.85^^^7^.4^20^229^278^1431^1.13^.053^.015^^0^0^.04
+93 ;;^UTILITY(U,$J,112,482,2)
+94 ;;=.107^8.322^.59^.36^4^2.02^.26^.02^41^.48^.45^.28^0^4.18^^^0
+95 ;;^UTILITY(U,$J,112,482,3)
+96 ;;=.256^1.001^1.17^1.793^2.12^.652^.234^.893^.889^1.195^1.57^.702^1.393^2.185^3.672^1.116^.936^1.001
+97 ;;^UTILITY(U,$J,112,482,4)
+98 ;;=0^0^.02^.3^.07^.15^.38^0
+99 ;;^UTILITY(U,$J,112,482,20)
+100 ;;=USDA Std. Reference, Release 10
+101 ;;^UTILITY(U,$J,112,483,0)
+102 ;;=TURKEY PASTRAMI^5-289^slices^28.35^100^N
+103 ;;^UTILITY(U,$J,112,483,1)
+104 ;;=18.36^6.21^1.66^141^70.64^^^9^1.66^14^200^260^1045^2.16^.053^.013^^0^0^.055