Fri, 01 May 2020 21:37:23 +0200
In export to forum, suppress diluted water is the name is set but the volume is 0. Add the treated water profile to the output.
177 | 1 | <?php |
605
538627a5555c
Don't include carbonation sugars in the fermentables.
Michiel Broek <mbroek@mbse.eu>
parents:
604
diff
changeset
|
2 | require_once('config.php'); |
538627a5555c
Don't include carbonation sugars in the fermentables.
Michiel Broek <mbroek@mbse.eu>
parents:
604
diff
changeset
|
3 | require_once('includes/formulas.php'); |
538627a5555c
Don't include carbonation sugars in the fermentables.
Michiel Broek <mbroek@mbse.eu>
parents:
604
diff
changeset
|
4 | //require_once($_SERVER['DOCUMENT_ROOT'].'/config.php'); |
538627a5555c
Don't include carbonation sugars in the fermentables.
Michiel Broek <mbroek@mbse.eu>
parents:
604
diff
changeset
|
5 | //require_once($_SERVER['DOCUMENT_ROOT'].'/includes/formulas.php'); |
177 | 6 | |
7 | ||
8 | $link = mysqli_connect(DBASE_HOST,DBASE_USER,DBASE_PASS,DBASE_NAME); | |
9 | if (! $link) { | |
10 | die('Connect Error (' . mysqli_connect_errno() . ') ' . mysqli_connect_error()); | |
11 | } | |
12 | if (! mysqli_set_charset($link, "utf8" )) { | |
13 | echo "error"; | |
14 | return 1; | |
15 | } | |
16 | ||
17 | //setlocale ( LC_ALL, 'nl_NL.UTF-8'); | |
18 | if (isset($_GET["record"])) | |
19 | $record = $_GET["record"]; | |
20 | else | |
606
39d4b9e7b447
Fixed 3 cut and paste mistakes.
Michiel Broek <mbroek@mbse.eu>
parents:
605
diff
changeset
|
21 | $record = 71; |
177 | 22 | $result = mysqli_query($link, "SELECT * FROM products WHERE record='".$record."'"); |
23 | $row = mysqli_fetch_array($result); | |
24 | ||
242
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
25 | $recipetype = array( 'Extract', 'Partial Mash', 'All Grain' ); |
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
26 | $styletype = array( 'Lager', 'Ale', 'Mead', 'Wheat', 'Mixed', 'Cider' ); |
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
27 | $hoptype = array( 'Bittering', 'Aroma', 'Both' ); |
449
a1d6b9eec988
Added Cryo Hop support to the export scripts.
Michiel Broek <mbroek@mbse.eu>
parents:
429
diff
changeset
|
28 | $hopform = array( 'Pellet', 'Plug', 'Leaf', 'Leaf', 'Leaf' ); |
242
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
29 | $hopuse = array( 'Mash', 'First wort', 'Boil', 'Aroma', 'Whirlpool', 'Dry hop' ); |
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
30 | $fermentabletype = array( 'Grain', 'Sugar', 'Extract', 'Dry extract', 'Adjunct' ); |
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
31 | $graintype = array( 'Base', 'Roast', 'Crystal', 'Kilned', 'Sour malt', 'Special', 'No malt' ); |
429
0d2cf505957c
Prepared for new yeast types.
Michiel Broek <mbroek@mbse.eu>
parents:
401
diff
changeset
|
32 | $yeasttype = array( 'Lager', 'Ale', 'Wheat', 'Wine', 'Champagne', 'Other', 'Other', 'Other', 'Other', 'Other' ); |
515
9d771385a8a0
Added dried yeast form. Pitch rate for Kveik initially set at 0.25. Dried Kveik cells set to 9000000000 cells/gram.
Michiel Broek <mbroek@mbse.eu>
parents:
449
diff
changeset
|
33 | $yeastform = array( 'Liquid', 'Dry', 'Slant', 'Culture', 'Frozen', 'Bottle', 'Dry' ); |
242
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
34 | $yeastuse = array( 'Primary', 'Secondary', 'Tertiary', 'Bottle' ); |
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
35 | $misctype = array( 'Spice', 'Herb', 'Flavor', 'Fining', 'Water agent', 'Yeast nutrient', 'Other' ); |
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
36 | $miscuse = array( 'Starter', 'Mash', 'Boil', 'Primary', 'Secondary', 'Bottling' ); |
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
37 | $mashsteptype = array( 'Infusion', 'Temperature', 'Decoction' ); |
603
c0f638bcec9f
Added COLOR_METHOD, IBU_METHOD, MAGNESIUM fields.
Michiel Broek <mbroek@mbse.eu>
parents:
598
diff
changeset
|
38 | $colormethod = array( 'Morey', 'Mosher', 'Daniels', 'Halberstadt', 'Naudts' ); |
c0f638bcec9f
Added COLOR_METHOD, IBU_METHOD, MAGNESIUM fields.
Michiel Broek <mbroek@mbse.eu>
parents:
598
diff
changeset
|
39 | $ibumethod = array( 'Tinseth', 'Rager', 'Daniels', 'Garetz', 'Mosher', 'Noonan' ); |
242
97c237654ddd
Product export to beerxml produces a clean recipe. No brewing information added.
Michiel Broek <mbroek@mbse.eu>
parents:
177
diff
changeset
|
40 | |
177 | 41 | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
42 | function field($x, $field, $value) { |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
43 | xmlwriter_start_element($x, $field); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
44 | xmlwriter_text($x, $value); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
45 | xmlwriter_end_element($x); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
46 | } |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
47 | |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
48 | |
177 | 49 | /* |
50 | * Create beerxml output | |
51 | */ | |
52 | $xw = xmlwriter_open_memory(); | |
53 | xmlwriter_set_indent($xw, 1); | |
54 | $res = xmlwriter_set_indent_string($xw, ' '); | |
55 | ||
56 | xmlwriter_start_document($xw, '1.0', 'UTF-8'); | |
57 | ||
58 | xmlwriter_start_element($xw, 'RECIPES'); | |
59 | xmlwriter_start_element($xw, 'RECIPE'); | |
60 | ||
61 | // Recipe basics | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
62 | field($xw, 'VERSION', '1'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
63 | field($xw, 'NAME', $row['name']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
64 | field($xw, 'NOTES', $row['notes']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
65 | field($xw, 'TYPE', $recipetype[$row['type']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
66 | field($xw, 'BREWER', 'Anonymous'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
67 | field($xw, 'BATCH_SIZE', sprintf("%.4f",floatval($row['batch_size']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
68 | field($xw, 'BOIL_SIZE', sprintf("%.4f",floatval($row['boil_size']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
69 | field($xw, 'BOIL_TIME', sprintf("%.3f",floatval($row['boil_time']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
70 | field($xw, 'EFFICIENCY', sprintf("%.4f",floatval($row['efficiency']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
71 | field($xw, 'OG', sprintf("%.3f",floatval($row['og']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
72 | field($xw, 'FG', sprintf("%.3f",floatval($row['fg']))); |
177 | 73 | |
74 | ||
598
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
75 | if (floatval($row['est_og']) > 0) { |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
76 | field($xw, 'EST_OG', sprintf("%.3f",floatval($row['est_og']))); |
598
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
77 | } |
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
78 | |
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
79 | if (floatval($row['est_fg']) > 0) { |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
80 | field($xw, 'EST_FG', sprintf("%.3f",floatval($row['est_fg']))); |
598
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
81 | } |
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
82 | |
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
83 | if (floatval($row['est_abv']) > 0) { |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
84 | field($xw, 'EST_ABV', sprintf("%.1f",floatval($row['est_abv']))); |
598
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
85 | } |
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
86 | |
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
87 | if (floatval($row['est_color']) > 0) { |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
88 | field($xw, 'EST_COLOR', sprintf("%.6f", ebc_to_srm(floatval($row['est_color'])))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
89 | field($xw, 'COLOR_METHOD', $colormethod[$row['color_method']]); |
598
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
90 | } |
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
91 | |
890a532701e8
Added missing beerxml fields
Michiel Broek <mbroek@mbse.eu>
parents:
563
diff
changeset
|
92 | if (floatval($row['est_ibu']) > 0) { |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
93 | field($xw, 'EST_IBU', sprintf("%.1f",floatval($row['est_ibu']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
94 | field($xw, 'IBU_METHOD', $ibumethod[$row['ibu_method']]); |
401
4aad74bde00b
In product beerxml export added BMS specific items: cooling_to and whirlpool stages. These should be picked up by the brew computer and should do no harm to the rest of the world.
Michiel Broek <mbroek@mbse.eu>
parents:
400
diff
changeset
|
95 | } |
4aad74bde00b
In product beerxml export added BMS specific items: cooling_to and whirlpool stages. These should be picked up by the brew computer and should do no harm to the rest of the world.
Michiel Broek <mbroek@mbse.eu>
parents:
400
diff
changeset
|
96 | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
97 | /* If product is packaged and carbonated, add fermentation data. */ |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
98 | if ($row['stage'] >= 8) { |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
99 | $d1 = new DateTime($row['brew_date_end']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
100 | $d2 = new DateTime($row['primary_end_date']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
101 | $d3 = new DateTime($row['secondary_end_date']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
102 | $d4 = new DateTime($row['package_date']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
103 | $diff = $d2->diff($d1); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
104 | $primary_days = $diff->days; |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
105 | $diff = $d3->diff($d2); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
106 | $secondary_days = $diff->days; |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
107 | $diff = $d4->diff($d3); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
108 | $tertiary_days = $diff->days; |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
109 | field($xw, 'FERMENTATION_STAGES', '3'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
110 | field($xw, 'PRIMARY_AGE', sprintf("%.1f", $primary_days)); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
111 | field($xw, 'PRIMARY_TEMP', sprintf("%.1f", $row['primary_max_temp'])); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
112 | field($xw, 'SECONDARY_AGE', sprintf("%.1f", $secondary_days)); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
113 | field($xw, 'SECONDARY_TEMP', sprintf("%.1f", $row['secondary_temp'])); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
114 | field($xw, 'TERTIARY_AGE', sprintf("%.1f", $tertiary_days)); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
115 | field($xw, 'TERTIARY_TEMP', sprintf("%.1f", $row['tertiary_temp'])); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
116 | field($xw, 'CARBONATION', sprintf("%.1f", $row['bottle_carbonation'])); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
117 | field($xw, 'FORCED_CARBONATION', 'FALSE'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
118 | field($xw, 'CARBONATION_TEMP', sprintf("%.1f", $row['bottle_carbonation_temp'])); |
401
4aad74bde00b
In product beerxml export added BMS specific items: cooling_to and whirlpool stages. These should be picked up by the brew computer and should do no harm to the rest of the world.
Michiel Broek <mbroek@mbse.eu>
parents:
400
diff
changeset
|
119 | } |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
120 | |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
121 | if ($row['brew_cooling_to'] > 0) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
122 | field($xw, 'BMS_COOLING_TO', sprintf("%.1f",floatval($row['brew_cooling_to']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
123 | |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
124 | if ($row['brew_whirlpool9'] > 0) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
125 | field($xw, 'BMS_WHIRLPOOL9', sprintf("%.0f",floatval($row['brew_whirlpool9']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
126 | if ($row['brew_whirlpool7'] > 0) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
127 | field($xw, 'BMS_WHIRLPOOL7', sprintf("%.0f",floatval($row['brew_whirlpool7']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
128 | if ($row['brew_whirlpool6'] > 0) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
129 | field($xw, 'BMS_WHIRLPOOL6', sprintf("%.0f",floatval($row['brew_whirlpool6']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
130 | if ($row['brew_whirlpool2'] > 0) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
131 | field($xw, 'BMS_WHIRLPOOL2', sprintf("%.0f",floatval($row['brew_whirlpool2']))); |
401
4aad74bde00b
In product beerxml export added BMS specific items: cooling_to and whirlpool stages. These should be picked up by the brew computer and should do no harm to the rest of the world.
Michiel Broek <mbroek@mbse.eu>
parents:
400
diff
changeset
|
132 | |
4aad74bde00b
In product beerxml export added BMS specific items: cooling_to and whirlpool stages. These should be picked up by the brew computer and should do no harm to the rest of the world.
Michiel Broek <mbroek@mbse.eu>
parents:
400
diff
changeset
|
133 | |
177 | 134 | // Style |
135 | xmlwriter_start_element($xw, 'STYLE'); | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
136 | field($xw, 'VERSION', '1'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
137 | field($xw, 'NAME', $row['st_name']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
138 | field($xw, 'CATEGORY', $row['st_category']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
139 | field($xw, 'CATEGORY_NUMBER', $row['st_category_number']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
140 | field($xw, 'STYLE_LETTER', $row['st_letter']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
141 | field($xw, 'STYLE_GUIDE', $row['st_guide']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
142 | field($xw, 'TYPE', $styletype[$row['st_type']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
143 | field($xw, 'OG_MIN', sprintf("%.3f",floatval($row['st_og_min']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
144 | field($xw, 'OG_MAX', sprintf("%.3f",floatval($row['st_og_max']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
145 | field($xw, 'FG_MIN', sprintf("%.3f",floatval($row['st_fg_min']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
146 | field($xw, 'FG_MAX', sprintf("%.3f",floatval($row['st_fg_max']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
147 | field($xw, 'IBU_MIN', sprintf("%.0f",floatval($row['st_ibu_min']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
148 | field($xw, 'IBU_MAX', sprintf("%.0f",floatval($row['st_ibu_max']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
149 | field($xw, 'COLOR_MIN', sprintf("%.2f",ebc_to_srm(floatval($row['st_color_min'])))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
150 | field($xw, 'COLOR_MAX', sprintf("%.2f",ebc_to_srm(floatval($row['st_color_max'])))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
151 | field($xw, 'CARB_MIN', sprintf("%.1f",floatval($row['st_carb_min']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
152 | field($xw, 'CARB_MAX', sprintf("%.1f",floatval($row['st_carb_max']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
153 | field($xw, 'ABV_MIN', sprintf("%.1f",floatval($row['st_abv_min']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
154 | field($xw, 'ABV_MAX', sprintf("%.1f",floatval($row['st_abv_max']))); |
177 | 155 | xmlwriter_end_element($xw); // STYLE |
156 | ||
157 | xmlwriter_start_element($xw, 'EQUIPMENT'); | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
158 | field($xw, 'VERSION', '1'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
159 | field($xw, 'NAME', $row['eq_name']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
160 | field($xw, 'NOTES', $row['eq_notes']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
161 | field($xw, 'BATCH_SIZE', sprintf("%.2f",floatval($row['eq_batch_size']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
162 | field($xw, 'BOIL_SIZE', sprintf("%.2f",floatval($row['eq_boil_size']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
163 | field($xw, 'BOIL_TIME', sprintf("%.0f",floatval($row['eq_boil_time']))); |
177 | 164 | xmlwriter_end_element($xw); // EQUIPMENT |
165 | ||
166 | xmlwriter_start_element($xw, 'HOPS'); | |
167 | $arr = json_decode($row['json_hops'], true); | |
168 | foreach($arr as $item) { //foreach element in $arr | |
169 | xmlwriter_start_element($xw, 'HOP'); | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
170 | field($xw, 'VERSION', '1'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
171 | field($xw, 'NAME', $item['h_name']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
172 | field($xw, 'ALPHA', sprintf("%.1f",floatval($item['h_alpha']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
173 | field($xw, 'AMOUNT', sprintf("%.4f",floatval($item['h_amount']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
174 | field($xw, 'USE', $hopuse[$item['h_useat']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
175 | field($xw, 'TIME', $item['h_time']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
176 | field($xw, 'TYPE', $hoptype[$item['h_type']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
177 | field($xw, 'FORM', $hopform[$item['h_form']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
178 | field($xw, 'BETA', sprintf("%.1f",floatval($item['h_beta']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
179 | field($xw, 'HSI', sprintf("%.1f",floatval($item['h_hsi']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
180 | field($xw, 'ORIGIN', $item['h_origin']); |
177 | 181 | xmlwriter_end_element($xw); // HOP |
182 | } | |
183 | xmlwriter_end_element($xw); // HOPS | |
184 | ||
185 | xmlwriter_start_element($xw, 'FERMENTABLES'); | |
186 | $arr = json_decode($row['json_fermentables'], true); | |
187 | foreach($arr as $item) { //foreach element in $arr | |
605
538627a5555c
Don't include carbonation sugars in the fermentables.
Michiel Broek <mbroek@mbse.eu>
parents:
604
diff
changeset
|
188 | if ($item['f_added'] <= 3) { |
177 | 189 | xmlwriter_start_element($xw, 'FERMENTABLE'); |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
190 | field($xw, 'VERSION', '1'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
191 | field($xw, 'NAME', $item['f_name']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
192 | field($xw, 'TYPE', $fermentabletype[$item['f_type']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
193 | field($xw, 'AMOUNT', sprintf("%.4f",floatval($item['f_amount']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
194 | field($xw, 'YIELD', sprintf("%.1f",floatval($item['f_yield']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
195 | field($xw, 'COLOR', sprintf("%.1f",ebc_to_srm(floatval($item['f_color'])))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
196 | field($xw, 'ADD_AFTER_BOIL', ($item['f_added'] > 1) ? 'TRUE':'FALSE'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
197 | field($xw, 'ORIGIN', $item['f_origin']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
198 | field($xw, 'SUPPLIER', $item['f_supplier']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
199 | if (floatval($item['f_coarse_fine_diff'])) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
200 | field($xw, 'COARSE_FINE_DIFF', sprintf("%.4f",floatval($item['f_coarse_fine_diff']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
201 | if (floatval($item['f_moisture'])) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
202 | field($xw, 'MOISTURE', sprintf("%.4f",floatval($item['f_moisture']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
203 | if (floatval($item['f_diastatic_power'])) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
204 | field($xw, 'DIASTATIC_POWER', sprintf("%.4f",floatval($item['f_diastatic_power']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
205 | if (floatval($item['f_protein'])) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
206 | field($xw, 'PROTEIN', sprintf("%.4f",floatval($item['f_protein']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
207 | if (floatval($item['f_max_in_batch'])) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
208 | field($xw, 'MAX_IN_BATCH', sprintf("%.1f",floatval($item['f_max_in_batch']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
209 | field($xw, 'RECOMMEND_MASH', ($item['f_recommend_mash']) ? 'TRUE':'FALSE'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
210 | field($xw, 'GRAINTYPE', $graintype[$item['f_graintype']]); |
177 | 211 | xmlwriter_end_element($xw); // FERMENTABLE |
605
538627a5555c
Don't include carbonation sugars in the fermentables.
Michiel Broek <mbroek@mbse.eu>
parents:
604
diff
changeset
|
212 | } |
177 | 213 | } |
214 | xmlwriter_end_element($xw); // FERMENTABLES | |
215 | ||
216 | xmlwriter_start_element($xw, 'MISCS'); | |
217 | $arr = json_decode($row['json_miscs'], true); | |
218 | foreach($arr as $item) { | |
219 | xmlwriter_start_element($xw, 'MISC'); | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
220 | field($xw, 'VERSION', '1'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
221 | field($xw, 'NAME', $item['m_name']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
222 | field($xw, 'TYPE', $misctype[$item['m_type']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
223 | field($xw, 'AMOUNT', sprintf("%.5f",floatval($item['m_amount']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
224 | field($xw, 'AMOUNT_IS_WEIGHT', ($item['m_amount_is_weight']) ? 'TRUE':'FALSE'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
225 | field($xw, 'USE', $miscuse[$item['m_use_use']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
226 | field($xw, 'TIME', sprintf("%.0f",floatval($item['m_time']))); |
177 | 227 | xmlwriter_end_element($xw); // MISC |
228 | } | |
229 | xmlwriter_end_element($xw); // MISCS | |
230 | ||
231 | xmlwriter_start_element($xw, 'YEASTS'); | |
232 | $arr = json_decode($row['json_yeasts'], true); | |
233 | foreach($arr as $item) { //foreach element in $arr | |
234 | xmlwriter_start_element($xw, 'YEAST'); | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
235 | field($xw, 'VERSION', '1'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
236 | field($xw, 'NAME', $item['y_name']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
237 | field($xw, 'TYPE', $yeasttype[$item['y_type']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
238 | field($xw, 'FORM', $yeastform[$item['y_form']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
239 | field($xw, 'AMOUNT', sprintf("%.5f",floatval($item['y_amount']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
240 | field($xw, 'AMOUNT_IS_WEIGHT', ($item['y_form'] == 1) ? 'TRUE':'FALSE'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
241 | field($xw, 'LABORATORY', $item['y_laboratory']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
242 | field($xw, 'PRODUCT_ID', $item['y_product_id']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
243 | field($xw, 'MIN_TEMPERATURE', sprintf("%.1f",floatval($item['y_min_temperature']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
244 | field($xw, 'MAX_TEMPERATURE', sprintf("%.1f",floatval($item['y_max_temperature']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
245 | field($xw, 'ATTENUATION', sprintf("%.1f",floatval($item['y_attenuation']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
246 | field($xw, 'ADD_TO_SECONDARY', ($item['y_use'] == 0) ? 'FALSE':'TRUE'); |
177 | 247 | xmlwriter_end_element($xw); // YEAST |
248 | } | |
249 | xmlwriter_end_element($xw); // YEASTS | |
250 | ||
251 | xmlwriter_start_element($xw, 'WATERS'); | |
252 | xmlwriter_start_element($xw, 'WATER'); // Source 1 | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
253 | field($xw, 'VERSION', '1'); |
606
39d4b9e7b447
Fixed 3 cut and paste mistakes.
Michiel Broek <mbroek@mbse.eu>
parents:
605
diff
changeset
|
254 | field($xw, 'NAME', $row['w1_name']); |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
255 | field($xw, 'AMOUNT', sprintf("%.2f",floatval($row['w1_amount']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
256 | field($xw, 'CALCIUM', sprintf("%.2f",floatval($row['w1_calcium']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
257 | field($xw, 'MAGNESIUM', sprintf("%.2f",floatval($row['w1_magnesium']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
258 | field($xw, 'BICARBONATE', sprintf("%.2f",floatval($row['w1_total_alkalinity']) * 1.22)); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
259 | field($xw, 'SULFATE', sprintf("%.2f",floatval($row['w1_sulfate']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
260 | field($xw, 'CHLORIDE', sprintf("%.2f",floatval($row['w1_chloride']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
261 | field($xw, 'SODIUM', sprintf("%.2f",floatval($row['w1_sodium']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
262 | field($xw, 'PH', sprintf("%.1f",floatval($row['w1_ph']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
263 | field($xw, 'TOTAL_ALKALINITY', sprintf("%.2f",floatval($row['w1_total_alkalinity']))); |
177 | 264 | xmlwriter_end_element($xw); // WATER |
265 | ||
266 | if (strlen($row['w2_name'])) { | |
267 | xmlwriter_start_element($xw, 'WATER'); // Source 2 | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
268 | field($xw, 'VERSION', '1'); |
606
39d4b9e7b447
Fixed 3 cut and paste mistakes.
Michiel Broek <mbroek@mbse.eu>
parents:
605
diff
changeset
|
269 | field($xw, 'NAME', $row['w2_name']); |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
270 | field($xw, 'AMOUNT', sprintf("%.2f",floatval($row['w2_amount']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
271 | field($xw, 'CALCIUM', sprintf("%.2f",floatval($row['w2_calcium']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
272 | field($xw, 'MAGNESIUM', sprintf("%.2f",floatval($row['w2_magnesium']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
273 | field($xw, 'BICARBONATE', sprintf("%.2f",floatval($row['w2_total_alkalinity']) * 1.22)); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
274 | field($xw, 'SULFATE', sprintf("%.2f",floatval($row['w2_sulfate']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
275 | field($xw, 'CHLORIDE', sprintf("%.2f",floatval($row['w2_chloride']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
276 | field($xw, 'SODIUM', sprintf("%.2f",floatval($row['w2_sodium']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
277 | field($xw, 'PH', sprintf("%.1f",floatval($row['w2_ph']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
278 | field($xw, 'TOTAL_ALKALINITY', sprintf("%.2f",floatval($row['w2_total_alkalinity']))); |
177 | 279 | xmlwriter_end_element($xw); // WATER |
280 | } | |
281 | xmlwriter_end_element($xw); // WATERS | |
282 | ||
283 | xmlwriter_start_element($xw, 'MASH'); | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
284 | field($xw, 'VERSION', '1'); |
606
39d4b9e7b447
Fixed 3 cut and paste mistakes.
Michiel Broek <mbroek@mbse.eu>
parents:
605
diff
changeset
|
285 | field($xw, 'NAME', $row['mash_name']); |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
286 | field($xw, 'GRAIN_TEMP', '10.0'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
287 | field($xw, 'PH', sprintf("%.1f",floatval($row['sparge_ph']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
288 | field($xw, 'SPARGE_TEMP', sprintf("%.1f",floatval($row['sparge_temp']))); |
177 | 289 | xmlwriter_start_element($xw, 'MASH_STEPS'); |
290 | $arr = json_decode($row['json_mashs'], true); | |
291 | foreach($arr as $item) { //foreach element in $arr | |
292 | xmlwriter_start_element($xw, 'MASH_STEP'); | |
604
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
293 | field($xw, 'VERSION', '1'); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
294 | field($xw, 'NAME', $item['step_name']); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
295 | field($xw, 'TYPE', $mashsteptype[$item['step_type']]); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
296 | if ($item['step_type'] == 0) |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
297 | field($xw, 'INFUSE_AMOUNT', sprintf("%.1f",floatval($item['step_infuse_amount']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
298 | field($xw, 'STEP_TEMP', sprintf("%.1f",floatval($item['step_temp']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
299 | field($xw, 'STEP_TIME', sprintf("%.1f",floatval($item['step_time']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
300 | field($xw, 'RAMP_TIME', sprintf("%.1f",floatval($item['ramp_time']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
301 | field($xw, 'END_TEMP', sprintf("%.1f",floatval($item['end_temp']))); |
9e791905157a
Fix write EST_COLOR in srm. Compacter product beerxml code. Add fermentation data.
Michiel Broek <mbroek@mbse.eu>
parents:
603
diff
changeset
|
302 | field($xw, 'PH', sprintf("%.1f",floatval($row['mash_ph']))); |
177 | 303 | xmlwriter_end_element($xw); // MASH_STEP |
304 | } | |
305 | xmlwriter_end_element($xw); // MASH_STEPS | |
306 | xmlwriter_end_element($xw); // MASH | |
307 | xmlwriter_end_element($xw); // RECIPE | |
308 | xmlwriter_end_element($xw); // RECIPES | |
309 | xmlwriter_end_document($xw); | |
310 | ||
311 | $beerxml = xmlwriter_output_memory($xw); | |
312 | ||
313 | Header('Content-type: text/xml'); | |
272
0c2ea1c2b858
Product beerxml export filename includes beer code.
Michiel Broek <mbroek@mbse.eu>
parents:
242
diff
changeset
|
314 | header('Content-Disposition: attachment; filename="' . $row['code'] . ' ' . $row['name'] . '.xml"'); |
177 | 315 | header('Content-Transfer-Encoding: binary'); |
316 | header('Expires: 0'); | |
317 | header('Pragma: no-cache'); | |
318 | header('Content-Length: '.strlen($beerxml)); | |
319 | exit($beerxml); |