| @@ 1627-1637 (lines=11) @@ | ||
| 1624 | $newgedrec .= "\n1 ABBR " . $ABBR; |
|
| 1625 | } |
|
| 1626 | $TITL = Filter::post('TITL'); |
|
| 1627 | if ($TITL) { |
|
| 1628 | $newgedrec .= "\n1 TITL " . $TITL; |
|
| 1629 | $_HEB = Filter::post('_HEB'); |
|
| 1630 | if ($_HEB) { |
|
| 1631 | $newgedrec .= "\n2 _HEB " . $_HEB; |
|
| 1632 | } |
|
| 1633 | $ROMN = Filter::post('ROMN'); |
|
| 1634 | if ($ROMN) { |
|
| 1635 | $newgedrec .= "\n2 ROMN " . $ROMN; |
|
| 1636 | } |
|
| 1637 | } |
|
| 1638 | $AUTH = Filter::post('AUTH'); |
|
| 1639 | if ($AUTH) { |
|
| 1640 | $newgedrec .= "\n1 AUTH " . $AUTH; |
|
| @@ 1932-1942 (lines=11) @@ | ||
| 1929 | ||
| 1930 | $gedrec = '0 @XREF@ REPO'; |
|
| 1931 | $REPO_NAME = Filter::post('REPO_NAME'); |
|
| 1932 | if ($REPO_NAME) { |
|
| 1933 | $gedrec .= "\n1 NAME " . $REPO_NAME; |
|
| 1934 | $_HEB = Filter::post('_HEB'); |
|
| 1935 | if ($_HEB) { |
|
| 1936 | $gedrec .= "\n2 _HEB " . $_HEB; |
|
| 1937 | } |
|
| 1938 | $ROMN = Filter::post('ROMN'); |
|
| 1939 | if ($ROMN) { |
|
| 1940 | $gedrec .= "\n2 ROMN " . $ROMN; |
|
| 1941 | } |
|
| 1942 | } |
|
| 1943 | $ADDR = Filter::post('ADDR'); |
|
| 1944 | if ($ADDR) { |
|
| 1945 | $gedrec .= "\n1 ADDR " . preg_replace('/\r?\n/', "\n2 CONT ", $ADDR); |
|