FHINI0JK ; ; 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,295,"X",3,0)
;;=3) COMBINE FLOUR(SECOND LISTING) AND WATER TO FORM SMOOTH PASTE.
;;^UTILITY(U,$J,114,295,"X",4,0)
;;=4) COMBINE TOMATOES AND ONIONS. ADD FLOUR PASTE. MIX THOROUGHLY.
;;^UTILITY(U,$J,114,295,"X",5,0)
;;=5) POUR TOMATO MIXTURE OVER STEAKS. COVER PANS AND BAKE AT 350 DEGREES
;;^UTILITY(U,$J,114,295,"X",6,0)
;;= UNTIL STEAKS ARE TENDER AND SAUCE THICKENS.
;;^UTILITY(U,$J,114,296,0)
;;=CAULIFLOWER POLONAISE^100^3-OZ^40 MIN^^^9^Y^V-35^^S
;;^UTILITY(U,$J,114,296,"E",0)
;;=^114.05P^1^1
;;^UTILITY(U,$J,114,296,"E",1,0)
;;=23
;;^UTILITY(U,$J,114,296,"I",0)
;;=^114.01PA^5^5
;;^UTILITY(U,$J,114,296,"I",1,0)
;;=359^12.5^948^12.5
;;^UTILITY(U,$J,114,296,"I",2,0)
;;=867^.28125^827^.28125
;;^UTILITY(U,$J,114,296,"I",3,0)
;;=297^.875^372^.875
;;^UTILITY(U,$J,114,296,"I",4,0)
;;=788^9^6498
;;^UTILITY(U,$J,114,296,"I",5,0)
;;=820^.10938^2048^.103911
;;^UTILITY(U,$J,114,296,"X",0)
;;=^^4^4^2890725^
;;^UTILITY(U,$J,114,296,"X",1,0)
;;=1) ADD CAULIFLOWER TO SALTED BOILING WATER AND COOK UNTIL JUST TENDER.
;;^UTILITY(U,$J,114,296,"X",2,0)
;;= DO NOT OVERCOOK. DRAIN.
;;^UTILITY(U,$J,114,296,"X",3,0)
;;=2) BROWN CRUMBS IN MARGARINE. SPRINKLE OVER CAULIFLOWER.
;;^UTILITY(U,$J,114,296,"X",4,0)
;;=3) GARNISH WITH HARD COOKED EGGS AND CHOPPED PARSLEY.
;;^UTILITY(U,$J,114,297,0)
;;=POLISH SAUSAGE^50^3-OZ^20 MIN^^1^4^Y^E-176^^P
;;^UTILITY(U,$J,114,297,"E",0)
;;=^114.05P^2^2
;;^UTILITY(U,$J,114,297,"E",1,0)
;;=13
;;^UTILITY(U,$J,114,297,"E",2,0)
;;=22
;;^UTILITY(U,$J,114,297,"I",0)
;;=^114.01PA^1^1
;;^UTILITY(U,$J,114,297,"I",1,0)
;;=882^20^655^20
;;^UTILITY(U,$J,114,297,"X",0)
;;=^^3^3^2890725^
;;^UTILITY(U,$J,114,297,"X",1,0)
;;=1) PLACE 10 LBS SAUSAGE INTO ONE OF TWO STEAMER TRAYS. COOK IN
;;^UTILITY(U,$J,114,297,"X",2,0)
;;= STEAMER FOR 15 MINUTES OR UNTIL FULLY COOKED.
;;^UTILITY(U,$J,114,297,"X",3,0)
;;=2) TRANSFER COOKED SAUSAGE INTO HALF MODULAR PAN FOR SERVICE
;;^UTILITY(U,$J,114,298,0)
;;=CAULIFLOWER, FRENCH FRIED^100^4-OZ^50 MIN^^^9^Y^V-36^^S^^.005
;;^UTILITY(U,$J,114,298,"E",0)
;;=^114.05P^1^1
;;^UTILITY(U,$J,114,298,"E",1,0)
;;=22
;;^UTILITY(U,$J,114,298,"I",0)
;;=^114.01PA^7^7
;;^UTILITY(U,$J,114,298,"I",1,0)
;;=359^13^948^13
;;^UTILITY(U,$J,114,298,"I",2,0)
;;=157^.21875^138^.21875
;;^UTILITY(U,$J,114,298,"I",3,0)
;;=788^10^6498
;;^UTILITY(U,$J,114,298,"I",4,0)
;;=628^1^1998^1
;;^UTILITY(U,$J,114,298,"I",5,0)
;;=230^.125^1598^.125
;;^UTILITY(U,$J,114,298,"I",6,0)
;;=192^.03125^288^.03125
;;^UTILITY(U,$J,114,298,"I",7,0)
;;=69^.5^32^.5
;;^UTILITY(U,$J,114,298,"X",0)
;;=^^6^6^2890725^
;;^UTILITY(U,$J,114,298,"X",1,0)
;;=1) PARTIALLY THAW CAULIFLOWER; SEPARATE INTO FLOWERETS. RETAIN FOR STEP 3.
;;^UTILITY(U,$J,114,298,"X",2,0)
;;=2) RECONSTITUTE MILK. ADD EGGS AND BLEND THOROUGHLY.
;;^UTILITY(U,$J,114,298,"X",3,0)
;;=3) DIP CAULIFLOWER IN EGG MIXTURE; DRAIN WELL.
;;^UTILITY(U,$J,114,298,"X",4,0)
;;=4) COMBINE AND BLEND REMAINING INGREDIENTS. ROLL FLOWERETS FROM
;;^UTILITY(U,$J,114,298,"X",5,0)
;;= STEP 3 IN SEASONED FLOUR MIXTURE; SHAKE OFF EXCESS.
;;^UTILITY(U,$J,114,298,"X",6,0)
;;=5) FRY IN DEEP FAT UNTIL GOLDEN BROWN. DRAIN ON ABSORBENT PAPER.
;;^UTILITY(U,$J,114,299,0)
;;=ITALIAN STYLE SAUSAGE PATTIES^144^1-EACH^1-1/4 HRS^^2^4^Y^E-177^^S^^.001
;;^UTILITY(U,$J,114,299,"E",0)
;;=^114.05P^3^3
;;^UTILITY(U,$J,114,299,"E",1,0)
;;=18
;;^UTILITY(U,$J,114,299,"E",2,0)
;;=33
;;^UTILITY(U,$J,114,299,"E",3,0)
;;=26
;;^UTILITY(U,$J,114,299,"I",0)
;;=^114.01PA^8^8
;;^UTILITY(U,$J,114,299,"I",1,0)
;;=879^20^199^13.2
;;^UTILITY(U,$J,114,299,"I",2,0)
;;=22^5^2167^5
;;^UTILITY(U,$J,114,299,"I",3,0)
;;=867^3^827^3
;;^UTILITY(U,$J,114,299,"I",4,0)
;;=230^.5^1598^.5
;;^UTILITY(U,$J,114,299,"I",5,0)
;;=192^.01563^288^.01563
;;^UTILITY(U,$J,114,299,"I",6,0)
;;=223^.01563^296^.01563
;;^UTILITY(U,$J,114,299,"I",7,0)
;;=173^.01563^285^.01563
;;^UTILITY(U,$J,114,299,"I",8,0)
;;=847^.1875^2021
;;^UTILITY(U,$J,114,299,"X",0)
;;=^^6^6^2890725^
;;^UTILITY(U,$J,114,299,"X",1,0)
;;=1) COMBINE MEAT AND SPICES IN MIXING BOWL.
;;^UTILITY(U,$J,114,299,"X",2,0)
;;=2) ADD WATER TO MOISTEN. MIX LIGHTLY ONLY TO DISTRIBUTE (DO NOT
;;^UTILITY(U,$J,114,299,"X",3,0)
;;= OVER MIX.)
;;^UTILITY(U,$J,114,299,"X",4,0)
;;=3) PORTION AND SHAPE INTO PATTIES. PLACE ONTO UNGREASED PANS.
;;^UTILITY(U,$J,114,299,"X",5,0)
;;=4) BAKE UNTIL BROWNED AND WELL DONE, APPROXIMATELY 25 MINUTES AT
;;^UTILITY(U,$J,114,299,"X",6,0)
;;= 350 F DEGREES.
;;^UTILITY(U,$J,114,300,0)
;;=BOILED BEEF^100^4-OZ RAW^4 HR^^1^4^N^E-121^^S
FHINI0JK ; ; 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,295,"X",3,0)
+2 ;;=3) COMBINE FLOUR(SECOND LISTING) AND WATER TO FORM SMOOTH PASTE.
+3 ;;^UTILITY(U,$J,114,295,"X",4,0)
+4 ;;=4) COMBINE TOMATOES AND ONIONS. ADD FLOUR PASTE. MIX THOROUGHLY.
+5 ;;^UTILITY(U,$J,114,295,"X",5,0)
+6 ;;=5) POUR TOMATO MIXTURE OVER STEAKS. COVER PANS AND BAKE AT 350 DEGREES
+7 ;;^UTILITY(U,$J,114,295,"X",6,0)
+8 ;;= UNTIL STEAKS ARE TENDER AND SAUCE THICKENS.
+9 ;;^UTILITY(U,$J,114,296,0)
+10 ;;=CAULIFLOWER POLONAISE^100^3-OZ^40 MIN^^^9^Y^V-35^^S
+11 ;;^UTILITY(U,$J,114,296,"E",0)
+12 ;;=^114.05P^1^1
+13 ;;^UTILITY(U,$J,114,296,"E",1,0)
+14 ;;=23
+15 ;;^UTILITY(U,$J,114,296,"I",0)
+16 ;;=^114.01PA^5^5
+17 ;;^UTILITY(U,$J,114,296,"I",1,0)
+18 ;;=359^12.5^948^12.5
+19 ;;^UTILITY(U,$J,114,296,"I",2,0)
+20 ;;=867^.28125^827^.28125
+21 ;;^UTILITY(U,$J,114,296,"I",3,0)
+22 ;;=297^.875^372^.875
+23 ;;^UTILITY(U,$J,114,296,"I",4,0)
+24 ;;=788^9^6498
+25 ;;^UTILITY(U,$J,114,296,"I",5,0)
+26 ;;=820^.10938^2048^.103911
+27 ;;^UTILITY(U,$J,114,296,"X",0)
+28 ;;=^^4^4^2890725^
+29 ;;^UTILITY(U,$J,114,296,"X",1,0)
+30 ;;=1) ADD CAULIFLOWER TO SALTED BOILING WATER AND COOK UNTIL JUST TENDER.
+31 ;;^UTILITY(U,$J,114,296,"X",2,0)
+32 ;;= DO NOT OVERCOOK. DRAIN.
+33 ;;^UTILITY(U,$J,114,296,"X",3,0)
+34 ;;=2) BROWN CRUMBS IN MARGARINE. SPRINKLE OVER CAULIFLOWER.
+35 ;;^UTILITY(U,$J,114,296,"X",4,0)
+36 ;;=3) GARNISH WITH HARD COOKED EGGS AND CHOPPED PARSLEY.
+37 ;;^UTILITY(U,$J,114,297,0)
+38 ;;=POLISH SAUSAGE^50^3-OZ^20 MIN^^1^4^Y^E-176^^P
+39 ;;^UTILITY(U,$J,114,297,"E",0)
+40 ;;=^114.05P^2^2
+41 ;;^UTILITY(U,$J,114,297,"E",1,0)
+42 ;;=13
+43 ;;^UTILITY(U,$J,114,297,"E",2,0)
+44 ;;=22
+45 ;;^UTILITY(U,$J,114,297,"I",0)
+46 ;;=^114.01PA^1^1
+47 ;;^UTILITY(U,$J,114,297,"I",1,0)
+48 ;;=882^20^655^20
+49 ;;^UTILITY(U,$J,114,297,"X",0)
+50 ;;=^^3^3^2890725^
+51 ;;^UTILITY(U,$J,114,297,"X",1,0)
+52 ;;=1) PLACE 10 LBS SAUSAGE INTO ONE OF TWO STEAMER TRAYS. COOK IN
+53 ;;^UTILITY(U,$J,114,297,"X",2,0)
+54 ;;= STEAMER FOR 15 MINUTES OR UNTIL FULLY COOKED.
+55 ;;^UTILITY(U,$J,114,297,"X",3,0)
+56 ;;=2) TRANSFER COOKED SAUSAGE INTO HALF MODULAR PAN FOR SERVICE
+57 ;;^UTILITY(U,$J,114,298,0)
+58 ;;=CAULIFLOWER, FRENCH FRIED^100^4-OZ^50 MIN^^^9^Y^V-36^^S^^.005
+59 ;;^UTILITY(U,$J,114,298,"E",0)
+60 ;;=^114.05P^1^1
+61 ;;^UTILITY(U,$J,114,298,"E",1,0)
+62 ;;=22
+63 ;;^UTILITY(U,$J,114,298,"I",0)
+64 ;;=^114.01PA^7^7
+65 ;;^UTILITY(U,$J,114,298,"I",1,0)
+66 ;;=359^13^948^13
+67 ;;^UTILITY(U,$J,114,298,"I",2,0)
+68 ;;=157^.21875^138^.21875
+69 ;;^UTILITY(U,$J,114,298,"I",3,0)
+70 ;;=788^10^6498
+71 ;;^UTILITY(U,$J,114,298,"I",4,0)
+72 ;;=628^1^1998^1
+73 ;;^UTILITY(U,$J,114,298,"I",5,0)
+74 ;;=230^.125^1598^.125
+75 ;;^UTILITY(U,$J,114,298,"I",6,0)
+76 ;;=192^.03125^288^.03125
+77 ;;^UTILITY(U,$J,114,298,"I",7,0)
+78 ;;=69^.5^32^.5
+79 ;;^UTILITY(U,$J,114,298,"X",0)
+80 ;;=^^6^6^2890725^
+81 ;;^UTILITY(U,$J,114,298,"X",1,0)
+82 ;;=1) PARTIALLY THAW CAULIFLOWER; SEPARATE INTO FLOWERETS. RETAIN FOR STEP 3.
+83 ;;^UTILITY(U,$J,114,298,"X",2,0)
+84 ;;=2) RECONSTITUTE MILK. ADD EGGS AND BLEND THOROUGHLY.
+85 ;;^UTILITY(U,$J,114,298,"X",3,0)
+86 ;;=3) DIP CAULIFLOWER IN EGG MIXTURE; DRAIN WELL.
+87 ;;^UTILITY(U,$J,114,298,"X",4,0)
+88 ;;=4) COMBINE AND BLEND REMAINING INGREDIENTS. ROLL FLOWERETS FROM
+89 ;;^UTILITY(U,$J,114,298,"X",5,0)
+90 ;;= STEP 3 IN SEASONED FLOUR MIXTURE; SHAKE OFF EXCESS.
+91 ;;^UTILITY(U,$J,114,298,"X",6,0)
+92 ;;=5) FRY IN DEEP FAT UNTIL GOLDEN BROWN. DRAIN ON ABSORBENT PAPER.
+93 ;;^UTILITY(U,$J,114,299,0)
+94 ;;=ITALIAN STYLE SAUSAGE PATTIES^144^1-EACH^1-1/4 HRS^^2^4^Y^E-177^^S^^.001
+95 ;;^UTILITY(U,$J,114,299,"E",0)
+96 ;;=^114.05P^3^3
+97 ;;^UTILITY(U,$J,114,299,"E",1,0)
+98 ;;=18
+99 ;;^UTILITY(U,$J,114,299,"E",2,0)
+100 ;;=33
+101 ;;^UTILITY(U,$J,114,299,"E",3,0)
+102 ;;=26
+103 ;;^UTILITY(U,$J,114,299,"I",0)
+104 ;;=^114.01PA^8^8
+105 ;;^UTILITY(U,$J,114,299,"I",1,0)
+106 ;;=879^20^199^13.2
+107 ;;^UTILITY(U,$J,114,299,"I",2,0)
+108 ;;=22^5^2167^5
+109 ;;^UTILITY(U,$J,114,299,"I",3,0)
+110 ;;=867^3^827^3
+111 ;;^UTILITY(U,$J,114,299,"I",4,0)
+112 ;;=230^.5^1598^.5
+113 ;;^UTILITY(U,$J,114,299,"I",5,0)
+114 ;;=192^.01563^288^.01563
+115 ;;^UTILITY(U,$J,114,299,"I",6,0)
+116 ;;=223^.01563^296^.01563
+117 ;;^UTILITY(U,$J,114,299,"I",7,0)
+118 ;;=173^.01563^285^.01563
+119 ;;^UTILITY(U,$J,114,299,"I",8,0)
+120 ;;=847^.1875^2021
+121 ;;^UTILITY(U,$J,114,299,"X",0)
+122 ;;=^^6^6^2890725^
+123 ;;^UTILITY(U,$J,114,299,"X",1,0)
+124 ;;=1) COMBINE MEAT AND SPICES IN MIXING BOWL.
+125 ;;^UTILITY(U,$J,114,299,"X",2,0)
+126 ;;=2) ADD WATER TO MOISTEN. MIX LIGHTLY ONLY TO DISTRIBUTE (DO NOT
+127 ;;^UTILITY(U,$J,114,299,"X",3,0)
+128 ;;= OVER MIX.)
+129 ;;^UTILITY(U,$J,114,299,"X",4,0)
+130 ;;=3) PORTION AND SHAPE INTO PATTIES. PLACE ONTO UNGREASED PANS.
+131 ;;^UTILITY(U,$J,114,299,"X",5,0)
+132 ;;=4) BAKE UNTIL BROWNED AND WELL DONE, APPROXIMATELY 25 MINUTES AT
+133 ;;^UTILITY(U,$J,114,299,"X",6,0)
+134 ;;= 350 F DEGREES.
+135 ;;^UTILITY(U,$J,114,300,0)
+136 ;;=BOILED BEEF^100^4-OZ RAW^4 HR^^1^4^N^E-121^^S
