FHINI075 ; ; 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,2498,4)
;;=.1^.81^.54^4.05^.46^2.62^8.54^.08
;;^UTILITY(U,$J,112,2498,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2499,0)
;;=FF, BISCUIT, WITH EGG AND STEAK^21-006^biscuits^148^100^N
;;^UTILITY(U,$J,112,2499,1)
;;=12.12^19.21^14.37^277^52.51^^^93^3.58^17^152^207^600^1.89^.072^.165^^476^.1^.24
;;^UTILITY(U,$J,112,2499,2)
;;=.35^2.07^.73^.12^19^.95^^^184^5.81^7.91^3.95^129^1.78
;;^UTILITY(U,$J,112,2499,3)
;;=.155^.505^.589^.965^.799^.311^.2^.56^.433^.662^.685^.339^.629^.999^2.148^.503^.705^.633
;;^UTILITY(U,$J,112,2499,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2500,0)
;;=FF, BISCUIT, WITH EGG, CHEESE, AND BACON^21-007^biscuits^144^100^N
;;^UTILITY(U,$J,112,2500,1)
;;=11.29^21.8^23.21^331^41.2^^^114^1.77^14^319^160^875^1.07^.052^.177^^450^1.1^.21
;;^UTILITY(U,$J,112,2500,2)
;;=.3^1.6^.82^.07^26^.73^2.236^.101^181^7.915^9.879^2.427^115^2.5
;;^UTILITY(U,$J,112,2500,3)
;;=.148^.43^.536^.894^.77^.281^.168^.544^.441^.637^.584^.321^.492^.837^2.09^.436^.815^.6
;;^UTILITY(U,$J,112,2500,4)
;;=.235^1.284^1.045^4.678^.474^.316^9.264^.091
;;^UTILITY(U,$J,112,2500,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2501,0)
;;=FF, BISCUIT, WITH HAM^21-008^biscuits^113^100^N
;;^UTILITY(U,$J,112,2501,1)
;;=11.85^16.3^38.75^342^28.4^^^142^2.41^20^490^174^1268^1.46^.032^.32^^118^.1^.45
;;^UTILITY(U,$J,112,2501,2)
;;=.28^3.08^.36^.12^7^.03^.808^.081^22^10.096^4.277^.918^30^4.7
;;^UTILITY(U,$J,112,2501,3)
;;=.147^.481^.513^.937^.818^.289^.196^.547^.4^.533^.68^.382^.604^.957^2.558^.549^.794^.533
;;^UTILITY(U,$J,112,2501,4)
;;=.346^2.997^1.28^2.357^.182^2.644^4.064^.029
;;^UTILITY(U,$J,112,2501,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2502,0)
;;=FF, BISCUIT, WITH SAUSAGE^21-009^biscuits^124^100^N
;;^UTILITY(U,$J,112,2502,1)
;;=9.77^25.63^32.29^391^29.3^^^103^2.08^16^360^160^864^1.25^.04^.29^^45^.1^.32
;;^UTILITY(U,$J,112,2502,2)
;;=.23^2.64^.29^.09^7^.41^2.188^.214^28^11.468^10.339^2.44^11^3^^^1.1
;;^UTILITY(U,$J,112,2502,3)
;;=.113^.345^.391^.724^.523^.21^.15^.431^.318^.443^.483^.26^.43^.638^2.398^.458^.846^.455
;;^UTILITY(U,$J,112,2502,4)
;;=.206^1.951^.901^4.477^.485^3.412^9.699^.038
;;^UTILITY(U,$J,112,2502,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2503,0)
;;=FF, BISCUIT, WITH STEAK^21-010^biscuits^141^100^N
;;^UTILITY(U,$J,112,2503,1)
;;=9.29^18.43^31.48^323^32.75^^^82^3.05^19^145^166^564^1.89^.084^.299^^46^.1^.25
;;^UTILITY(U,$J,112,2503,2)
;;=.28^2.95^.29^.11^8^.67^^^18^4.918^7.855^4.551^11^2.15
;;^UTILITY(U,$J,112,2503,3)
;;=.111^.351^.397^.713^.563^.211^.135^.407^.312^.438^.484^.272^.44^.667^2.07^.412^.697^.407
;;^UTILITY(U,$J,112,2503,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2504,0)
;;=FF, CROISSANT, WITH EGG AND CHEESE^21-011^croissants^127^100^N
;;^UTILITY(U,$J,112,2504,1)
;;=10.07^19.45^19.14^290^45.47^^^192^1.73^17^274^137^434^1.38^.072^.178^^788^.1^.15
;;^UTILITY(U,$J,112,2504,2)
;;=.3^1.19^.83^.08^29^.61^^^170^11.075^5.938^1.076^201^2.56
;;^UTILITY(U,$J,112,2504,3)
;;=.145^.375^.499^.846^.734^.262^.148^.522^.454^.601^.481^.311^.375^.704^2.065^.26^.841^.573
;;^UTILITY(U,$J,112,2504,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2505,0)
;;=FF, CROISSANT, WITH EGG, CHEESE, AND BACON^21-012^croissants^129^100^N
;;^UTILITY(U,$J,112,2505,1)
;;=12.58^21.98^18.33^320^43.92^^^117^1.7^18^214^156^689^1.47^.077^.172^^366^1.7^.27
;;^UTILITY(U,$J,112,2505,2)
;;=.26^1.7^.83^.09^27^.67^^^167^11.963^7.113^1.363^93^2.74
;;^UTILITY(U,$J,112,2505,3)
;;=.174^.47^.61^1.036^.919^.322^.179^.632^.544^.735^.62^.386^.497^.899^2.485^.39^1.01^.688
;;^UTILITY(U,$J,112,2505,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2506,0)
;;=FF, CROISSANT, WITH EGG, CHEESE, AND HAM^21-013^croissants^152^100^N
;;^UTILITY(U,$J,112,2506,1)
;;=12.45^22.09^15.92^312^51.14^^^95^1.4^17^221^179^711^1.43^.083^.145^^297^7.5^.34
;;^UTILITY(U,$J,112,2506,2)
;;=.2^2.1^.82^.15^24^.66^^^140^11.497^7.495^1.552^77^2.48
;;^UTILITY(U,$J,112,2506,3)
;;=.168^.505^.594^1.013^.904^.325^.202^.606^.481^.665^.685^.386^.59^1.003^2.349^.461^.811^.651
;;^UTILITY(U,$J,112,2506,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2507,0)
;;=FF, CROISSANT, WITH EGG, CHEESE, AND SAUSAGE^21-014^croissants^160^100^N
;;^UTILITY(U,$J,112,2507,1)
;;=12.69^23.85^15.45^327^45.87^^^90^1.9^15^181^177^697^1.34^.068^.158^^264^.1^.62
;;^UTILITY(U,$J,112,2507,2)
;;=.2^2.5^.82^.07^24^.56^^^135^11.391^8.908^1.881^68^2.27
FHINI075 ; ; 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,2498,4)
+2 ;;=.1^.81^.54^4.05^.46^2.62^8.54^.08
+3 ;;^UTILITY(U,$J,112,2498,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,2499,0)
+6 ;;=FF, BISCUIT, WITH EGG AND STEAK^21-006^biscuits^148^100^N
+7 ;;^UTILITY(U,$J,112,2499,1)
+8 ;;=12.12^19.21^14.37^277^52.51^^^93^3.58^17^152^207^600^1.89^.072^.165^^476^.1^.24
+9 ;;^UTILITY(U,$J,112,2499,2)
+10 ;;=.35^2.07^.73^.12^19^.95^^^184^5.81^7.91^3.95^129^1.78
+11 ;;^UTILITY(U,$J,112,2499,3)
+12 ;;=.155^.505^.589^.965^.799^.311^.2^.56^.433^.662^.685^.339^.629^.999^2.148^.503^.705^.633
+13 ;;^UTILITY(U,$J,112,2499,20)
+14 ;;=USDA Std. Reference, Release 10
+15 ;;^UTILITY(U,$J,112,2500,0)
+16 ;;=FF, BISCUIT, WITH EGG, CHEESE, AND BACON^21-007^biscuits^144^100^N
+17 ;;^UTILITY(U,$J,112,2500,1)
+18 ;;=11.29^21.8^23.21^331^41.2^^^114^1.77^14^319^160^875^1.07^.052^.177^^450^1.1^.21
+19 ;;^UTILITY(U,$J,112,2500,2)
+20 ;;=.3^1.6^.82^.07^26^.73^2.236^.101^181^7.915^9.879^2.427^115^2.5
+21 ;;^UTILITY(U,$J,112,2500,3)
+22 ;;=.148^.43^.536^.894^.77^.281^.168^.544^.441^.637^.584^.321^.492^.837^2.09^.436^.815^.6
+23 ;;^UTILITY(U,$J,112,2500,4)
+24 ;;=.235^1.284^1.045^4.678^.474^.316^9.264^.091
+25 ;;^UTILITY(U,$J,112,2500,20)
+26 ;;=USDA Std. Reference, Release 10
+27 ;;^UTILITY(U,$J,112,2501,0)
+28 ;;=FF, BISCUIT, WITH HAM^21-008^biscuits^113^100^N
+29 ;;^UTILITY(U,$J,112,2501,1)
+30 ;;=11.85^16.3^38.75^342^28.4^^^142^2.41^20^490^174^1268^1.46^.032^.32^^118^.1^.45
+31 ;;^UTILITY(U,$J,112,2501,2)
+32 ;;=.28^3.08^.36^.12^7^.03^.808^.081^22^10.096^4.277^.918^30^4.7
+33 ;;^UTILITY(U,$J,112,2501,3)
+34 ;;=.147^.481^.513^.937^.818^.289^.196^.547^.4^.533^.68^.382^.604^.957^2.558^.549^.794^.533
+35 ;;^UTILITY(U,$J,112,2501,4)
+36 ;;=.346^2.997^1.28^2.357^.182^2.644^4.064^.029
+37 ;;^UTILITY(U,$J,112,2501,20)
+38 ;;=USDA Std. Reference, Release 10
+39 ;;^UTILITY(U,$J,112,2502,0)
+40 ;;=FF, BISCUIT, WITH SAUSAGE^21-009^biscuits^124^100^N
+41 ;;^UTILITY(U,$J,112,2502,1)
+42 ;;=9.77^25.63^32.29^391^29.3^^^103^2.08^16^360^160^864^1.25^.04^.29^^45^.1^.32
+43 ;;^UTILITY(U,$J,112,2502,2)
+44 ;;=.23^2.64^.29^.09^7^.41^2.188^.214^28^11.468^10.339^2.44^11^3^^^1.1
+45 ;;^UTILITY(U,$J,112,2502,3)
+46 ;;=.113^.345^.391^.724^.523^.21^.15^.431^.318^.443^.483^.26^.43^.638^2.398^.458^.846^.455
+47 ;;^UTILITY(U,$J,112,2502,4)
+48 ;;=.206^1.951^.901^4.477^.485^3.412^9.699^.038
+49 ;;^UTILITY(U,$J,112,2502,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,2503,0)
+52 ;;=FF, BISCUIT, WITH STEAK^21-010^biscuits^141^100^N
+53 ;;^UTILITY(U,$J,112,2503,1)
+54 ;;=9.29^18.43^31.48^323^32.75^^^82^3.05^19^145^166^564^1.89^.084^.299^^46^.1^.25
+55 ;;^UTILITY(U,$J,112,2503,2)
+56 ;;=.28^2.95^.29^.11^8^.67^^^18^4.918^7.855^4.551^11^2.15
+57 ;;^UTILITY(U,$J,112,2503,3)
+58 ;;=.111^.351^.397^.713^.563^.211^.135^.407^.312^.438^.484^.272^.44^.667^2.07^.412^.697^.407
+59 ;;^UTILITY(U,$J,112,2503,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,2504,0)
+62 ;;=FF, CROISSANT, WITH EGG AND CHEESE^21-011^croissants^127^100^N
+63 ;;^UTILITY(U,$J,112,2504,1)
+64 ;;=10.07^19.45^19.14^290^45.47^^^192^1.73^17^274^137^434^1.38^.072^.178^^788^.1^.15
+65 ;;^UTILITY(U,$J,112,2504,2)
+66 ;;=.3^1.19^.83^.08^29^.61^^^170^11.075^5.938^1.076^201^2.56
+67 ;;^UTILITY(U,$J,112,2504,3)
+68 ;;=.145^.375^.499^.846^.734^.262^.148^.522^.454^.601^.481^.311^.375^.704^2.065^.26^.841^.573
+69 ;;^UTILITY(U,$J,112,2504,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,2505,0)
+72 ;;=FF, CROISSANT, WITH EGG, CHEESE, AND BACON^21-012^croissants^129^100^N
+73 ;;^UTILITY(U,$J,112,2505,1)
+74 ;;=12.58^21.98^18.33^320^43.92^^^117^1.7^18^214^156^689^1.47^.077^.172^^366^1.7^.27
+75 ;;^UTILITY(U,$J,112,2505,2)
+76 ;;=.26^1.7^.83^.09^27^.67^^^167^11.963^7.113^1.363^93^2.74
+77 ;;^UTILITY(U,$J,112,2505,3)
+78 ;;=.174^.47^.61^1.036^.919^.322^.179^.632^.544^.735^.62^.386^.497^.899^2.485^.39^1.01^.688
+79 ;;^UTILITY(U,$J,112,2505,20)
+80 ;;=USDA Std. Reference, Release 10
+81 ;;^UTILITY(U,$J,112,2506,0)
+82 ;;=FF, CROISSANT, WITH EGG, CHEESE, AND HAM^21-013^croissants^152^100^N
+83 ;;^UTILITY(U,$J,112,2506,1)
+84 ;;=12.45^22.09^15.92^312^51.14^^^95^1.4^17^221^179^711^1.43^.083^.145^^297^7.5^.34
+85 ;;^UTILITY(U,$J,112,2506,2)
+86 ;;=.2^2.1^.82^.15^24^.66^^^140^11.497^7.495^1.552^77^2.48
+87 ;;^UTILITY(U,$J,112,2506,3)
+88 ;;=.168^.505^.594^1.013^.904^.325^.202^.606^.481^.665^.685^.386^.59^1.003^2.349^.461^.811^.651
+89 ;;^UTILITY(U,$J,112,2506,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,2507,0)
+92 ;;=FF, CROISSANT, WITH EGG, CHEESE, AND SAUSAGE^21-014^croissants^160^100^N
+93 ;;^UTILITY(U,$J,112,2507,1)
+94 ;;=12.69^23.85^15.45^327^45.87^^^90^1.9^15^181^177^697^1.34^.068^.158^^264^.1^.62
+95 ;;^UTILITY(U,$J,112,2507,2)
+96 ;;=.2^2.5^.82^.07^24^.56^^^135^11.391^8.908^1.881^68^2.27