FHINI03F ; ; 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,1073,3)
;;=.091^.202^.255^.507^.164^.131^.157^.371^.223^.296^.298^.164^.238^.313^2.475^.265^.854^.367
;;^UTILITY(U,$J,112,1073,4)
;;=.004^.008^.077^3.121^.19^1.641^10.585^^^6.6
;;^UTILITY(U,$J,112,1073,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1074,0)
;;=CRACKERS, CHEESE^18-214^crackers^3.13^100^N
;;^UTILITY(U,$J,112,1074,1)
;;=10.1^25.3^58.2^503^3.1^^^151^4.77^36^218^145^995^1.13^.21^.629^^162^0^.57
;;^UTILITY(U,$J,112,1074,2)
;;=.428^4.671^.526^.553^25^.46^4.465^.379^13^9.379^9.001^4.844^30^3.3^^^2.4
;;^UTILITY(U,$J,112,1074,3)
;;=.129^.295^.424^.744^.418^.194^.168^.49^.34^.478^.386^.245^.304^.48^3.034^.302^1.11^.521
;;^UTILITY(U,$J,112,1074,4)
;;=.163^.148^.966^4.959^.275^2.632^8.726^^^8.6
;;^UTILITY(U,$J,112,1074,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1075,0)
;;=CRACKERS, GRAHAM, CHOC COATED^18-174^crackers^13^100^N
;;^UTILITY(U,$J,112,1075,1)
;;=5.8^23.2^66.5^484^2.6^^^58^3.58^58^134^209^291^.97^.43^.726^^9^0^.144
;;^UTILITY(U,$J,112,1075,2)
;;=.212^2.176^.213^.079^10^0^1.505^.041^0^10.77^9.198^1.545^5^1.8
;;^UTILITY(U,$J,112,1075,3)
;;=.073^.198^.25^.46^.226^.11^.087^.301^.213^.302^.211^.112^.196^.356^1.623^.184^.584^.279
;;^UTILITY(U,$J,112,1075,4)
;;=^^.016^4.833^.04^5.883^9.159^0
;;^UTILITY(U,$J,112,1075,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1076,0)
;;=CRACKERS, GRAHAM, PLAIN^18-173^crackers^7.1^100^N
;;^UTILITY(U,$J,112,1076,1)
;;=6.9^10.1^76.8^423^4.4^^^24^3.73^30^104^135^605^.81^.202^.804^^0^0^.222
;;^UTILITY(U,$J,112,1076,2)
;;=.314^4.122^.537^.065^17^0^1.467^.068^0^2.522^5.012^1.535^0^1.8^^^2.7
;;^UTILITY(U,$J,112,1076,3)
;;=.091^.191^.243^.475^.162^.119^.15^.345^.208^.287^.292^.155^.227^.308^2.301^.256^.784^.341
;;^UTILITY(U,$J,112,1076,4)
;;=.006^.006^.046^1.492^.086^.944^4.926^0^.5^10.2
;;^UTILITY(U,$J,112,1076,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1077,0)
;;=CRACKERS, GRAHAM, SUGAR-HONEY COATED^18-173^crackers^7.1^100^N
;;^UTILITY(U,$J,112,1077,1)
;;=6.9^10.1^76.8^423^4.4^^^24^3.73^30^104^135^605^.81^.202^.804^^0^0^.222
;;^UTILITY(U,$J,112,1077,2)
;;=.314^4.122^.537^.065^17^0^1.467^.068^0^2.522^5.012^1.535^0^1.8^^^2.7
;;^UTILITY(U,$J,112,1077,3)
;;=.091^.191^.243^.475^.162^.119^.15^.345^.208^.287^.292^.155^.227^.308^2.301^.256^.784^.341
;;^UTILITY(U,$J,112,1077,4)
;;=.006^.006^.046^1.492^.086^.944^4.926^0
;;^UTILITY(U,$J,112,1077,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1078,0)
;;=CRACKERS, SALTINES^18-228^crackers^2.84^100^N
;;^UTILITY(U,$J,112,1078,1)
;;=9.2^11.8^71.5^434^4.1^^^119^5.4^27^105^128^1302^.77^.199^.695^^0^0^.565
;;^UTILITY(U,$J,112,1078,2)
;;=.462^5.249^.456^.038^31^0^1.804^.045^0^2.106^6.476^1.849^0^3.3^^^2.7
;;^UTILITY(U,$J,112,1078,3)
;;=.122^.256^.334^.632^.258^.159^.198^.452^.274^.387^.366^.198^.292^.394^3.066^.324^1.046^.472
;;^UTILITY(U,$J,112,1078,4)
;;=^^0^1.204^.012^.837^6.465^^2^11.7
;;^UTILITY(U,$J,112,1078,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1079,0)
;;=CRACKERS, SANDWICH TYPE, PEANUT-CHEESE^18-215^crackers^7^100^N
;;^UTILITY(U,$J,112,1079,1)
;;=12.6^23.2^57^482^3.8^^^79^2.92^58^324^245^992^1.09^.234^.75^^319^0^.403
;;^UTILITY(U,$J,112,1079,2)
;;=.344^6.52^.51^1.492^25^.01^4.259^.113^5^5.147^12.114^4.405^35^3.3^^^1.1
;;^UTILITY(U,$J,112,1079,3)
;;=.142^.397^.467^.854^.442^.194^.212^.631^.444^.546^.951^.3^.458^1.017^3.373^.582^1.008^.636
;;^UTILITY(U,$J,112,1079,4)
;;=.008^.012^.122^2.92^.021^2.058^11.983^.033
;;^UTILITY(U,$J,112,1079,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1080,0)
;;=CRACKERS, SODA^918-0^crackers^2.84^100^N
;;^UTILITY(U,$J,112,1080,1)
;;=9.2^13.1^70.6^439^4^^^22^4.1^^89^120^1100^^^^^0^0^.49
;;^UTILITY(U,$J,112,1080,2)
;;=.36^4.5^^^^^3.13^^0^3.14^^^^3.1
;;^UTILITY(U,$J,112,1080,4)
;;=^^^^^^6.33
;;^UTILITY(U,$J,112,1080,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1081,0)
;;=CRACKERS, WHOLE-WHEAT^18-235^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1081,1)
;;=8.8^17.2^68.6^443^2.7^^^50^3.08^99^295^297^659^2.15^.444^2.247^^0^0^.201
;;^UTILITY(U,$J,112,1081,2)
;;=.1^4.519^.813^.183^28^0^2.631^.061^0^3.08^9.485^2.694^0^2.7^^^10.4
;;^UTILITY(U,$J,112,1081,3)
;;=.137^.256^.329^.6^.245^.137^.206^.419^.259^.401^.416^.206^.315^.456^2.804^.358^.922^.419
;;^UTILITY(U,$J,112,1081,4)
;;=^0^.002^1.763^.026^1.22^9.459^.002^^14.7
;;^UTILITY(U,$J,112,1081,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1083,0)
;;=CREAM PUFFS, W/CUSTARD FILLING^18-238^puffs^130^100^N
FHINI03F ; ; 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,1073,3)
+2 ;;=.091^.202^.255^.507^.164^.131^.157^.371^.223^.296^.298^.164^.238^.313^2.475^.265^.854^.367
+3 ;;^UTILITY(U,$J,112,1073,4)
+4 ;;=.004^.008^.077^3.121^.19^1.641^10.585^^^6.6
+5 ;;^UTILITY(U,$J,112,1073,20)
+6 ;;=USDA Std. Reference, Release 10
+7 ;;^UTILITY(U,$J,112,1074,0)
+8 ;;=CRACKERS, CHEESE^18-214^crackers^3.13^100^N
+9 ;;^UTILITY(U,$J,112,1074,1)
+10 ;;=10.1^25.3^58.2^503^3.1^^^151^4.77^36^218^145^995^1.13^.21^.629^^162^0^.57
+11 ;;^UTILITY(U,$J,112,1074,2)
+12 ;;=.428^4.671^.526^.553^25^.46^4.465^.379^13^9.379^9.001^4.844^30^3.3^^^2.4
+13 ;;^UTILITY(U,$J,112,1074,3)
+14 ;;=.129^.295^.424^.744^.418^.194^.168^.49^.34^.478^.386^.245^.304^.48^3.034^.302^1.11^.521
+15 ;;^UTILITY(U,$J,112,1074,4)
+16 ;;=.163^.148^.966^4.959^.275^2.632^8.726^^^8.6
+17 ;;^UTILITY(U,$J,112,1074,20)
+18 ;;=USDA Std. Reference, Release 10
+19 ;;^UTILITY(U,$J,112,1075,0)
+20 ;;=CRACKERS, GRAHAM, CHOC COATED^18-174^crackers^13^100^N
+21 ;;^UTILITY(U,$J,112,1075,1)
+22 ;;=5.8^23.2^66.5^484^2.6^^^58^3.58^58^134^209^291^.97^.43^.726^^9^0^.144
+23 ;;^UTILITY(U,$J,112,1075,2)
+24 ;;=.212^2.176^.213^.079^10^0^1.505^.041^0^10.77^9.198^1.545^5^1.8
+25 ;;^UTILITY(U,$J,112,1075,3)
+26 ;;=.073^.198^.25^.46^.226^.11^.087^.301^.213^.302^.211^.112^.196^.356^1.623^.184^.584^.279
+27 ;;^UTILITY(U,$J,112,1075,4)
+28 ;;=^^.016^4.833^.04^5.883^9.159^0
+29 ;;^UTILITY(U,$J,112,1075,20)
+30 ;;=USDA Std. Reference, Release 10
+31 ;;^UTILITY(U,$J,112,1076,0)
+32 ;;=CRACKERS, GRAHAM, PLAIN^18-173^crackers^7.1^100^N
+33 ;;^UTILITY(U,$J,112,1076,1)
+34 ;;=6.9^10.1^76.8^423^4.4^^^24^3.73^30^104^135^605^.81^.202^.804^^0^0^.222
+35 ;;^UTILITY(U,$J,112,1076,2)
+36 ;;=.314^4.122^.537^.065^17^0^1.467^.068^0^2.522^5.012^1.535^0^1.8^^^2.7
+37 ;;^UTILITY(U,$J,112,1076,3)
+38 ;;=.091^.191^.243^.475^.162^.119^.15^.345^.208^.287^.292^.155^.227^.308^2.301^.256^.784^.341
+39 ;;^UTILITY(U,$J,112,1076,4)
+40 ;;=.006^.006^.046^1.492^.086^.944^4.926^0^.5^10.2
+41 ;;^UTILITY(U,$J,112,1076,20)
+42 ;;=USDA Std. Reference, Release 10
+43 ;;^UTILITY(U,$J,112,1077,0)
+44 ;;=CRACKERS, GRAHAM, SUGAR-HONEY COATED^18-173^crackers^7.1^100^N
+45 ;;^UTILITY(U,$J,112,1077,1)
+46 ;;=6.9^10.1^76.8^423^4.4^^^24^3.73^30^104^135^605^.81^.202^.804^^0^0^.222
+47 ;;^UTILITY(U,$J,112,1077,2)
+48 ;;=.314^4.122^.537^.065^17^0^1.467^.068^0^2.522^5.012^1.535^0^1.8^^^2.7
+49 ;;^UTILITY(U,$J,112,1077,3)
+50 ;;=.091^.191^.243^.475^.162^.119^.15^.345^.208^.287^.292^.155^.227^.308^2.301^.256^.784^.341
+51 ;;^UTILITY(U,$J,112,1077,4)
+52 ;;=.006^.006^.046^1.492^.086^.944^4.926^0
+53 ;;^UTILITY(U,$J,112,1077,20)
+54 ;;=USDA Std. Reference, Release 10
+55 ;;^UTILITY(U,$J,112,1078,0)
+56 ;;=CRACKERS, SALTINES^18-228^crackers^2.84^100^N
+57 ;;^UTILITY(U,$J,112,1078,1)
+58 ;;=9.2^11.8^71.5^434^4.1^^^119^5.4^27^105^128^1302^.77^.199^.695^^0^0^.565
+59 ;;^UTILITY(U,$J,112,1078,2)
+60 ;;=.462^5.249^.456^.038^31^0^1.804^.045^0^2.106^6.476^1.849^0^3.3^^^2.7
+61 ;;^UTILITY(U,$J,112,1078,3)
+62 ;;=.122^.256^.334^.632^.258^.159^.198^.452^.274^.387^.366^.198^.292^.394^3.066^.324^1.046^.472
+63 ;;^UTILITY(U,$J,112,1078,4)
+64 ;;=^^0^1.204^.012^.837^6.465^^2^11.7
+65 ;;^UTILITY(U,$J,112,1078,20)
+66 ;;=USDA Std. Reference, Release 10
+67 ;;^UTILITY(U,$J,112,1079,0)
+68 ;;=CRACKERS, SANDWICH TYPE, PEANUT-CHEESE^18-215^crackers^7^100^N
+69 ;;^UTILITY(U,$J,112,1079,1)
+70 ;;=12.6^23.2^57^482^3.8^^^79^2.92^58^324^245^992^1.09^.234^.75^^319^0^.403
+71 ;;^UTILITY(U,$J,112,1079,2)
+72 ;;=.344^6.52^.51^1.492^25^.01^4.259^.113^5^5.147^12.114^4.405^35^3.3^^^1.1
+73 ;;^UTILITY(U,$J,112,1079,3)
+74 ;;=.142^.397^.467^.854^.442^.194^.212^.631^.444^.546^.951^.3^.458^1.017^3.373^.582^1.008^.636
+75 ;;^UTILITY(U,$J,112,1079,4)
+76 ;;=.008^.012^.122^2.92^.021^2.058^11.983^.033
+77 ;;^UTILITY(U,$J,112,1079,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,1080,0)
+80 ;;=CRACKERS, SODA^918-0^crackers^2.84^100^N
+81 ;;^UTILITY(U,$J,112,1080,1)
+82 ;;=9.2^13.1^70.6^439^4^^^22^4.1^^89^120^1100^^^^^0^0^.49
+83 ;;^UTILITY(U,$J,112,1080,2)
+84 ;;=.36^4.5^^^^^3.13^^0^3.14^^^^3.1
+85 ;;^UTILITY(U,$J,112,1080,4)
+86 ;;=^^^^^^6.33
+87 ;;^UTILITY(U,$J,112,1080,20)
+88 ;;=USDA Std. Reference, Release 8
+89 ;;^UTILITY(U,$J,112,1081,0)
+90 ;;=CRACKERS, WHOLE-WHEAT^18-235^oz.^28.3^100^N
+91 ;;^UTILITY(U,$J,112,1081,1)
+92 ;;=8.8^17.2^68.6^443^2.7^^^50^3.08^99^295^297^659^2.15^.444^2.247^^0^0^.201
+93 ;;^UTILITY(U,$J,112,1081,2)
+94 ;;=.1^4.519^.813^.183^28^0^2.631^.061^0^3.08^9.485^2.694^0^2.7^^^10.4
+95 ;;^UTILITY(U,$J,112,1081,3)
+96 ;;=.137^.256^.329^.6^.245^.137^.206^.419^.259^.401^.416^.206^.315^.456^2.804^.358^.922^.419
+97 ;;^UTILITY(U,$J,112,1081,4)
+98 ;;=^0^.002^1.763^.026^1.22^9.459^.002^^14.7
+99 ;;^UTILITY(U,$J,112,1081,20)
+100 ;;=USDA Std. Reference, Release 10
+101 ;;^UTILITY(U,$J,112,1083,0)
+102 ;;=CREAM PUFFS, W/CUSTARD FILLING^18-238^puffs^130^100^N
