Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: FHINI034

FHINI034.m

Go to the documentation of this file.
  1. FHINI034 ; ; 11-OCT-1995
  1. ;;5.0;Dietetics;;Oct 11, 1995
  1. 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
  1. Q Q
  1. ;;^UTILITY(U,$J,112,963,2)
  1. ;;=0^0^.001^0^0^0^^^0^^^^0^.4^^^0
  1. ;;^UTILITY(U,$J,112,963,4)
  1. ;;=^^^^^^0
  1. ;;^UTILITY(U,$J,112,963,20)
  1. ;;=USDA Std. Reference, Release 10
  1. ;;^UTILITY(U,$J,112,964,0)
  1. ;;=CHICKEN A LA KING, HOME RECIPE^748-0^cups^245^100^N
  1. ;;^UTILITY(U,$J,112,964,1)
  1. ;;=11.2^14^5^191^68.2^^^52^1^^146^165^310^^^^^460^5^.04
  1. ;;^UTILITY(U,$J,112,964,2)
  1. ;;=.17^2.2^^^^^1.36^^76^5.19^^^^1.6
  1. ;;^UTILITY(U,$J,112,964,4)
  1. ;;=^^^^^^5.84
  1. ;;^UTILITY(U,$J,112,964,20)
  1. ;;=USDA Std. Reference, Release 8
  1. ;;^UTILITY(U,$J,112,965,0)
  1. ;;=CHICKEN FRICASSEE, HOME RECIPE^749-0^cups^240^100^N
  1. ;;^UTILITY(U,$J,112,965,1)
  1. ;;=15.3^9.3^3.2^161^71.3^^^6^.9^^113^140^154^^^^^70^0^.02
  1. ;;^UTILITY(U,$J,112,965,2)
  1. ;;=.07^2.4^^^^^1.86^^40^2.98^^^^.9
  1. ;;^UTILITY(U,$J,112,965,4)
  1. ;;=^^^^^^3.53
  1. ;;^UTILITY(U,$J,112,965,20)
  1. ;;=USDA Std. Reference, Release 8
  1. ;;^UTILITY(U,$J,112,966,0)
  1. ;;=CHICKEN POTPIE, HOME RECIPE, BAKED^750-0^pieces^232^100^N
  1. ;;^UTILITY(U,$J,112,966,1)
  1. ;;=10.1^13.5^18.3^235^56.6^^^30^1.3^^100^148^256^^^^^1330^2^.14
  1. ;;^UTILITY(U,$J,112,966,2)
  1. ;;=.14^2.1^^^^^2.21^^31^4.71^^^^1.5
  1. ;;^UTILITY(U,$J,112,966,4)
  1. ;;=^^^^^^5.63
  1. ;;^UTILITY(U,$J,112,966,20)
  1. ;;=USDA Std. Reference, Release 8
  1. ;;^UTILITY(U,$J,112,967,0)
  1. ;;=CHICKEN POTPIE, FRZ, COMMERCIAL, UNHEATED^751-0^oz.^28.3^100^N
  1. ;;^UTILITY(U,$J,112,967,1)
  1. ;;=6.7^11.5^22.2^219^57.8^^^11^1^^50^153^411^^^^^910^4^.1
  1. ;;^UTILITY(U,$J,112,967,2)
  1. ;;=.14^1.4^^^^^1^^13^3^^^^1.8
  1. ;;^UTILITY(U,$J,112,967,4)
  1. ;;=^^^^^^6
  1. ;;^UTILITY(U,$J,112,967,20)
  1. ;;=USDA Std. Reference, Release 8
  1. ;;^UTILITY(U,$J,112,968,0)
  1. ;;=CHICKEN AND NOODLES, HOME RECIPE^752-0^cups^240^100^N
  1. ;;^UTILITY(U,$J,112,968,1)
  1. ;;=9.3^7.7^10.7^153^71.1^^^11^.9^^103^62^250^^^^^180^0^.02
  1. ;;^UTILITY(U,$J,112,968,2)
  1. ;;=.07^1.8^^^^^1.47^^40^2.46^^^^1.2
  1. ;;^UTILITY(U,$J,112,968,4)
  1. ;;=^^^^^^2.96
  1. ;;^UTILITY(U,$J,112,968,20)
  1. ;;=USDA Std. Reference, Release 8
  1. ;;^UTILITY(U,$J,112,969,0)
  1. ;;=GARBANZOS, DRY, RAW^16-056^cups^200^100^N
  1. ;;^UTILITY(U,$J,112,969,1)
  1. ;;=19.3^6.04^60.66^364^11.53^^^105^6.24^115^366^875^24^3.43^.847^2.204^^67^4^.477
  1. ;;^UTILITY(U,$J,112,969,2)
  1. ;;=.212^1.541^1.588^.535^556.6^0^2.593^.101^0^.626^1.358^2.694^7^2.48^^^11.8
  1. ;;^UTILITY(U,$J,112,969,3)
  1. ;;=.185^.716^.828^1.374^1.291^.253^.259^1.034^.479^.809^1.819^.531^.828^2.27^3.375^.803^.797^.973
  1. ;;^UTILITY(U,$J,112,969,4)
  1. ;;=^^.009^.501^.012^.085^1.346^^264
  1. ;;^UTILITY(U,$J,112,969,20)
  1. ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
  1. ;;^UTILITY(U,$J,112,970,0)
  1. ;;=CHICORY, GREENS, RAW^11-152^cups^180^82^N
  1. ;;^UTILITY(U,$J,112,970,1)
  1. ;;=1.7^.3^4.7^23^92^^^100^.9^30^47^420^45^.42^.295^.429^^4000^24^.06
  1. ;;^UTILITY(U,$J,112,970,2)
  1. ;;=.1^.5^1.159^.105^109.5^0^.112^.019^0^.073^.006^.131^400^1.3^^^1.3
  1. ;;^UTILITY(U,$J,112,970,3)
  1. ;;=.031^.047^.101^.074^.067^.01^^.041^^.077^.124^.029
  1. ;;^UTILITY(U,$J,112,970,4)
  1. ;;=^^.004^.062^^.003^.006
  1. ;;^UTILITY(U,$J,112,970,20)
  1. ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
  1. ;;^UTILITY(U,$J,112,971,0)
  1. ;;=CHILI CON CARNE, CND, W/BEANS^16-059^oz.^28.3^100^N
  1. ;;^UTILITY(U,$J,112,971,1)
  1. ;;=5.71^5.49^11.91^112^75.51^^^47^3.43^45^154^365^522^2^.117^.134^^337^1.7^.048
  1. ;;^UTILITY(U,$J,112,971,2)
  1. ;;=.105^.358^1.42^.132^22.7^0^.208^.153^17^2.352^2.332^.362^34^1.38^^^4.4
  1. ;;^UTILITY(U,$J,112,971,3)
  1. ;;=.069^.24^.25^.456^.409^.095^.061^.292^.164^.294^.36^.164^.265^.659^.877^.261^.251^.293
  1. ;;^UTILITY(U,$J,112,971,4)
  1. ;;=.02^.013^.142^1.678^.082^.493^2.25
  1. ;;^UTILITY(U,$J,112,971,20)
  1. ;;=USDA Std. Reference, Release 10
  1. ;;^UTILITY(U,$J,112,972,0)
  1. ;;=CHILI CON CARNE, CND, WO/BEANS^757-0^oz.^28.3^100^N
  1. ;;^UTILITY(U,$J,112,972,1)
  1. ;;=10.3^14.8^5.8^200^66.9^^^38^1.4^^152^233^531^^^^^150^0^.02
  1. ;;^UTILITY(U,$J,112,972,2)
  1. ;;=.12^2.2^^^^^0^^26^7^^^^2.2
  1. ;;^UTILITY(U,$J,112,972,4)
  1. ;;=^^^^^^7
  1. ;;^UTILITY(U,$J,112,972,20)
  1. ;;=USDA Std. Reference, Release 8
  1. ;;^UTILITY(U,$J,112,973,0)
  1. ;;=CHIVES, RAW^11-156^tbsp.^3^100^N
  1. ;;^UTILITY(U,$J,112,973,1)
  1. ;;=3.27^.73^4.35^30^90.65^^^92^1.6^42^58^296^3^.56^.157^.373^^4353^58.1^.078
  1. ;;^UTILITY(U,$J,112,973,2)
  1. ;;=.115^.647^.324^.138^105^0^.252^.015^0^.146^.095^.267^435^1^^^2.5
  1. ;;^UTILITY(U,$J,112,973,3)
  1. ;;=.037^.128^.139^.195^.163^.036^^.105^.095^.145^.237^.057^.148^.303^.677^.162^.216^.148
  1. ;;^UTILITY(U,$J,112,973,4)
  1. ;;=^^.034^.103^^.009^.095^^190
  1. ;;^UTILITY(U,$J,112,973,20)
  1. ;;=USDA Std. Reference, Release 10
  1. ;;^UTILITY(U,$J,112,974,0)
  1. ;;=CHOCOLATE, BITTER OR BAKING^19-078^oz.^28.3^100^N
  1. ;;^UTILITY(U,$J,112,974,1)
  1. ;;=10.3^55.3^28.3^522^1.3^^^74^6.32^310^417^833^14^4.01^2.168^1.918^^98^0^.08