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

FHINI0IT.m

Go to the documentation of this file.
FHINI0IT	; ; 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,183,"X",2,0)
	;;=2) PLACE IN ROASTING PANS.
	;;^UTILITY(U,$J,114,183,"X",3,0)
	;;=3) POUR MARGARINE OVER POTATOES; COAT THOROUGHLY.
	;;^UTILITY(U,$J,114,183,"X",4,0)
	;;=4) SPRINKLE WITH SALT.
	;;^UTILITY(U,$J,114,183,"X",5,0)
	;;=5) BAKE UNTIL BROWNED AND TENDER. BASTE FREQUENTLY; TURN POTATOES
	;;^UTILITY(U,$J,114,183,"X",6,0)
	;;=   TWICE DURING COOKING PERIOD.
	;;^UTILITY(U,$J,114,184,0)
	;;=DIXIE BARBECUE ON BUN^100^4-OZ^3 HOUR^^9^4^Y^E-41^^S^^.089
	;;^UTILITY(U,$J,114,184,"E",0)
	;;=^114.05P^1^1
	;;^UTILITY(U,$J,114,184,"E",1,0)
	;;=25
	;;^UTILITY(U,$J,114,184,"I",0)
	;;=^114.01PA^15^15
	;;^UTILITY(U,$J,114,184,"I",1,0)
	;;=22^20^2167^20
	;;^UTILITY(U,$J,114,184,"I",2,0)
	;;=725^.25^1384^.25
	;;^UTILITY(U,$J,114,184,"I",3,0)
	;;=847^.25^2021
	;;^UTILITY(U,$J,114,184,"I",4,0)
	;;=297^2^372^2
	;;^UTILITY(U,$J,114,184,"I",5,0)
	;;=593^13^1950^13
	;;^UTILITY(U,$J,114,184,"I",6,0)
	;;=431^.25^1987^2.1165
	;;^UTILITY(U,$J,114,184,"I",7,0)
	;;=255^1.375^1905^1.375
	;;^UTILITY(U,$J,114,184,"I",8,0)
	;;=303^.01563
	;;^UTILITY(U,$J,114,184,"I",9,0)
	;;=391^.01953^6354
	;;^UTILITY(U,$J,114,184,"I",10,0)
	;;=382^.1875
	;;^UTILITY(U,$J,114,184,"I",11,0)
	;;=230^.21875^1598^.21875
	;;^UTILITY(U,$J,114,184,"I",12,0)
	;;=192^.0625^288^.0625
	;;^UTILITY(U,$J,114,184,"I",13,0)
	;;=134^.03125^1259
	;;^UTILITY(U,$J,114,184,"I",14,0)
	;;=416^7.25^1940^7.25
	;;^UTILITY(U,$J,114,184,"I",15,0)
	;;=803^100^1568
	;;^UTILITY(U,$J,114,184,"X",0)
	;;=^^9^9^2890724^
	;;^UTILITY(U,$J,114,184,"X",1,0)
	;;=1) OVEN BRAISE BEEF IN ROASTING PAN AT 350F FOR APPROXIMATELY 60 MINUTES.
	;;^UTILITY(U,$J,114,184,"X",2,0)
	;;=   PROCEED TO STEP 2.
	;;^UTILITY(U,$J,114,184,"X",3,0)
	;;=2) RECONSTITUTE ONIONS WITH COLD WATER; SAUTE IN MARGARINE IN STEAM JACKETED
	;;^UTILITY(U,$J,114,184,"X",4,0)
	;;=   KETTLE UNTIL CLEAR AND TENDER.
	;;^UTILITY(U,$J,114,184,"X",5,0)
	;;=3) COMBINE TOMATO PUREED - CHILI SAUCE, AND ADD REMAINING INGREDIENTS TO
	;;^UTILITY(U,$J,114,184,"X",6,0)
	;;=   ONIONS. SIMMER MIXTURE FOR 30 MINUTES, STIRRING OCCASIONALLY.
	;;^UTILITY(U,$J,114,184,"X",7,0)
	;;=4) DRAIN OFF EXCESS FAT FROM MEAT IN STEP 1. ADD MEAT TO SAUCE; MIX 
	;;^UTILITY(U,$J,114,184,"X",8,0)
	;;=   THOROUGHLY. SIMMER MIXTURE FOR 15 MINUTES.
	;;^UTILITY(U,$J,114,184,"X",9,0)
	;;=5) SERVE OVER 1/2 PORTION OF SPLIT HAMBURGER BUN. TOP WITH OTHER HALF OF BUN.
	;;^UTILITY(U,$J,114,185,0)
	;;=FRENCH ONION SOUP/CROUTONS^100^6-FLOZ^45 MIN^^10^10^Y^A-82^^S^^.025
	;;^UTILITY(U,$J,114,185,"E",0)
	;;=^114.05P^1^1
	;;^UTILITY(U,$J,114,185,"E",1,0)
	;;=5
	;;^UTILITY(U,$J,114,185,"I",0)
	;;=^114.01PA^9^8
	;;^UTILITY(U,$J,114,185,"I",1,0)
	;;=235^2.5
	;;^UTILITY(U,$J,114,185,"I",2,0)
	;;=847^5.5^2021
	;;^UTILITY(U,$J,114,185,"I",3,0)
	;;=725^.875^1384^.875
	;;^UTILITY(U,$J,114,185,"I",4,0)
	;;=391^.01367^6354
	;;^UTILITY(U,$J,114,185,"I",5,0)
	;;=230^.125^1598^.125
	;;^UTILITY(U,$J,114,185,"I",6,0)
	;;=297^.3125^372^.3125
	;;^UTILITY(U,$J,114,185,"I",7,0)
	;;=956^2
	;;^UTILITY(U,$J,114,185,"I",9,0)
	;;=69^1^32^1
	;;^UTILITY(U,$J,114,185,"X",0)
	;;=^^4^4^2890814^^^
	;;^UTILITY(U,$J,114,185,"X",1,0)
	;;=1) COMBINE BASE AND WATER TO FORM STOCK.
	;;^UTILITY(U,$J,114,185,"X",2,0)
	;;=2) ADD ONIONS, WORCESTERSHIRE SAUCE, SALT, AND FIRST MARGARINE ENTRY.
	;;^UTILITY(U,$J,114,185,"X",3,0)
	;;=   SIMMER 30 MINUTES.
	;;^UTILITY(U,$J,114,185,"X",4,0)
	;;=3) AS SOUP IS SERVED, ADD GRATED PARMESAN CHEESE AND CROUTONS TO EACH PORTION.
	;;^UTILITY(U,$J,114,186,0)
	;;=CORNBREAD^70^1-EACH^40 MIN^^2^12^Y^B-7^^S^^.018
	;;^UTILITY(U,$J,114,186,"E",0)
	;;=^114.05P^1^1
	;;^UTILITY(U,$J,114,186,"E",1,0)
	;;=8
	;;^UTILITY(U,$J,114,186,"I",0)
	;;=^114.01PA^9^9
	;;^UTILITY(U,$J,114,186,"I",1,0)
	;;=96^1.6875^2763^1.6875
	;;^UTILITY(U,$J,114,186,"I",2,0)
	;;=628^1.75^1998^1.75
	;;^UTILITY(U,$J,114,186,"I",3,0)
	;;=256^.5^1906^.5
	;;^UTILITY(U,$J,114,186,"I",4,0)
	;;=230^.0625^1598^.0625
	;;^UTILITY(U,$J,114,186,"I",5,0)
	;;=11^.125^680^.125
	;;^UTILITY(U,$J,114,186,"I",6,0)
	;;=157^.35938^138^.35938
	;;^UTILITY(U,$J,114,186,"I",7,0)
	;;=847^.25586^2021
	;;^UTILITY(U,$J,114,186,"I",8,0)
	;;=734^.67188^115^.571098
	;;^UTILITY(U,$J,114,186,"I",9,0)
	;;=286^.375^394^.375
	;;^UTILITY(U,$J,114,186,"X",0)
	;;=^^4^4^2890814^^
	;;^UTILITY(U,$J,114,186,"X",1,0)
	;;=1) SIFT TOGETHER ALL DRY INGREDIENTS.
	;;^UTILITY(U,$J,114,186,"X",2,0)
	;;=2) ADD REMAINING INGREDIENTS. MIX ONLY UNTIL DRY MIXTURE IS MOISTENED.
	;;^UTILITY(U,$J,114,186,"X",3,0)
	;;=3) SCALE INTO OILED PANS AND BAKE AT 425 DEGREES F FOR 25 MIN.
	;;^UTILITY(U,$J,114,186,"X",4,0)
	;;=4) PORTION INTO 70 CUTS PER 25" X 17" BAKING SHEET.