FHINI0J8 ; ; 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,251,"X",4,0)
;;= 30 MINUTES. POUR OFF DRIPPING AND RESERVE FOR GRAVY IN STEP 3.
;;^UTILITY(U,$J,114,251,"X",5,0)
;;=3) TO MAKE GRAVY: COMBINE MEAT DRIPPINGS, FLOUR, NON-FAT DRIED MILK
;;^UTILITY(U,$J,114,251,"X",6,0)
;;= (SECOND LISTING), SALT AND PEPPER AND BLEND INGREDIENTS.
;;^UTILITY(U,$J,114,251,"X",7,0)
;;= ADD TO HEATED FAT TO MAKE ROUX (BROWN LIGHTLY).
;;^UTILITY(U,$J,114,251,"X",8,0)
;;=4) ADD HOT WATER TO ROUX, STIRRING CONSTANTLY UNTIL SMOOTH. CONTINUE
;;^UTILITY(U,$J,114,251,"X",9,0)
;;= TO COOK UNTIL GRAVY IS THICKENED.
;;^UTILITY(U,$J,114,251,"X",10,0)
;;=5) ADD MEAT BALLS; MIX TO DISTRIBUTE AND HEAT THOROUGHLY.
;;^UTILITY(U,$J,114,252,0)
;;=STEAMED RICE WITH OIL^100^4-OZ^15 MIN^^12^7^Y^P-74^^S^^.042
;;^UTILITY(U,$J,114,252,"E",0)
;;=^114.05P^1^1
;;^UTILITY(U,$J,114,252,"E",1,0)
;;=6
;;^UTILITY(U,$J,114,252,"I",0)
;;=^114.01PA^4^4
;;^UTILITY(U,$J,114,252,"I",1,0)
;;=377^.28^2873^2.1532
;;^UTILITY(U,$J,114,252,"I",2,0)
;;=230^.21875^1598^.21875
;;^UTILITY(U,$J,114,252,"I",3,0)
;;=847^2^2021
;;^UTILITY(U,$J,114,252,"I",4,0)
;;=221^14.5^2932^14.5
;;^UTILITY(U,$J,114,252,"X",0)
;;=^^4^4^2890725^
;;^UTILITY(U,$J,114,252,"X",1,0)
;;=1) COMBINE OIL, SALT AND WATER IN KETTLE. BRING TO BOIL.
;;^UTILITY(U,$J,114,252,"X",2,0)
;;=2) SPRINKLE RICE SLOWLY INTO BOILING MIXTURE. BRING TO
;;^UTILITY(U,$J,114,252,"X",3,0)
;;= BOIL AND REDUCE HEAT TO SIMMER. COOK UNTIL TENDER, STIRRING
;;^UTILITY(U,$J,114,252,"X",4,0)
;;= AS NECESSARY.
;;^UTILITY(U,$J,114,253,0)
;;=FRIZZLED HAM^100^2.5-OZ^30 MIN^^1^5^N^E-12^^S
;;^UTILITY(U,$J,114,253,"E",0)
;;=^114.05P^1^1
;;^UTILITY(U,$J,114,253,"E",1,0)
;;=2
;;^UTILITY(U,$J,114,253,"I",0)
;;=^114.01PA^1^1
;;^UTILITY(U,$J,114,253,"I",1,0)
;;=802^16^221^16
;;^UTILITY(U,$J,114,253,"X",0)
;;=^^2^2^2890725^
;;^UTILITY(U,$J,114,253,"X",1,0)
;;=1) SHAVE HAM.
;;^UTILITY(U,$J,114,253,"X",2,0)
;;=2) GRILL SLICED HAM SLOWLY; TURN OCCAISIONALLY. DO NOT OVERCOOK.
;;^UTILITY(U,$J,114,254,0)
;;=LIMA BEANS WITH HAM^100^6-OZ LDL^2-1/2 HRS^^10^4^Y^E-160^^S^^.002
;;^UTILITY(U,$J,114,254,"E",0)
;;=^114.05P^1^1
;;^UTILITY(U,$J,114,254,"E",1,0)
;;=5
;;^UTILITY(U,$J,114,254,"I",0)
;;=^114.01PA^9^9
;;^UTILITY(U,$J,114,254,"I",1,0)
;;=569^12^697^12
;;^UTILITY(U,$J,114,254,"I",2,0)
;;=802^15.5625^221^15.5625
;;^UTILITY(U,$J,114,254,"I",3,0)
;;=403^.0625
;;^UTILITY(U,$J,114,254,"I",4,0)
;;=1005^1^2021^8.36
;;^UTILITY(U,$J,114,254,"I",5,0)
;;=776^.5^951^.5
;;^UTILITY(U,$J,114,254,"I",6,0)
;;=725^.125^1384^.125
;;^UTILITY(U,$J,114,254,"I",7,0)
;;=230^.125^1598^.125
;;^UTILITY(U,$J,114,254,"I",8,0)
;;=192^.03125^288^.03125
;;^UTILITY(U,$J,114,254,"I",9,0)
;;=847^1.875^2021
;;^UTILITY(U,$J,114,254,"X",0)
;;=^^8^8^2890815^^^^
;;^UTILITY(U,$J,114,254,"X",1,0)
;;=1) MEASURE BEANS INTO POT; COVER WITH COLD WATER AND SOAK
;;^UTILITY(U,$J,114,254,"X",2,0)
;;= OVERNIGHT.
;;^UTILITY(U,$J,114,254,"X",3,0)
;;=2) DRAIN BEANS NEXT MORNING AND PLACE INTO STEAM JACKETED KETTLE.
;;^UTILITY(U,$J,114,254,"X",4,0)
;;=3) CUBE HAM. COMBINE HAM, GREEN PEPPERS AND TAP WATER. ADD TO BEANS;
;;^UTILITY(U,$J,114,254,"X",5,0)
;;= SIMMER FOR 1 HOUR.
;;^UTILITY(U,$J,114,254,"X",6,0)
;;=4) COMBINE REMAINING INGREDIENTS AND ADD TO BEAN MIXTURE. CONTINUE TO
;;^UTILITY(U,$J,114,254,"X",7,0)
;;= SIMMER FOR 1 HOUR OR UNTIL LIMA BEANS ARE TENDER. ADD ADDITIONAL WATER
;;^UTILITY(U,$J,114,254,"X",8,0)
;;= IF NEEDED.
;;^UTILITY(U,$J,114,255,0)
;;=COLD PLATE-BOL/CHEZ/DEV.EGG^100^1-EACH^45 MIN^^^4^Y^E-198^^S
;;^UTILITY(U,$J,114,255,"E",0)
;;=^114.05P^1^1
;;^UTILITY(U,$J,114,255,"E",1,0)
;;=32
;;^UTILITY(U,$J,114,255,"I",0)
;;=^114.01PA^8^8
;;^UTILITY(U,$J,114,255,"I",1,0)
;;=788^50^6498
;;^UTILITY(U,$J,114,255,"I",2,0)
;;=153^.125^360^.97
;;^UTILITY(U,$J,114,255,"I",3,0)
;;=230^.03125^1598^.03125
;;^UTILITY(U,$J,114,255,"I",4,0)
;;=382^.01563
;;^UTILITY(U,$J,114,255,"I",5,0)
;;=431^.03125^1987^.2645625
;;^UTILITY(U,$J,114,255,"I",6,0)
;;=924^.03125^286^.03125
;;^UTILITY(U,$J,114,255,"I",7,0)
;;=759^6.25^627^6.25
;;^UTILITY(U,$J,114,255,"I",8,0)
;;=489^6.25^9^6.25
;;^UTILITY(U,$J,114,255,"X",0)
;;=^^10^10^2890725^^
;;^UTILITY(U,$J,114,255,"X",1,0)
;;=1) HARD BOIL EGGS. CUT EGGS IN HALF LENGTHWISE, REMOVE YOLKS AND MASH
;;^UTILITY(U,$J,114,255,"X",2,0)
;;= THOROUGHLY.
;;^UTILITY(U,$J,114,255,"X",3,0)
;;=2) COMBINE MAYONNAISE, SALT, MUSTARD, AND VINEGAR AND ADD TO MASHED YOLKS.
;;^UTILITY(U,$J,114,255,"X",4,0)
;;= BLEND THOROUGHLY.
;;^UTILITY(U,$J,114,255,"X",5,0)
;;=3) REFILL EGG WHITE HALVES WITH 1 1/2 TBSP. OF YOLK MIXTURE. SPRINKLE
FHINI0J8 ; ; 11-OCT-1995
+1 ;;5.0;Dietetics;;Oct 11, 1995
+2 IF 'DIFQR(114)
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,114,251,"X",4,0)
+2 ;;= 30 MINUTES. POUR OFF DRIPPING AND RESERVE FOR GRAVY IN STEP 3.
+3 ;;^UTILITY(U,$J,114,251,"X",5,0)
+4 ;;=3) TO MAKE GRAVY: COMBINE MEAT DRIPPINGS, FLOUR, NON-FAT DRIED MILK
+5 ;;^UTILITY(U,$J,114,251,"X",6,0)
+6 ;;= (SECOND LISTING), SALT AND PEPPER AND BLEND INGREDIENTS.
+7 ;;^UTILITY(U,$J,114,251,"X",7,0)
+8 ;;= ADD TO HEATED FAT TO MAKE ROUX (BROWN LIGHTLY).
+9 ;;^UTILITY(U,$J,114,251,"X",8,0)
+10 ;;=4) ADD HOT WATER TO ROUX, STIRRING CONSTANTLY UNTIL SMOOTH. CONTINUE
+11 ;;^UTILITY(U,$J,114,251,"X",9,0)
+12 ;;= TO COOK UNTIL GRAVY IS THICKENED.
+13 ;;^UTILITY(U,$J,114,251,"X",10,0)
+14 ;;=5) ADD MEAT BALLS; MIX TO DISTRIBUTE AND HEAT THOROUGHLY.
+15 ;;^UTILITY(U,$J,114,252,0)
+16 ;;=STEAMED RICE WITH OIL^100^4-OZ^15 MIN^^12^7^Y^P-74^^S^^.042
+17 ;;^UTILITY(U,$J,114,252,"E",0)
+18 ;;=^114.05P^1^1
+19 ;;^UTILITY(U,$J,114,252,"E",1,0)
+20 ;;=6
+21 ;;^UTILITY(U,$J,114,252,"I",0)
+22 ;;=^114.01PA^4^4
+23 ;;^UTILITY(U,$J,114,252,"I",1,0)
+24 ;;=377^.28^2873^2.1532
+25 ;;^UTILITY(U,$J,114,252,"I",2,0)
+26 ;;=230^.21875^1598^.21875
+27 ;;^UTILITY(U,$J,114,252,"I",3,0)
+28 ;;=847^2^2021
+29 ;;^UTILITY(U,$J,114,252,"I",4,0)
+30 ;;=221^14.5^2932^14.5
+31 ;;^UTILITY(U,$J,114,252,"X",0)
+32 ;;=^^4^4^2890725^
+33 ;;^UTILITY(U,$J,114,252,"X",1,0)
+34 ;;=1) COMBINE OIL, SALT AND WATER IN KETTLE. BRING TO BOIL.
+35 ;;^UTILITY(U,$J,114,252,"X",2,0)
+36 ;;=2) SPRINKLE RICE SLOWLY INTO BOILING MIXTURE. BRING TO
+37 ;;^UTILITY(U,$J,114,252,"X",3,0)
+38 ;;= BOIL AND REDUCE HEAT TO SIMMER. COOK UNTIL TENDER, STIRRING
+39 ;;^UTILITY(U,$J,114,252,"X",4,0)
+40 ;;= AS NECESSARY.
+41 ;;^UTILITY(U,$J,114,253,0)
+42 ;;=FRIZZLED HAM^100^2.5-OZ^30 MIN^^1^5^N^E-12^^S
+43 ;;^UTILITY(U,$J,114,253,"E",0)
+44 ;;=^114.05P^1^1
+45 ;;^UTILITY(U,$J,114,253,"E",1,0)
+46 ;;=2
+47 ;;^UTILITY(U,$J,114,253,"I",0)
+48 ;;=^114.01PA^1^1
+49 ;;^UTILITY(U,$J,114,253,"I",1,0)
+50 ;;=802^16^221^16
+51 ;;^UTILITY(U,$J,114,253,"X",0)
+52 ;;=^^2^2^2890725^
+53 ;;^UTILITY(U,$J,114,253,"X",1,0)
+54 ;;=1) SHAVE HAM.
+55 ;;^UTILITY(U,$J,114,253,"X",2,0)
+56 ;;=2) GRILL SLICED HAM SLOWLY; TURN OCCAISIONALLY. DO NOT OVERCOOK.
+57 ;;^UTILITY(U,$J,114,254,0)
+58 ;;=LIMA BEANS WITH HAM^100^6-OZ LDL^2-1/2 HRS^^10^4^Y^E-160^^S^^.002
+59 ;;^UTILITY(U,$J,114,254,"E",0)
+60 ;;=^114.05P^1^1
+61 ;;^UTILITY(U,$J,114,254,"E",1,0)
+62 ;;=5
+63 ;;^UTILITY(U,$J,114,254,"I",0)
+64 ;;=^114.01PA^9^9
+65 ;;^UTILITY(U,$J,114,254,"I",1,0)
+66 ;;=569^12^697^12
+67 ;;^UTILITY(U,$J,114,254,"I",2,0)
+68 ;;=802^15.5625^221^15.5625
+69 ;;^UTILITY(U,$J,114,254,"I",3,0)
+70 ;;=403^.0625
+71 ;;^UTILITY(U,$J,114,254,"I",4,0)
+72 ;;=1005^1^2021^8.36
+73 ;;^UTILITY(U,$J,114,254,"I",5,0)
+74 ;;=776^.5^951^.5
+75 ;;^UTILITY(U,$J,114,254,"I",6,0)
+76 ;;=725^.125^1384^.125
+77 ;;^UTILITY(U,$J,114,254,"I",7,0)
+78 ;;=230^.125^1598^.125
+79 ;;^UTILITY(U,$J,114,254,"I",8,0)
+80 ;;=192^.03125^288^.03125
+81 ;;^UTILITY(U,$J,114,254,"I",9,0)
+82 ;;=847^1.875^2021
+83 ;;^UTILITY(U,$J,114,254,"X",0)
+84 ;;=^^8^8^2890815^^^^
+85 ;;^UTILITY(U,$J,114,254,"X",1,0)
+86 ;;=1) MEASURE BEANS INTO POT; COVER WITH COLD WATER AND SOAK
+87 ;;^UTILITY(U,$J,114,254,"X",2,0)
+88 ;;= OVERNIGHT.
+89 ;;^UTILITY(U,$J,114,254,"X",3,0)
+90 ;;=2) DRAIN BEANS NEXT MORNING AND PLACE INTO STEAM JACKETED KETTLE.
+91 ;;^UTILITY(U,$J,114,254,"X",4,0)
+92 ;;=3) CUBE HAM. COMBINE HAM, GREEN PEPPERS AND TAP WATER. ADD TO BEANS;
+93 ;;^UTILITY(U,$J,114,254,"X",5,0)
+94 ;;= SIMMER FOR 1 HOUR.
+95 ;;^UTILITY(U,$J,114,254,"X",6,0)
+96 ;;=4) COMBINE REMAINING INGREDIENTS AND ADD TO BEAN MIXTURE. CONTINUE TO
+97 ;;^UTILITY(U,$J,114,254,"X",7,0)
+98 ;;= SIMMER FOR 1 HOUR OR UNTIL LIMA BEANS ARE TENDER. ADD ADDITIONAL WATER
+99 ;;^UTILITY(U,$J,114,254,"X",8,0)
+100 ;;= IF NEEDED.
+101 ;;^UTILITY(U,$J,114,255,0)
+102 ;;=COLD PLATE-BOL/CHEZ/DEV.EGG^100^1-EACH^45 MIN^^^4^Y^E-198^^S
+103 ;;^UTILITY(U,$J,114,255,"E",0)
+104 ;;=^114.05P^1^1
+105 ;;^UTILITY(U,$J,114,255,"E",1,0)
+106 ;;=32
+107 ;;^UTILITY(U,$J,114,255,"I",0)
+108 ;;=^114.01PA^8^8
+109 ;;^UTILITY(U,$J,114,255,"I",1,0)
+110 ;;=788^50^6498
+111 ;;^UTILITY(U,$J,114,255,"I",2,0)
+112 ;;=153^.125^360^.97
+113 ;;^UTILITY(U,$J,114,255,"I",3,0)
+114 ;;=230^.03125^1598^.03125
+115 ;;^UTILITY(U,$J,114,255,"I",4,0)
+116 ;;=382^.01563
+117 ;;^UTILITY(U,$J,114,255,"I",5,0)
+118 ;;=431^.03125^1987^.2645625
+119 ;;^UTILITY(U,$J,114,255,"I",6,0)
+120 ;;=924^.03125^286^.03125
+121 ;;^UTILITY(U,$J,114,255,"I",7,0)
+122 ;;=759^6.25^627^6.25
+123 ;;^UTILITY(U,$J,114,255,"I",8,0)
+124 ;;=489^6.25^9^6.25
+125 ;;^UTILITY(U,$J,114,255,"X",0)
+126 ;;=^^10^10^2890725^^
+127 ;;^UTILITY(U,$J,114,255,"X",1,0)
+128 ;;=1) HARD BOIL EGGS. CUT EGGS IN HALF LENGTHWISE, REMOVE YOLKS AND MASH
+129 ;;^UTILITY(U,$J,114,255,"X",2,0)
+130 ;;= THOROUGHLY.
+131 ;;^UTILITY(U,$J,114,255,"X",3,0)
+132 ;;=2) COMBINE MAYONNAISE, SALT, MUSTARD, AND VINEGAR AND ADD TO MASHED YOLKS.
+133 ;;^UTILITY(U,$J,114,255,"X",4,0)
+134 ;;= BLEND THOROUGHLY.
+135 ;;^UTILITY(U,$J,114,255,"X",5,0)
+136 ;;=3) REFILL EGG WHITE HALVES WITH 1 1/2 TBSP. OF YOLK MIXTURE. SPRINKLE