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

FHINI04O.m

Go to the documentation of this file.
FHINI04O	; ; 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,1567,0)
	;;=ROLLS AND BUNS, READY TO SERVE, PLAIN PAN ROLLS, ENR^18-342^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1567,1)
	;;=8.4^7.3^50.4^300^31.9^^^119^3.13^23^116^133^521^.77^.152^.466^^0^.1^.493
	;;^UTILITY(U,$J,112,1567,2)
	;;=.319^4.034^.505^.054^30^.03^1.159^.059^1^1.751^3.717^1.218^0^2^^^3
	;;^UTILITY(U,$J,112,1567,3)
	;;=.099^.251^.338^.604^.236^.152^.177^.416^.251^.379^.31^.184^.286^.401^2.744^.294^.927^.412
	;;^UTILITY(U,$J,112,1567,4)
	;;=0^.001^.033^.952^.015^.764^3.702^^^27.2
	;;^UTILITY(U,$J,112,1567,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1568,0)
	;;=ROLLS AND BUNS, READY TO EAT, RAISIN ROLLS OR BUNS^18-356^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1568,1)
	;;=6.2^16.4^50.9^372^24.8^^^72^1.6^17^76^111^383^.59^.088^.3^^215^2^.324
	;;^UTILITY(U,$J,112,1568,2)
	;;=.265^2.384^.338^.107^24^.12^1.991^.102^66^4.209^9.103^2.111^64^1.7^^^1.3
	;;^UTILITY(U,$J,112,1568,3)
	;;=.074^.211^.259^.458^.243^.117^.12^.3^.2^.291^.283^.145^.233^.407^1.732^.219^.582^.331
	;;^UTILITY(U,$J,112,1568,4)
	;;=.001^.001^.081^2.227^.035^1.896^9.065^.014^^17
	;;^UTILITY(U,$J,112,1568,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1569,0)
	;;=ROLLS AND BUNS, READY TO SERVE, SWEET ROLLS^18-356^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1569,1)
	;;=6.2^16.4^50.9^372^24.8^^^72^1.6^17^76^111^383^.59^.088^.3^^215^2^.324
	;;^UTILITY(U,$J,112,1569,2)
	;;=.265^2.384^.338^.107^24^.12^1.991^.102^66^4.209^9.103^2.111^64^1.7^^^1.3
	;;^UTILITY(U,$J,112,1569,3)
	;;=.074^.211^.259^.458^.243^.117^.12^.3^.2^.291^.283^.145^.233^.407^1.732^.219^.582^.331
	;;^UTILITY(U,$J,112,1569,4)
	;;=.001^.001^.081^2.227^.035^1.896^9.065^.014
	;;^UTILITY(U,$J,112,1569,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1570,0)
	;;=ROLLS AND BUNS, READY TO SERVE, WHOLE WHEAT ROLLS^18-348^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1570,1)
	;;=8.7^4.7^51.1^266^33.1^^^106^2.42^85^224^272^478^2.01^.239^2.298^^0^0^.248
	;;^UTILITY(U,$J,112,1570,2)
	;;=.152^3.677^.489^.195^30^0^2.038^.121^0^.836^1.199^2.161^0^2.3
	;;^UTILITY(U,$J,112,1570,3)
	;;=.134^.26^.333^.601^.266^.138^.196^.412^.262^.403^.407^.204^.314^.463^2.692^.347^.893^.414
	;;^UTILITY(U,$J,112,1570,4)
	;;=0^.001^.013^.661^.026^.141^1.173^.001
	;;^UTILITY(U,$J,112,1570,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1571,0)
	;;=ROLLS AND BUNS, BROWN&SER, ENR, BROWNED^18-342^rolls^26^100^N
	;;^UTILITY(U,$J,112,1571,1)
	;;=8.4^7.3^50.4^300^31.9^^^119^3.13^23^116^133^521^.77^.152^.466^^0^.1^.493
	;;^UTILITY(U,$J,112,1571,2)
	;;=.319^4.034^.505^.054^30^.03^1.159^.059^1^1.751^3.717^1.218^0^2^^^3
	;;^UTILITY(U,$J,112,1571,3)
	;;=.099^.251^.338^.604^.236^.152^.177^.416^.251^.379^.31^.184^.286^.401^2.744^.294^.927^.412
	;;^UTILITY(U,$J,112,1571,4)
	;;=0^.001^.033^.952^.015^.764^3.702
	;;^UTILITY(U,$J,112,1571,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1572,0)
	;;=ROLLS, BAKED FROM DOUGH, ENR^1912-0^rolls^24^100^N
	;;^UTILITY(U,$J,112,1572,1)
	;;=8.5^5.4^56^311^28.3^^^39^3^^88^96^560^^^^^0^0^.378
	;;^UTILITY(U,$J,112,1572,2)
	;;=.306^3.36^^^^^1.3^^5^1.5^^^^1.8
	;;^UTILITY(U,$J,112,1572,4)
	;;=^^^^^^2.1
	;;^UTILITY(U,$J,112,1572,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1573,0)
	;;=ROLLS, BAKED FROM MIX, MADE W/WTR AND ENR FLOUR^1916-1^rolls^35^100^N
	;;^UTILITY(U,$J,112,1573,1)
	;;=9^4.5^54.5^299^30.6^^^56^2.9^^97^123^313^^^^^0^0^.35
	;;^UTILITY(U,$J,112,1573,2)
	;;=.33^3.3^^^^^1.08^^4^1.07^^^^1.4
	;;^UTILITY(U,$J,112,1573,4)
	;;=^^^^^^2.13
	;;^UTILITY(U,$J,112,1573,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1574,0)
	;;=RUSK, (HARD CRISP BREAD OR TOAST)^18-224^rusks^9^100^N
	;;^UTILITY(U,$J,112,1574,1)
	;;=13.5^7.2^72.3^407^5.5^^^27^2.72^36^153^245^253^1.1^.245^.439^^46^0^.404
	;;^UTILITY(U,$J,112,1574,2)
	;;=.399^4.625^.406^.038^64^.07^1^.025^31^1.538^3.659^1.061^14^1.2
	;;^UTILITY(U,$J,112,1574,3)
	;;=.171^.512^.61^1.01^.684^.29^.272^.668^.471^.684^.649^.309^.606^.944^3.192^.498^1.052^.768
	;;^UTILITY(U,$J,112,1574,4)
	;;=.001^.001^.007^.972^.083^.529^3.569^.028
	;;^UTILITY(U,$J,112,1574,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1575,0)
	;;=RUTABAGAS, RAW^11-435^cups^140^85^N
	;;^UTILITY(U,$J,112,1575,1)
	;;=1.2^.2^8.13^36^89.66^^^47^.52^23^58^337^20^.34^.04^.17^^580^25^.09
	;;^UTILITY(U,$J,112,1575,2)
	;;=.04^.7^.16^.1^21^0^.035^.053^0^.027^.025^.088^58^.81^^^2.5
	;;^UTILITY(U,$J,112,1575,3)
	;;=.013^.046^.05^.038^.039^.01^.011^.031^.023^.048^.148^.03^.033^.087^.142^.027^^.035
	;;^UTILITY(U,$J,112,1575,4)
	;;=^^^.024^^.003^.025
	;;^UTILITY(U,$J,112,1575,20)
	;;=USDA Std. Reference, Release 10