xref: /webtrees/resources/xml/reports/descendancy_report.xml (revision e0dcab18f07e7cdd57669bc5b941048aac1ce91c)
19cad7645SGreg Roach<?xml version="1.0" encoding="UTF-8" ?>
29cad7645SGreg Roach<Report>
39cad7645SGreg Roach	<Title><var var="I18N::translate('Descendants')" /></Title>
49cad7645SGreg Roach	<Description><var var="I18N::translate('A report of an individual’s descendants, in a narrative style.')" /></Description>
59cad7645SGreg Roach	<Input name="pid" lookup="INDI" type="text" default=""><var var="I18N::translate('Individual')" /></Input>
69cad7645SGreg Roach	<Input name="maxgen" type="select" options="3=>I18N::number(3)|4=>I18N::number(4)|5=>I18N::number(5)|6=>I18N::number(6)|7=>I18N::number(7)|8=>I18N::number(8)|9=>I18N::number(9)|10=>I18N::number(10)|*=>I18N::translate('All')"><var var="I18N::translate('Generations')" /></Input>
79cad7645SGreg Roach	<Input name="sources" type="checkbox" default="1"><var var="I18N::translate('Show sources')" /></Input>
84d314e6bSGreg Roach	<Input name="pageSize" type="select" options="A4=>I18N::translateContext('paper size','A4')|A3=>I18N::translateContext('paper size', 'A3')|US-Letter=>I18N::translateContext('paper size','Letter')|US-Tabloid=>I18N::translateContext('paper size','Tabloid')"><var var="I18N::translate('Page size')" /></Input>
99cad7645SGreg Roach	<!--
109cad7645SGreg Roach	<Input name="fonts" type="select" default="dejavusans" options="arialunicid0=>I18N::translateContext('font name', 'Arial')|dejavusans=>I18N::translateContext('font name', 'DejaVu')|helvetica=>I18N::translateContext('font name', 'Helvetica')"><var var="I18N::translate('Font')"/></Input>
119cad7645SGreg Roach	-->
129cad7645SGreg Roach	<SetVar name="fonts" value="dejavusans" />
139cad7645SGreg Roach
149cad7645SGreg Roach	<!-- Header -->
159cad7645SGreg Roach	<Style name="header" font="$fonts" size="18"/>
169cad7645SGreg Roach	<!-- Page numbers text -->
179cad7645SGreg Roach	<Style name="pagenum" font="$fonts" size="8"/>
189cad7645SGreg Roach	<!-- Standard text -->
199cad7645SGreg Roach	<Style name="text" font="$fonts" size="9"/>
209cad7645SGreg Roach	<!-- Source text - FootnoteTexts - required style name by the generator -->
219cad7645SGreg Roach	<Style name="footnote" font="$fonts" size="8"/>
229cad7645SGreg Roach	<!-- Links to sources - required style name by the generator -->
239cad7645SGreg Roach	<Style name="footnotenum" font="$fonts" size="7"/>
249cad7645SGreg Roach	<!-- Generated by style - required style name by the generator -->
259cad7645SGreg Roach	<Style name="genby" font="$fonts" size="8" />
269cad7645SGreg Roach	<!-- Date text -->
279cad7645SGreg Roach	<Style name="date" font="$fonts" size="8"/>
289cad7645SGreg Roach	<Style name="subheader" font="$fonts" size="12" style="b" />
299cad7645SGreg Roach	<Style name="label1" font="$fonts" size="8"/>
309cad7645SGreg Roach	<Style name="label2" font="$fonts" size="10"/>
319cad7645SGreg Roach	<Style name="name" font="$fonts" size="9"/>
329cad7645SGreg Roach	<Style name="name1" font="$fonts" size="14"/>
339cad7645SGreg Roach
349cad7645SGreg Roach	<SetVar name="personNumber" value="1" />
359cad7645SGreg Roach	<SetVar name="childNumber" value="2" />
369cad7645SGreg Roach	<SetVar name="generation" value="0" />
379cad7645SGreg Roach	<!-- New Page for Sources controller if SOUR exist -->
389cad7645SGreg Roach	<SetVar name="source_exist" value="0" />
399cad7645SGreg Roach
409cad7645SGreg Roach	<Doc pageSize="$pageSize">
419cad7645SGreg Roach		<Header>
429cad7645SGreg Roach			<Cell align="center" height="30" newline="1" style="header"><var var="I18N::translate('Descendants of ')" /><GetPersonName id="$pid" /></Cell>
439cad7645SGreg Roach			<Cell align="rightrtl" newline="1" style="pagenum"><var var="I18N::translate('Page')" /> <PageNum /> <var var="I18N::translate('of')" /> <TotalPages /></Cell>
449cad7645SGreg Roach		</Header>
459cad7645SGreg Roach		<Body>
469cad7645SGreg Roach			<Relatives id="$pid" group="descendants" sortby="generation" maxgen="$maxgen">
479cad7645SGreg Roach				<SetVar name="showPerson" value="F" />
489cad7645SGreg Roach				<RepeatTag tag="FAMS">
499cad7645SGreg Roach					<Gedcom id="@FAMS:@CHIL">
509cad7645SGreg Roach						<SetVar name="showPerson" value="T" />
519cad7645SGreg Roach					</Gedcom>
529cad7645SGreg Roach				</RepeatTag>
539cad7645SGreg Roach				<if condition="$showPerson=='T'">
549cad7645SGreg Roach					<if condition="$generation!=@generation">
559cad7645SGreg Roach						<Cell align="center" height="20" newline="1" style="subheader"><var var="I18N::translate('Generation ')" /> <Generation /></Cell>
569cad7645SGreg Roach						<SetVar name="generation" value="@generation" />
579cad7645SGreg Roach					</if>
589cad7645SGreg Roach					<TextBox border="" width="25" height="40">
599cad7645SGreg Roach						<Text style="name"><var var="personNumber" />.</Text>
609cad7645SGreg Roach					</TextBox>
619cad7645SGreg Roach
629cad7645SGreg Roach					<TextBox border="" height="40" newline="1">
639cad7645SGreg Roach						<Text style="name"><GetPersonName id="" /> </Text>
64*e0dcab18SGreg Roach						<if condition="$sources=='on'">
659cad7645SGreg Roach							<!-- print level 1 sources -->
669cad7645SGreg Roach							<RepeatTag tag="SOUR">
679cad7645SGreg Roach								<Footnote>
689cad7645SGreg Roach									<Gedcom id="@SOUR">
699cad7645SGreg Roach										<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
709cad7645SGreg Roach										«<GedcomValue tag="TITL" />»
719cad7645SGreg Roach										<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
729cad7645SGreg Roach									</Gedcom>
739cad7645SGreg Roach									<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
749cad7645SGreg Roach									 <GedcomValue tag="SOUR:DATA:TEXT" />
759cad7645SGreg Roach								</Footnote>
769cad7645SGreg Roach								<SetVar name="source_exist" value="1"/>
779cad7645SGreg Roach							</RepeatTag>
789cad7645SGreg Roach							<!-- print level 2 sources attached to NAME -->
799cad7645SGreg Roach							<RepeatTag tag="NAME:SOUR">
809cad7645SGreg Roach								<Footnote>
819cad7645SGreg Roach									<Gedcom id="@SOUR">
829cad7645SGreg Roach										<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
839cad7645SGreg Roach										«<GedcomValue tag="TITL" />»
849cad7645SGreg Roach										<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
859cad7645SGreg Roach									</Gedcom>
869cad7645SGreg Roach									<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
879cad7645SGreg Roach									 <GedcomValue tag="SOUR:DATA:TEXT" />
889cad7645SGreg Roach								</Footnote>
899cad7645SGreg Roach								<SetVar name="source_exist" value="1" />
909cad7645SGreg Roach							</RepeatTag>
919cad7645SGreg Roach						</if>
929cad7645SGreg Roach						<SetVar name="printPeriod" value="false" />
939cad7645SGreg Roach						<SetVar name="gender" value="male" />
949cad7645SGreg Roach						<if condition="@SEX=='F'">
959cad7645SGreg Roach							<SetVar name="gender" value="female" />
969cad7645SGreg Roach						</if>
979cad7645SGreg Roach						<SetVar name="birtExists" value="false" />
989cad7645SGreg Roach						<Gedcom id="BIRT">
999cad7645SGreg Roach							<SetVar name="birtExists" value="true" />
1009cad7645SGreg Roach							<SetVar name="printPeriod" value="true" />
1019cad7645SGreg Roach							<if condition="$gender=='male'">
1029cad7645SGreg Roach								<Text style="label1"> <var var="I18N::translateContext('MALE', 'was born')" /> </Text>
1039cad7645SGreg Roach							</if>
1049cad7645SGreg Roach							<if condition="$gender=='female'">
1059cad7645SGreg Roach								<Text style="label1"> <var var="I18N::translateContext('FEMALE', 'was born')" /> </Text>
1069cad7645SGreg Roach							</if>
107*e0dcab18SGreg Roach							<if condition="$sources=='on'">
1089cad7645SGreg Roach								<RepeatTag tag="BIRT:SOUR">
1099cad7645SGreg Roach									<Footnote>
1109cad7645SGreg Roach										<Gedcom id="@SOUR">
1119cad7645SGreg Roach											<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
1129cad7645SGreg Roach											«<GedcomValue tag="TITL" />»
1139cad7645SGreg Roach											<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
1149cad7645SGreg Roach										</Gedcom>
1159cad7645SGreg Roach										<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
1169cad7645SGreg Roach										 <GedcomValue tag="SOUR:DATA:TEXT" />
1179cad7645SGreg Roach									</Footnote>
1189cad7645SGreg Roach									<SetVar name="source_exist" value="1"/>
1199cad7645SGreg Roach								</RepeatTag>
1209cad7645SGreg Roach							</if>
1219cad7645SGreg Roach							<if condition="@DATE!=''">
1229cad7645SGreg Roach								<Text style="label1"> <var var=" " /> <GedcomValue tag="DATE" level="2" /></Text>
1239cad7645SGreg Roach							</if>
1249cad7645SGreg Roach							<if condition="@PLAC!=''">
1259cad7645SGreg Roach								<Text style="label1"> <var var="I18N::translate(' in ')" /> <GedcomValue tag="PLAC" level="2" /></Text>
1269cad7645SGreg Roach							</if>
1279cad7645SGreg Roach						</Gedcom>
1289cad7645SGreg Roach						<Gedcom id="DEAT">
1299cad7645SGreg Roach							<SetVar name="printPeriod" value="true" />
1309cad7645SGreg Roach							<if condition="$birtExists=='true'">
1319cad7645SGreg Roach								<Text style="label1"> <var var="I18N::translate('and')" /></Text>
1329cad7645SGreg Roach							</if>
1339cad7645SGreg Roach							<if condition="$gender=='male'">
1349cad7645SGreg Roach								<Text style="label1"> <var var="I18N::translateContext('MALE', 'died')" /> </Text>
1359cad7645SGreg Roach							</if>
1369cad7645SGreg Roach							<if condition="$gender=='female'">
1379cad7645SGreg Roach								<Text style="label1"> <var var="I18N::translateContext('FEMALE', 'died')" /> </Text>
1389cad7645SGreg Roach							</if>
139*e0dcab18SGreg Roach							<if condition="$sources=='on'">
1409cad7645SGreg Roach								<RepeatTag tag="DEAT:SOUR">
1419cad7645SGreg Roach									<Footnote>
1429cad7645SGreg Roach										<Gedcom id="@SOUR">
1439cad7645SGreg Roach											<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
1449cad7645SGreg Roach											«<GedcomValue tag="TITL" />»
1459cad7645SGreg Roach											<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
1469cad7645SGreg Roach										</Gedcom>
1479cad7645SGreg Roach										<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
1489cad7645SGreg Roach										 <GedcomValue tag="SOUR:DATA:TEXT" />
1499cad7645SGreg Roach									</Footnote>
1509cad7645SGreg Roach									<SetVar name="source_exist" value="1"/>
1519cad7645SGreg Roach								</RepeatTag>
1529cad7645SGreg Roach							</if>
1539cad7645SGreg Roach							<if condition="@DATE!=''">
1549cad7645SGreg Roach								<Text style="label1"> <var var=" " /> <GedcomValue tag="DATE" level="2" /></Text>
1559cad7645SGreg Roach							</if>
1569cad7645SGreg Roach							<if condition="@PLAC!=''">
1579cad7645SGreg Roach								<Text style="label1"> <var var="I18N::translate(' in ')" /> <GedcomValue tag="PLAC" level="2" /></Text>
1589cad7645SGreg Roach							</if>
1599cad7645SGreg Roach						</Gedcom>
1609cad7645SGreg Roach						<SetVar name="printPronoun" value="false" />
1619cad7645SGreg Roach						<if condition="$printPeriod=='true'">
1629cad7645SGreg Roach							<Text style="label1">.</Text>
1639cad7645SGreg Roach							<SetVar name="printPronoun" value="true" />
1649cad7645SGreg Roach						</if>
1659cad7645SGreg Roach						<RepeatTag tag="FAMS">
1669cad7645SGreg Roach							<SetVar name="printPeriod" value="false" />
1679cad7645SGreg Roach							<Gedcom id="@FAMS">
1689cad7645SGreg Roach								<SetVar name="marrExists" value="false" />
1699cad7645SGreg Roach								<if condition="$gender=='male'">
1709cad7645SGreg Roach									<Gedcom id="MARR">
1719cad7645SGreg Roach										<SetVar name="marrExists" value="true" />
1729cad7645SGreg Roach										<if condition="$printPronoun=='true'" >
1739cad7645SGreg Roach											<Text style="label1">  <var var="I18N::translate('He married')" /> </Text>
1749cad7645SGreg Roach										</if>
1759cad7645SGreg Roach										<if condition="$printPronoun=='false'" >
1769cad7645SGreg Roach											<Text style="label1">  <var var="I18N::translateContext('MALE', 'married')" /> </Text>
1779cad7645SGreg Roach										</if>
1789cad7645SGreg Roach										<SetVar name="printPeriod" value="true" />
179*e0dcab18SGreg Roach										<if condition="$sources=='on'">
1809cad7645SGreg Roach											<RepeatTag tag="MARR:SOUR">
1819cad7645SGreg Roach												<Footnote>
1829cad7645SGreg Roach													<Gedcom id="@SOUR">
1839cad7645SGreg Roach														<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
1849cad7645SGreg Roach														«<GedcomValue tag="TITL" />»
1859cad7645SGreg Roach														<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
1869cad7645SGreg Roach													</Gedcom>
1879cad7645SGreg Roach													<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
1889cad7645SGreg Roach													 <GedcomValue tag="SOUR:DATA:TEXT" />
1899cad7645SGreg Roach												</Footnote>
1909cad7645SGreg Roach												<SetVar name="source_exist" value="1"/>
1919cad7645SGreg Roach											</RepeatTag>
1929cad7645SGreg Roach										</if>
1939cad7645SGreg Roach									</Gedcom>
1949cad7645SGreg Roach									<if condition="$marrExists=='true'">
1959cad7645SGreg Roach										<Gedcom id="@WIFE">
1969cad7645SGreg Roach											<Text style="name"> <GetPersonName id="" /> </Text>
197*e0dcab18SGreg Roach											<if condition="$sources=='on'">
1989cad7645SGreg Roach												<!-- print level 1 sources -->
1999cad7645SGreg Roach												<RepeatTag tag="SOUR">
2009cad7645SGreg Roach													<Footnote>
2019cad7645SGreg Roach														<Gedcom id="@SOUR">
2029cad7645SGreg Roach															<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
2039cad7645SGreg Roach															«<GedcomValue tag="TITL" />»
2049cad7645SGreg Roach															<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
2059cad7645SGreg Roach														</Gedcom>
2069cad7645SGreg Roach														<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
2079cad7645SGreg Roach														 <GedcomValue tag="SOUR:DATA:TEXT" />
2089cad7645SGreg Roach													</Footnote>
2099cad7645SGreg Roach													<SetVar name="source_exist" value="1"/>
2109cad7645SGreg Roach												</RepeatTag>
2119cad7645SGreg Roach												<!-- print level 2 sources attached to NAME -->
2129cad7645SGreg Roach												<RepeatTag tag="NAME:SOUR">
2139cad7645SGreg Roach													<Footnote>
2149cad7645SGreg Roach														<Gedcom id="@SOUR">
2159cad7645SGreg Roach															<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
2169cad7645SGreg Roach															«<GedcomValue tag="TITL" />»
2179cad7645SGreg Roach															<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
2189cad7645SGreg Roach														</Gedcom>
2199cad7645SGreg Roach														<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
2209cad7645SGreg Roach														 <GedcomValue tag="SOUR:DATA:TEXT" />
2219cad7645SGreg Roach													</Footnote>
2229cad7645SGreg Roach													<SetVar name="source_exist" value="1" />
2239cad7645SGreg Roach												</RepeatTag>
2249cad7645SGreg Roach											</if>
2259cad7645SGreg Roach											<Gedcom id="@FAMC">
2269cad7645SGreg Roach												<Text style="label1"> <var var="I18N::translate('daughter of')" /></Text>
2279cad7645SGreg Roach												<Text style="name"> <GetPersonName id="@HUSB" /> </Text>
2289cad7645SGreg Roach												<Gedcom id="@HUSB">
2299cad7645SGreg Roach													<Gedcom id="@FAMS:@WIFE">
2309cad7645SGreg Roach														<Text style="label1"> <var var="I18N::translate('and')" /></Text>
2319cad7645SGreg Roach													</Gedcom>
2329cad7645SGreg Roach												</Gedcom>
2339cad7645SGreg Roach												<Text style="name"> <GetPersonName id="@WIFE" /> </Text>
2349cad7645SGreg Roach											</Gedcom>
2359cad7645SGreg Roach										</Gedcom>
2369cad7645SGreg Roach									</if>
2379cad7645SGreg Roach								</if>
2389cad7645SGreg Roach								<if condition="$gender=='female'">
2399cad7645SGreg Roach									<Gedcom id="MARR">
2409cad7645SGreg Roach										<SetVar name="marrExists" value="true" />
2419cad7645SGreg Roach										<if condition="$printPronoun=='true'" >
2429cad7645SGreg Roach											<Text style="label1">  <var var="I18N::translate('She married')" /> </Text>
2439cad7645SGreg Roach										</if>
2449cad7645SGreg Roach										<if condition="$printPronoun=='false'" >
2459cad7645SGreg Roach											<Text style="label1"> <var var="I18N::translateContext('FEMALE', 'married')" /> </Text>
2469cad7645SGreg Roach										</if>
2479cad7645SGreg Roach										<SetVar name="printPeriod" value="true" />
248*e0dcab18SGreg Roach										<if condition="$sources=='on'">
2499cad7645SGreg Roach											<RepeatTag tag="MARR:SOUR">
2509cad7645SGreg Roach												<Footnote>
2519cad7645SGreg Roach													<Gedcom id="@SOUR">
2529cad7645SGreg Roach														<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
2539cad7645SGreg Roach														«<GedcomValue tag="TITL" />»
2549cad7645SGreg Roach														<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
2559cad7645SGreg Roach													</Gedcom>
2569cad7645SGreg Roach													<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
2579cad7645SGreg Roach													 <GedcomValue tag="SOUR:DATA:TEXT" />
2589cad7645SGreg Roach												</Footnote>
2599cad7645SGreg Roach												<SetVar name="source_exist" value="1"/>
2609cad7645SGreg Roach											</RepeatTag>
2619cad7645SGreg Roach										</if>
2629cad7645SGreg Roach									</Gedcom>
2639cad7645SGreg Roach									<if condition="$marrExists=='true'">
2649cad7645SGreg Roach										<Gedcom id="@HUSB">
2659cad7645SGreg Roach											<Text style="name"> <GetPersonName id="" /> </Text>
266*e0dcab18SGreg Roach											<if condition="$sources=='on'">
2679cad7645SGreg Roach												<!-- print level 1 sources -->
2689cad7645SGreg Roach												<RepeatTag tag="SOUR">
2699cad7645SGreg Roach													<Footnote>
2709cad7645SGreg Roach														<Gedcom id="@SOUR">
2719cad7645SGreg Roach															<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
2729cad7645SGreg Roach															«<GedcomValue tag="TITL" />»
2739cad7645SGreg Roach															<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
2749cad7645SGreg Roach														</Gedcom>
2759cad7645SGreg Roach														<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
2769cad7645SGreg Roach														 <GedcomValue tag="SOUR:DATA:TEXT" />
2779cad7645SGreg Roach													</Footnote>
2789cad7645SGreg Roach													<SetVar name="source_exist" value="1"/>
2799cad7645SGreg Roach												</RepeatTag>
2809cad7645SGreg Roach												<!-- print level 2 sources attached to NAME -->
2819cad7645SGreg Roach												<RepeatTag tag="NAME:SOUR">
2829cad7645SGreg Roach													<Footnote>
2839cad7645SGreg Roach														<Gedcom id="@SOUR">
2849cad7645SGreg Roach															<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
2859cad7645SGreg Roach															«<GedcomValue tag="TITL" />»
2869cad7645SGreg Roach															<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
2879cad7645SGreg Roach														</Gedcom>
2889cad7645SGreg Roach														<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
2899cad7645SGreg Roach														 <GedcomValue tag="SOUR:DATA:TEXT" />
2909cad7645SGreg Roach													</Footnote>
2919cad7645SGreg Roach													<SetVar name="source_exist" value="1" />
2929cad7645SGreg Roach												</RepeatTag>
2939cad7645SGreg Roach											</if>
2949cad7645SGreg Roach											<Gedcom id="@FAMC">
2959cad7645SGreg Roach												<Text style="label1"> <var var="I18N::translate('son of')" /></Text>
2969cad7645SGreg Roach												<Text style="name"> <GetPersonName id="@HUSB" /></Text>
2979cad7645SGreg Roach												<Gedcom id="@HUSB">
2989cad7645SGreg Roach													<Gedcom id="@FAMS:@WIFE">
2999cad7645SGreg Roach														<Text style="label1"> <var var="I18N::translate('and')" /></Text>
3009cad7645SGreg Roach													</Gedcom>
3019cad7645SGreg Roach												</Gedcom>
3029cad7645SGreg Roach												<Text style="name"> <GetPersonName id="@WIFE" /></Text>
3039cad7645SGreg Roach											</Gedcom>
3049cad7645SGreg Roach										</Gedcom>
3059cad7645SGreg Roach									</if>
3069cad7645SGreg Roach								</if>
3079cad7645SGreg Roach								<Gedcom id="MARR">
3089cad7645SGreg Roach									<Text style="label1"> <var var=" " /></Text>
3099cad7645SGreg Roach									<if condition="@DATE!=''">
3109cad7645SGreg Roach										<SetVar name="printPeriod" value="true" />
3119cad7645SGreg Roach										<Text style="label1"> <var var=" " /> <GedcomValue tag="DATE" level="2"/></Text>
3129cad7645SGreg Roach									</if>
3139cad7645SGreg Roach									<if condition="@PLAC!=''">
3149cad7645SGreg Roach										<SetVar name="printPeriod" value="true" />
3159cad7645SGreg Roach										<Text style="label1"> <var var="I18N::translate(' in ')" /> <GedcomValue tag="PLAC" level="2"/></Text>
3169cad7645SGreg Roach									</if>
3179cad7645SGreg Roach								</Gedcom>
3189cad7645SGreg Roach								<if condition="$printPeriod=='true'">
3199cad7645SGreg Roach									<Text style="label1">.</Text>
3209cad7645SGreg Roach									<SetVar name="printPronoun" value="true" />
3219cad7645SGreg Roach								</if>
3229cad7645SGreg Roach								<if condition="$marrExists=='true'">
3239cad7645SGreg Roach									<if condition="$gender=='male'">
3249cad7645SGreg Roach										<Gedcom id="@WIFE">
3259cad7645SGreg Roach											<SetVar name="printPeriod" value="false" />
3269cad7645SGreg Roach											<SetVar name="birtExist" value="false" />
3279cad7645SGreg Roach											<SetVar name="printPronoun" value="true" />
3289cad7645SGreg Roach											<Gedcom id="BIRT">
3299cad7645SGreg Roach												<if condition="$printPronoun=='true'">
3309cad7645SGreg Roach													<SetVar name="printPeriod" value="true" />
3319cad7645SGreg Roach													<Text style="label1">  <var var="I18N::translate('She was born')" /></Text>
3329cad7645SGreg Roach													<SetVar name="printPronoun" value="false" />
3339cad7645SGreg Roach												</if>
3349cad7645SGreg Roach												<SetVar name="birtExist" value="true" />
335*e0dcab18SGreg Roach												<if condition="$sources=='on'">
3369cad7645SGreg Roach													<RepeatTag tag="BIRT:SOUR">
3379cad7645SGreg Roach														<Footnote>
3389cad7645SGreg Roach															<Gedcom id="@SOUR">
3399cad7645SGreg Roach																<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
3409cad7645SGreg Roach																«<GedcomValue tag="TITL" />»
3419cad7645SGreg Roach																<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
3429cad7645SGreg Roach															</Gedcom>
3439cad7645SGreg Roach															<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
3449cad7645SGreg Roach															 <GedcomValue tag="SOUR:DATA:TEXT" />
3459cad7645SGreg Roach														</Footnote>
3469cad7645SGreg Roach														<SetVar name="source_exist" value="1"/>
3479cad7645SGreg Roach													</RepeatTag>
3489cad7645SGreg Roach												</if>
3499cad7645SGreg Roach												<if condition="@DATE!=''">
3509cad7645SGreg Roach													<Text style="label1"> <var var=" " /> <GedcomValue tag="DATE" level="2" /></Text>
3519cad7645SGreg Roach												</if>
3529cad7645SGreg Roach												<if condition="@PLAC!=''">
3539cad7645SGreg Roach													<Text style="label1"> <var var="I18N::translate(' in ')" /> <GedcomValue tag="PLAC" level="2" /></Text>
3549cad7645SGreg Roach												</if>
3559cad7645SGreg Roach											</Gedcom>
3569cad7645SGreg Roach											<Gedcom id="DEAT">
3579cad7645SGreg Roach												<if condition="$printPronoun=='true'">
3589cad7645SGreg Roach													<Text style="label1">  <var var="I18N::translate('She ')" /></Text>
3599cad7645SGreg Roach													<SetVar name="printPronoun" value="false" />
3609cad7645SGreg Roach												</if>
3619cad7645SGreg Roach												<SetVar name="printPeriod" value="true" />
3629cad7645SGreg Roach												<if condition="$birtExist=='true'">
3639cad7645SGreg Roach													<Text style="label1"> <var var="I18N::translate('and')" /></Text>
3649cad7645SGreg Roach												</if>
3659cad7645SGreg Roach												<Text style="label1"> <var var="I18N::translateContext('FEMALE', 'died')" /> </Text>
366*e0dcab18SGreg Roach												<if condition="$sources=='on'">
3679cad7645SGreg Roach													<RepeatTag tag="DEAT:SOUR">
3689cad7645SGreg Roach														<Footnote>
3699cad7645SGreg Roach															<Gedcom id="@SOUR">
3709cad7645SGreg Roach																<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
3719cad7645SGreg Roach																«<GedcomValue tag="TITL" />»
3729cad7645SGreg Roach																<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
3739cad7645SGreg Roach															</Gedcom>
3749cad7645SGreg Roach															<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
3759cad7645SGreg Roach															 <GedcomValue tag="SOUR:DATA:TEXT" />
3769cad7645SGreg Roach														</Footnote>
3779cad7645SGreg Roach														<SetVar name="source_exist" value="1"/>
3789cad7645SGreg Roach													</RepeatTag>
3799cad7645SGreg Roach												</if>
3809cad7645SGreg Roach												<if condition="@DATE!=''">
3819cad7645SGreg Roach													<Text style="label1"> <var var=" " /> <GedcomValue tag="DATE" level="2" /></Text>
3829cad7645SGreg Roach												</if>
3839cad7645SGreg Roach												<if condition="@PLAC!=''">
3849cad7645SGreg Roach													<Text style="label1"> <var var="I18N::translate(' in ')" /> <GedcomValue tag="PLAC" level="2" /></Text>
3859cad7645SGreg Roach												</if>
3869cad7645SGreg Roach											</Gedcom>
3879cad7645SGreg Roach											<if condition="$printPeriod=='true'">
3889cad7645SGreg Roach												<Text style="label1">.</Text>
3899cad7645SGreg Roach												<SetVar name="printPronoun" value="true" />
3909cad7645SGreg Roach											</if>
3919cad7645SGreg Roach										</Gedcom>
3929cad7645SGreg Roach									</if>
3939cad7645SGreg Roach									<if condition="$gender=='female'">
3949cad7645SGreg Roach										<Gedcom id="@HUSB">
3959cad7645SGreg Roach											<SetVar name="printPronoun" value="true" />
3969cad7645SGreg Roach											<SetVar name="printPeriod" value="false" />
3979cad7645SGreg Roach											<SetVar name="birtExist" value="false" />
3989cad7645SGreg Roach											<Gedcom id="BIRT">
3999cad7645SGreg Roach												<SetVar name="printPeriod" value="true" />
4009cad7645SGreg Roach												<if condition="$printPronoun=='true'">
4019cad7645SGreg Roach													<Text style="label1">  <var var="I18N::translate('He was born')" /></Text>
4029cad7645SGreg Roach													<SetVar name="printPronoun" value="false" />
4039cad7645SGreg Roach												</if>
4049cad7645SGreg Roach												<SetVar name="birtExist" value="true" />
405*e0dcab18SGreg Roach												<if condition="$sources=='on'">
4069cad7645SGreg Roach													<RepeatTag tag="BIRT:SOUR">
4079cad7645SGreg Roach														<Footnote>
4089cad7645SGreg Roach															<Gedcom id="@SOUR">
4099cad7645SGreg Roach																<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
4109cad7645SGreg Roach																«<GedcomValue tag="TITL" />»
4119cad7645SGreg Roach																<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
4129cad7645SGreg Roach															</Gedcom>
4139cad7645SGreg Roach															<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
4149cad7645SGreg Roach															 <GedcomValue tag="SOUR:DATA:TEXT" />
4159cad7645SGreg Roach														</Footnote>
4169cad7645SGreg Roach														<SetVar name="source_exist" value="1"/>
4179cad7645SGreg Roach													</RepeatTag>
4189cad7645SGreg Roach												</if>
4199cad7645SGreg Roach												<if condition="@DATE!=''">
4209cad7645SGreg Roach													<Text style="label1"> <var var=" " /> <GedcomValue tag="DATE" level="2" /></Text>
4219cad7645SGreg Roach												</if>
4229cad7645SGreg Roach												<if condition="@PLAC!=''">
4239cad7645SGreg Roach													<Text style="label1"> <var var="I18N::translate(' in ')" /> <GedcomValue tag="PLAC" level="2" /></Text>
4249cad7645SGreg Roach												</if>
4259cad7645SGreg Roach											</Gedcom>
4269cad7645SGreg Roach											<Gedcom id="DEAT">
4279cad7645SGreg Roach												<if condition="$printPronoun=='true'">
4289cad7645SGreg Roach													<Text style="label1">  <var var="I18N::translate('He ')" /></Text>
4299cad7645SGreg Roach													<SetVar name="printPronoun" value="true" />
4309cad7645SGreg Roach												</if>
4319cad7645SGreg Roach												<SetVar name="printPeriod" value="true" />
4329cad7645SGreg Roach												<if condition="$birtExist=='true'">
4339cad7645SGreg Roach													<Text style="label1"> <var var="I18N::translate('and')" /></Text>
4349cad7645SGreg Roach												</if>
4359cad7645SGreg Roach												<Text style="label1"> <var var="I18N::translateContext('MALE', 'died')" /> </Text>
436*e0dcab18SGreg Roach												<if condition="$sources=='on'">
4379cad7645SGreg Roach													<RepeatTag tag="DEAT:SOUR">
4389cad7645SGreg Roach														<Footnote>
4399cad7645SGreg Roach															<Gedcom id="@SOUR">
4409cad7645SGreg Roach																<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
4419cad7645SGreg Roach																«<GedcomValue tag="TITL" />»
4429cad7645SGreg Roach																<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
4439cad7645SGreg Roach															</Gedcom>
4449cad7645SGreg Roach															<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
4459cad7645SGreg Roach															 <GedcomValue tag="SOUR:DATA:TEXT" />
4469cad7645SGreg Roach														</Footnote>
4479cad7645SGreg Roach														<SetVar name="source_exist" value="1"/>
4489cad7645SGreg Roach													</RepeatTag>
4499cad7645SGreg Roach												</if>
4509cad7645SGreg Roach												<if condition="@DATE!=''">
4519cad7645SGreg Roach													<Text style="label1"> <var var=" " /> <GedcomValue tag="DATE" level="2" /></Text>
4529cad7645SGreg Roach												</if>
4539cad7645SGreg Roach												<if condition="@PLAC!=''">
4549cad7645SGreg Roach													<Text style="label1"> <var var="I18N::translate(' in ')" /> <GedcomValue tag="PLAC" level="2" /></Text>
4559cad7645SGreg Roach												</if>
4569cad7645SGreg Roach											</Gedcom>
4579cad7645SGreg Roach											<if condition="$printPeriod=='true'">
4589cad7645SGreg Roach												<Text style="label1">.</Text>
4599cad7645SGreg Roach												<SetVar name="printPronoun" value="true" />
4609cad7645SGreg Roach											</if>
4619cad7645SGreg Roach										</Gedcom>
4629cad7645SGreg Roach									</if>
4639cad7645SGreg Roach								</if>
4649cad7645SGreg Roach							</Gedcom>
4659cad7645SGreg Roach						</RepeatTag>
4669cad7645SGreg Roach					</TextBox>
4679cad7645SGreg Roach
4689cad7645SGreg Roach					<RepeatTag tag="FAMS">
4699cad7645SGreg Roach						<Gedcom id="@FAMS">
4709cad7645SGreg Roach							<if condition="@CHIL!=''">
4719cad7645SGreg Roach								<SetVar name="numberOfChildren" value="0" />
4729cad7645SGreg Roach								<RepeatTag tag="CHIL">
4739cad7645SGreg Roach									<Gedcom id="@CHIL">
4749cad7645SGreg Roach										<SetVar name="numberOfChildren" value="$numberOfChildren+1" />
4759cad7645SGreg Roach									</Gedcom>
4769cad7645SGreg Roach								</RepeatTag>
4779cad7645SGreg Roach
4789cad7645SGreg Roach								<TextBox height="20" left="25" newline="1">
4799cad7645SGreg Roach									<if condition="$numberOfChildren==1">
4809cad7645SGreg Roach										<Text style="label1"><var var="I18N::translate('Child of ')" /></Text>
4819cad7645SGreg Roach									</if>
4829cad7645SGreg Roach									<if condition="$numberOfChildren>1">
4839cad7645SGreg Roach										<Text style="label1"><var var="I18N::translate('Children of ')" /></Text>
4849cad7645SGreg Roach									</if>
4859cad7645SGreg Roach									<Text style="name"><GetPersonName id="@HUSB" /></Text>
4869cad7645SGreg Roach									<Text style="label1"> <var var="I18N::translate('and')" /> </Text>
4879cad7645SGreg Roach									<Text style="name"><GetPersonName id="@WIFE" /></Text>
4889cad7645SGreg Roach									<Text style="label1">:</Text>
4899cad7645SGreg Roach								</TextBox>
4909cad7645SGreg Roach
4919cad7645SGreg Roach								<SetVar name="familyChildNumber" value ="1" />
4929cad7645SGreg Roach								<RepeatTag tag="CHIL">
4939cad7645SGreg Roach									<Gedcom id="@CHIL">
4949cad7645SGreg Roach										<if condition="$familyChildNumber==1"><SetVar name="familyChildRoman" value="i" /></if>
4959cad7645SGreg Roach										<if condition="$familyChildNumber==2"><SetVar name="familyChildRoman" value="ii" /></if>
4969cad7645SGreg Roach										<if condition="$familyChildNumber==3"><SetVar name="familyChildRoman" value="iii" /></if>
4979cad7645SGreg Roach										<if condition="$familyChildNumber==4"><SetVar name="familyChildRoman" value="iv" /></if>
4989cad7645SGreg Roach										<if condition="$familyChildNumber==5"><SetVar name="familyChildRoman" value="v" /></if>
4999cad7645SGreg Roach										<if condition="$familyChildNumber==6"><SetVar name="familyChildRoman" value="vi" /></if>
5009cad7645SGreg Roach										<if condition="$familyChildNumber==7"><SetVar name="familyChildRoman" value="vii" /></if>
5019cad7645SGreg Roach										<if condition="$familyChildNumber==8"><SetVar name="familyChildRoman" value="viii" /></if>
5029cad7645SGreg Roach										<if condition="$familyChildNumber==9"><SetVar name="familyChildRoman" value="ix" /></if>
5039cad7645SGreg Roach										<if condition="$familyChildNumber==10"><SetVar name="familyChildRoman" value="x" /></if>
5049cad7645SGreg Roach										<if condition="$familyChildNumber==11"><SetVar name="familyChildRoman" value="xi" /></if>
5059cad7645SGreg Roach										<if condition="$familyChildNumber==12"><SetVar name="familyChildRoman" value="xii" /></if>
5069cad7645SGreg Roach										<if condition="$familyChildNumber==13"><SetVar name="familyChildRoman" value="xiii" /></if>
5079cad7645SGreg Roach										<if condition="$familyChildNumber==14"><SetVar name="familyChildRoman" value="xiv" /></if>
5089cad7645SGreg Roach										<if condition="$familyChildNumber==15"><SetVar name="familyChildRoman" value="xv" /></if>
5099cad7645SGreg Roach										<if condition="$familyChildNumber==16"><SetVar name="familyChildRoman" value="xvi" /></if>
5109cad7645SGreg Roach										<if condition="$familyChildNumber==17"><SetVar name="familyChildRoman" value="xvii" /></if>
5119cad7645SGreg Roach										<if condition="$familyChildNumber==18"><SetVar name="familyChildRoman" value="xviii" /></if>
5129cad7645SGreg Roach										<if condition="$familyChildNumber==19"><SetVar name="familyChildRoman" value="xix" /></if>
5139cad7645SGreg Roach										<if condition="$familyChildNumber==20"><SetVar name="familyChildRoman" value="xx" /></if>
5149cad7645SGreg Roach										<SetVar name="showChildNumber" value="false" />
5159cad7645SGreg Roach										<RepeatTag tag="FAMS">
5169cad7645SGreg Roach											<Gedcom id="@FAMS:@CHIL">
5179cad7645SGreg Roach												<SetVar name="showChildNumber" value="true" />
5189cad7645SGreg Roach											</Gedcom>
5199cad7645SGreg Roach										</RepeatTag>
5209cad7645SGreg Roach										<TextBox left="25" height="20" width="25">
5219cad7645SGreg Roach											<if condition="$showChildNumber=='true'">
5229cad7645SGreg Roach												<Text style="name"><var var="childNumber" />.</Text>
5239cad7645SGreg Roach												<SetVar name="childNumber" value="$childNumber + 1" />
5249cad7645SGreg Roach											</if>
5259cad7645SGreg Roach										</TextBox>
5269cad7645SGreg Roach
5279cad7645SGreg Roach										<TextBox height="20" newline="1">
5289cad7645SGreg Roach											<Text style="label1"><var var="familyChildRoman" /></Text>
5299cad7645SGreg Roach											<Text style="name">  <GetPersonName id="" /> </Text>
530*e0dcab18SGreg Roach											<if condition="$sources=='on'">
5319cad7645SGreg Roach												<!-- print level 1 sources -->
5329cad7645SGreg Roach												<RepeatTag tag="SOUR">
5339cad7645SGreg Roach													<Footnote>
5349cad7645SGreg Roach														<Gedcom id="@SOUR">
5359cad7645SGreg Roach															<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
5369cad7645SGreg Roach															«<GedcomValue tag="TITL" />»
5379cad7645SGreg Roach															<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
5389cad7645SGreg Roach														</Gedcom>
5399cad7645SGreg Roach														<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
5409cad7645SGreg Roach														 <GedcomValue tag="SOUR:DATA:TEXT" />
5419cad7645SGreg Roach													</Footnote>
5429cad7645SGreg Roach													<SetVar name="source_exist" value="1"/>
5439cad7645SGreg Roach												</RepeatTag>
5449cad7645SGreg Roach												<!-- print level 2 sources attached to NAME -->
5459cad7645SGreg Roach												<RepeatTag tag="NAME:SOUR">
5469cad7645SGreg Roach													<Footnote>
5479cad7645SGreg Roach														<Gedcom id="@SOUR">
5489cad7645SGreg Roach															<if condition="@AUTH!=''"><GedcomValue tag="AUTH" />, </if>
5499cad7645SGreg Roach															«<GedcomValue tag="TITL" />»
5509cad7645SGreg Roach															<if condition="@PUBL!=''"> (<GedcomValue tag="PUBL" />)</if>
5519cad7645SGreg Roach														</Gedcom>
5529cad7645SGreg Roach														<if condition="@PAGE!=''">: <GedcomValue tag="SOUR:PAGE" /></if>
5539cad7645SGreg Roach														 <GedcomValue tag="SOUR:DATA:TEXT" />
5549cad7645SGreg Roach													</Footnote>
5559cad7645SGreg Roach													<SetVar name="source_exist" value="1" />
5569cad7645SGreg Roach												</RepeatTag>
5579cad7645SGreg Roach												<Text style="label1"> </Text>
5589cad7645SGreg Roach											</if>
5599cad7645SGreg Roach											<Gedcom id="BIRT">
5609cad7645SGreg Roach												<Text style="label1"> <var var="I18N::translate('Birth')" />: <GedcomValue tag="DATE" level="2"/>  <GedcomValue tag="PLAC" level="2"/></Text>
5619cad7645SGreg Roach											</Gedcom>
5629cad7645SGreg Roach											<SetVar name="showMarraige" value="T" />
5639cad7645SGreg Roach											<RepeatTag tag="FAMS">
5649cad7645SGreg Roach												<Gedcom id="@FAMS:@CHIL">
5659cad7645SGreg Roach												<SetVar name="showMarraige" value="F" />
5669cad7645SGreg Roach												</Gedcom>
5679cad7645SGreg Roach											</RepeatTag>
5689cad7645SGreg Roach											<if condition="$showMarraige=='T'">
5699cad7645SGreg Roach												<SetVar name="gender" value="male" />
5709cad7645SGreg Roach												<if condition="@SEX=='F'">
5719cad7645SGreg Roach													<SetVar name="gender" value="female" />
5729cad7645SGreg Roach												</if>
5739cad7645SGreg Roach												<RepeatTag tag="FAMS">
5749cad7645SGreg Roach													<Gedcom id="@FAMS">
5759cad7645SGreg Roach														<Text style="label1"> <var var="I18N::translate('Marriage')" />: </Text>
5769cad7645SGreg Roach														<if condition="$gender=='male'">
5779cad7645SGreg Roach															<Text style="name"><GetPersonName id="@WIFE" /></Text>
5789cad7645SGreg Roach														</if>
5799cad7645SGreg Roach														<if condition="$gender=='female'">
5809cad7645SGreg Roach															<Text style="name"><GetPersonName id="@HUSB" /></Text>
5819cad7645SGreg Roach														</if>
5829cad7645SGreg Roach														<Gedcom id="MARR">
5839cad7645SGreg Roach															<if condition="@DATE!=''">
5849cad7645SGreg Roach																<Text style="label1">, <GedcomValue tag="DATE" level="2" /></Text>
5859cad7645SGreg Roach															</if>
5869cad7645SGreg Roach															<if condition="@PLAC!=''">
5879cad7645SGreg Roach																<Text style="label1">, <GedcomValue tag="PLAC" level="2" /></Text>
5889cad7645SGreg Roach															</if>
5899cad7645SGreg Roach														</Gedcom>
5909cad7645SGreg Roach													</Gedcom>
5919cad7645SGreg Roach												</RepeatTag>
5929cad7645SGreg Roach											</if>
5939cad7645SGreg Roach											<Gedcom id="DEAT">
5949cad7645SGreg Roach												<Text style="label1"> <var var="I18N::translate('Death')" />: <GedcomValue tag="DATE" level="2"/> <GedcomValue tag="PLAC" level="2"/></Text>
5959cad7645SGreg Roach											</Gedcom>
5969cad7645SGreg Roach										</TextBox>
5979cad7645SGreg Roach									</Gedcom>
5989cad7645SGreg Roach									<SetVar name="familyChildNumber" value="$familyChildNumber+1" />
5999cad7645SGreg Roach								</RepeatTag>
6009cad7645SGreg Roach							</if>
6019cad7645SGreg Roach						</Gedcom>
6029cad7645SGreg Roach					</RepeatTag>
6039cad7645SGreg Roach					<SetVar name="personNumber" value="$personNumber + 1" />
6049cad7645SGreg Roach					<TextBox height="10" newline="1" padding="0"/>
6059cad7645SGreg Roach				</if>
6069cad7645SGreg Roach			</Relatives>
6079cad7645SGreg Roach			<!-- if the sources were on, print the source citations as footnotes -->
6089cad7645SGreg Roach			<if condition="$source_exist==1">
6099cad7645SGreg Roach				<NewPage/>
6109cad7645SGreg Roach				<TextBox newline="1">
6119cad7645SGreg Roach					<Text style="subheader"><var var="I18N::translate('Sources')" /><br /><br /></Text>
6129cad7645SGreg Roach					<FootnoteTexts />
6139cad7645SGreg Roach				</TextBox>
6149cad7645SGreg Roach			</if>
6159cad7645SGreg Roach		</Body>
6169cad7645SGreg Roach		<Footer>
6179cad7645SGreg Roach			<Cell align="rightrtl" newline="1" style="date"><Now /></Cell>
6189cad7645SGreg Roach		</Footer>
6199cad7645SGreg Roach	</Doc>
6209cad7645SGreg Roach</Report>
621