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

FHINI0J7.m

Go to the documentation of this file.
FHINI0J7	; ; 11-OCT-1995
	;;5.0;Dietetics;;Oct 11, 1995
	Q:'DIFQR(114)  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,114,248,"I",1,0)
	;;=628^10.9375^1998^10.9375
	;;^UTILITY(U,$J,114,248,"I",2,0)
	;;=256^2.29688^1906^2.29688
	;;^UTILITY(U,$J,114,248,"I",3,0)
	;;=11^.45313^680^.45313
	;;^UTILITY(U,$J,114,248,"I",4,0)
	;;=230^.1875^1598^.1875
	;;^UTILITY(U,$J,114,248,"I",5,0)
	;;=157^1.3125^138^1.3125
	;;^UTILITY(U,$J,114,248,"I",6,0)
	;;=734^3.28125^115^2.7890625
	;;^UTILITY(U,$J,114,248,"I",7,0)
	;;=847^1.42188^2021
	;;^UTILITY(U,$J,114,248,"I",8,0)
	;;=377^.25^2873^1.9225
	;;^UTILITY(U,$J,114,248,"X",0)
	;;=^^6^6^2890801^^
	;;^UTILITY(U,$J,114,248,"X",1,0)
	;;=1) COMBINE AND SIFT ALL DRY INGREDIENTS.
	;;^UTILITY(U,$J,114,248,"X",2,0)
	;;=2) BEAT EGGS UNTIL LIGHT AND LEMON COLORED.
	;;^UTILITY(U,$J,114,248,"X",3,0)
	;;=3) ADD WATER AND OIL TO BEATEN EGGS; THEN ADD DRY INGREDIENTS ALL AT ONCE.
	;;^UTILITY(U,$J,114,248,"X",4,0)
	;;=   MIX ON LOW SPEED UNTIL JUST BLENDED.
	;;^UTILITY(U,$J,114,248,"X",5,0)
	;;=4) PORTION WITH LADLE(2 OZ) ONTO GRILL. COOK AT 360 DEGREES
	;;^UTILITY(U,$J,114,248,"X",6,0)
	;;=   UNTIL LIGHTLY BROWNED.
	;;^UTILITY(U,$J,114,249,0)
	;;=SPOON BREAD^100^3.5-OZ^30 M^^^7^Y^P-59^^S^^.017
	;;^UTILITY(U,$J,114,249,"E",0)
	;;=^114.05P^1^1
	;;^UTILITY(U,$J,114,249,"E",1,0)
	;;=23
	;;^UTILITY(U,$J,114,249,"I",0)
	;;=^114.01PA^7^7
	;;^UTILITY(U,$J,114,249,"I",1,0)
	;;=157^1.60938^138^1.60938
	;;^UTILITY(U,$J,114,249,"I",2,0)
	;;=501^3.82813^1057^3.82813
	;;^UTILITY(U,$J,114,249,"I",3,0)
	;;=230^.15625^1598^.15625
	;;^UTILITY(U,$J,114,249,"I",4,0)
	;;=1006^1.53125^2021^12.80125
	;;^UTILITY(U,$J,114,249,"I",5,0)
	;;=788^20^6498
	;;^UTILITY(U,$J,114,249,"I",6,0)
	;;=297^.78125^372^.78125
	;;^UTILITY(U,$J,114,249,"I",7,0)
	;;=11^.09375^680^.09375
	;;^UTILITY(U,$J,114,249,"X",0)
	;;=^^5^5^2890725^
	;;^UTILITY(U,$J,114,249,"X",1,0)
	;;=1) RECONSTITUE MILK AND SCALD.
	;;^UTILITY(U,$J,114,249,"X",2,0)
	;;=2) COMBINE CORN MEAL AND SALT; STIR INTO SCALDED MILK.
	;;^UTILITY(U,$J,114,249,"X",3,0)
	;;=   COOK SLOWLY FOR 10 MINUTES. REMOVE FROM HEAT.
	;;^UTILITY(U,$J,114,249,"X",4,0)
	;;=3) ADD REMAINING INGREDIENTS ONE AT A TIME, BLENDING AFTER EACH ADDITION.
	;;^UTILITY(U,$J,114,249,"X",5,0)
	;;=4) PLACE MIXTURE INTO PANS. PLACE PANS IN HOT WATER AND BAKE.
	;;^UTILITY(U,$J,114,250,0)
	;;=LS HOT CAKE BATTER^25^4-FLOZ^25 MIN^^2^5^Y^E-8^^S^^.139
	;;^UTILITY(U,$J,114,250,"E",0)
	;;=^114.05P^2^2
	;;^UTILITY(U,$J,114,250,"E",1,0)
	;;=32
	;;^UTILITY(U,$J,114,250,"E",2,0)
	;;=2
	;;^UTILITY(U,$J,114,250,"I",0)
	;;=^114.01PA^6^6
	;;^UTILITY(U,$J,114,250,"I",1,0)
	;;=628^2.75^1998^2.75
	;;^UTILITY(U,$J,114,250,"I",2,0)
	;;=11^.10938^680^.10938
	;;^UTILITY(U,$J,114,250,"I",3,0)
	;;=986^.32813^6011^.32813
	;;^UTILITY(U,$J,114,250,"I",4,0)
	;;=734^.8125^115^.690625
	;;^UTILITY(U,$J,114,250,"I",5,0)
	;;=847^.35938^2021
	;;^UTILITY(U,$J,114,250,"I",6,0)
	;;=624^.40625^371^.40625
	;;^UTILITY(U,$J,114,250,"X",0)
	;;=^^5^5^2890801^^
	;;^UTILITY(U,$J,114,250,"X",1,0)
	;;=1) COMBINE ALL DRY INGREDIENTS AND SIFT.
	;;^UTILITY(U,$J,114,250,"X",2,0)
	;;=2) BEAT EGGS UNTIL LIGHT AND LEMON COLORED.
	;;^UTILITY(U,$J,114,250,"X",3,0)
	;;=3) ADD WATER AND MELTED MARGARINE TO BEATEN EGGS; THEN ADD DRY MIXTURE.
	;;^UTILITY(U,$J,114,250,"X",4,0)
	;;=   ALL AT ONCE. MIX ON LOW SPEED UNTIL JUST BLENDED.
	;;^UTILITY(U,$J,114,250,"X",5,0)
	;;=4) PORTION WITH LADLE(2 OZ) ONTO GRILL. COOK UNTIL LIGHTLY BROWNED.
	;;^UTILITY(U,$J,114,251,0)
	;;=SWEDISH MEAT BALLS^100^3-EACH^1HR 30 MIN^^^4^Y^E-69^^S^^.011
	;;^UTILITY(U,$J,114,251,"E",0)
	;;=^114.05P^1^1
	;;^UTILITY(U,$J,114,251,"E",1,0)
	;;=26
	;;^UTILITY(U,$J,114,251,"I",0)
	;;=^114.01PA^15^12
	;;^UTILITY(U,$J,114,251,"I",1,0)
	;;=22^12^2167^12
	;;^UTILITY(U,$J,114,251,"I",2,0)
	;;=879^8^199^5.28
	;;^UTILITY(U,$J,114,251,"I",3,0)
	;;=867^1.3125^827^1.3125
	;;^UTILITY(U,$J,114,251,"I",4,0)
	;;=157^.125^138^.125
	;;^UTILITY(U,$J,114,251,"I",5,0)
	;;=777^1^1378^.9
	;;^UTILITY(U,$J,114,251,"I",6,0)
	;;=230^.125^1598^.125
	;;^UTILITY(U,$J,114,251,"I",7,0)
	;;=192^.01563^288^.01563
	;;^UTILITY(U,$J,114,251,"I",8,0)
	;;=788^21^6498
	;;^UTILITY(U,$J,114,251,"I",9,0)
	;;=847^.09375^2021
	;;^UTILITY(U,$J,114,251,"I",10,0)
	;;=1008^.125
	;;^UTILITY(U,$J,114,251,"I",11,0)
	;;=628^.75^1998^.75
	;;^UTILITY(U,$J,114,251,"I",15,0)
	;;=1006^1.5^2021^12.54
	;;^UTILITY(U,$J,114,251,"X",0)
	;;=^^10^10^2890815^^^
	;;^UTILITY(U,$J,114,251,"X",1,0)
	;;=1) COMBINE MEATS, BREAD, NON-FAT DRIED MILK (FIRST LISTING), ONIONS,
	;;^UTILITY(U,$J,114,251,"X",2,0)
	;;=   SALT, PEPPER, EGGS, AND TAP WATER. MIX ONLY TO DISTRIBUTE. DO NOT OVERMIX.
	;;^UTILITY(U,$J,114,251,"X",3,0)
	;;=2) SHAPE WITH #30 SCOOP; PLACE ON BAKING SHEET. BROWN IN OVEN AT 325F,