This is a multi-part message in MIME format. --------------000103010406010809090505 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit I wasn't thinking clearly when I sent this off. I had intended to send it to the list. --------------000103010406010809090505 Content-Type: message/rfc822; name="Re: [PAF-5] A suspisious offer" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="Re: [PAF-5] A suspisious offer" Message-ID: <420C28D5.5070504@infowest.com> Date: Thu, 10 Feb 2005 20:39:01 -0700 From: Lorin Lund <wbs@infowest.com> User-Agent: Mozilla Thunderbird 0.9 (Windows/20041103) X-Accept-Language: en-us, en MIME-Version: 1.0 To: ilyaz@earthlink.net Subject: Re: [PAF-5] A suspisious offer References: <007901c50bc0$ce9ae050$6501a8c0@ILYA9FS1DPRI1B> In-Reply-To: <007901c50bc0$ce9ae050$6501a8c0@ILYA9FS1DPRI1B> Content-Type: multipart/mixed; boundary="------------010209060805000907030805" This is a multi-part message in MIME format. --------------010209060805000907030805 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit ilyaz@earthlink.net wrote: >Recently, I posted a question on this board. Yesterday, a person (no name) using email address wbs@infowest.com offered to solve my problem. Here's his message: > > <I am a computer programmer with experience in reading .paf files. (I am registered with the PAF development group of the LDS Church. I.E. I have signed the necessary > papers so they allow me a copy of the parts of PAF that access the file.) > > Which order have you decided to standardize on surname first or surname last? > > It will be much easier for me if you send me a copy of your data. (Rather than me trying to send you a program that you would have to install and run.)> > >This offer sounds like phishing to me. I did not send my file to him. Does anyone on this board know this person? Unless someone from the PAF Development will vouch for him, I'd be very careful... > >Ilya Zeldes >Fort Myers, Florida > > >==== PAF-5-USERS Mailing List ==== >Having trouble with the software? Check PAF 5.x Information >http://www.ausbdm.org/p5uinfo.php > > I do most of my ad hoc projects in a computer language called 'J'. (see http://www.Jsoftware.com) It is an interpreted language so you will have to download and install the language software in order to run the attached J script. I do my ad hoc genealogy projects in GEDCOM rather than directly in PAF for several reasons. One of which is so I can view the results directly with any text editor. I consider this program a 'first draft' because I can't program for NSFX and NPFX tags until I see if you have any and how they would relate to an change of order. This version of the program deals with those cases by logging them to a problem file. It did a good job of re-ordering names in the several data-sets I tried as long as there wasn't any name prefixes or suffixes. But because I'm working with GEDCOM it would be well for you to first verify that nothing is lost in the process of exporting to GEDCOM and importing that back into a new, empty PAF file. I have found that you can enter a date range in PAF that will not be accurately represented when exporting to GEDCOM. My brother-in-law's data has some dates which PAF displays as 4/9 Apr/May 1896. I think the person who put this in was trying to represent a time period or alternate dates of 4 Apr 1896/9 May 1896. In any event when you export this particular date format to GEDCOM you lose some of the information. So I devised a test for data changes in the export/import process. The first step is to make a copy of your PAF file. You could call it TEST1.PAF. Then export everything to a GEDCOM let's call it TEST1.GED. Now import TEST1.GED into TEST1.PAF. >>>> Make sure you are in TEST1.PAF when you do the import and not in your regular PAF file <<<< Once the import is complete you should have 2 records for each individual, 2 for each marriage ... everything duplicated. Now go to Tools|Match/Merge. PAF will invite you to do a back-up before merging but since this is the test file that shouldn't be important. Next you will see a Match/Merge Options box. Under matching choose 'Unique record serial numbers'. Under Merge select everything but the last. You don't want confirm on merge. When you click OK on the Options screen it should go away leaving you looking at the Match Individuals box. You need to click on 'Next Match' once to get the automerge started. Since you have 2 copies of each record, and since they should all be identical Automerge should run through all the records in the test database and end up displaying a little box with the total count of individuals merged. If it flickers for a while and then stops without showing the count then you have two records that should be identical but aren't. That means we might have a problem. If you don't have any problem then you can delete TEST1.PAF. Test1.GED is what will be read by my little J program. The program I sent you is a J script. It does not run on its own. You have to have the J language installed to run it. You can obtain it for free from http://www.JSoftware.com. Download and install version 5.03a. Save the script that I have sent as an attachment in C:\j503a\user. Now start J (you should have a blue 'J' icon on your desktop after installing J). Then click on Run|File and navigate to C:\J503a\user\surname_order. When it runs it should present a small window with a File menu, some radio buttons for selecting the order you want the result to be in, and an OK and Cancel button. First open Test1.GED using File|Open. Then select the order you want the names re-ordered to, then click OK. The program will then pop up a message telling you that it needs an output file name. Click OK to get rid of that and then you will get a Save dialog box in which to enter the output filename. You could call it Test2.ged. Now, as I said, this is a first draft of the program. It only re-orders names that don't have NSFX or NPFX tags in the GEDCOM file. I thought I would need to get a look at what those cases look like before I can extend the program to handle them. When the program runs, if it finds any of those kinds of names it will create a log file called 'hardnames' in C:\J503a\temp. If these names are already in the order you want then there is no problem. The 'hardnames' file is a plain text file. It can be viewed with notepad or wordpad or any word processor. If there are names there that aren't in the order you want then either 1) you will have to change those by hand after the new PAF file is created or 2) you send me the 'hardnames' file and I extend the program to handle those cases and send you a new, improved J script and you run through the export and rerun process again. Once the program is run you can create a new PAF file and import TEST2.GED into it. When I asked for you to send me your data I was just thinking that it would be altogether simpler for you to just send me your data. I would do the test and the export and run the program and create the new PAF file and then I would send the new PAF file back to you. That offer still stands. If you decide to send me a copy of your data I will not use it for any other purpose. Just patch it up, send it back to you, and delete it from my computer. --------------010209060805000907030805 Content-Type: text/plain; name="surname_order.ijs" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="surname_order.ijs" NB. --------------------------------------------------------- NB. For setting the name order in a PAF5 GEDCOM NB. --------------------------------------------------------- fn =: '' load 'files' load 'regex' main =: 3 : 0 Surlast =: ". Surlast wdinfo 'We''ll need a filename to write to: ' fn2 =: wd 'mbsave "Filename and path to save to: " "" "*.ged"' aa =. fread fn fret =. LF,'0 ' bb =. (#aa){. 1,fret E. aa D =: ; t1 each bb <;.1 aa D fwrite fn2 ) t1 =: 3 : 0 if. +/ ' INDI' E. y. do. fr =. LF,'1 ' bb =. _1}.1,fr E. y. R =: ; t2 each bb <;.1 y. else. y. return. end. ) t2 =: 3 : 0 Y2 =: y. if. '1 NAME' -: 6{. y. do. NAME =: '' SURN =: '' GIVN =: '' NSFX =: '' NPFX =: '' b =. ; t3 each <;.2 y. if. #NSFX,NPFX do. lognogo y. y. return. end. tmplt =. (SURN;'SURN') rxrplc (GIVN;'GIVN') rxrplc NAME tmplt =. ('^ +';'') rxrplc (' +$';'') rxrplc tmplt tmplt2 =. (' *';' ') rxrplc tmplt while. 0 = tmplt2 -: tmplt do. tmplt =. tmplt2 tmplt2 =. (' *';' ') rxrplc tmplt end. GIVN =: ('^, ';'') rxrplc GIVN select. tmplt2 case. 'GIVN /SURN/' do. if. Surlast do. y. return. else. '1 NAME /',SURN,'/ ',GIVN,LF,b return. end. case. '/SURN/ GIVN' do. if. Surlast do. '1 NAME ',GIVN,' /',SURN,'/',LF,b return. else. y. return. end. end. else. y. return. end. ) t3 =: 3 : 0 Y3 =: y. if. '1 NAME ' -: 7{. y. do. NAME =: 7}. y. -. CRLF '' return. elseif. '2 SURN ' -: 7{. y. do. SURN =: 7}. y. -. CRLF elseif. '2 GIVN ' -: 7{. y. do. GIVN =: 7}. y. -. CRLF elseif. '2 NSFX ' -: 7{. y. do. NSFX =: 7}. y. -. CRLF elseif. '2 NPFX ' -: 7{. y. do. NPFX =: 7}. y. -. CRLF elseif. '2 NICK ' -: 7{. y. do. elseif. do. s3 =. end. y. return. ) lognogo =: 3 : 0 y. fappend 'c:\j503a\temp\hardname.log' (' NAME:',NAME,LF) fappend 'c:\j503a\temp\hardname.log' (' GIVN:',GIVN,LF) fappend 'c:\j503a\temp\hardname.log' (' SURN:',SURN,LF) fappend 'c:\j503a\temp\hardname.log' (' NPFX:',NPFX,LF) fappend 'c:\j503a\temp\hardname.log' (' NSFX:',NSFX,LF,'-----------',LF) fappend 'c:\j503a\temp\hardname.log' ) SURNAME=: 0 : 0 pc Surname; menupop "File"; menu new "&New" "" "" ""; menu open "&Open" "" "" ""; menusep; menu exit "&Exit" "" "" ""; menupopz; xywh 136 8 34 12;cc ok button;cn "OK"; xywh 136 23 34 12;cc cancel button;cn "Cancel"; xywh 58 7 50 11;cc Surfirst radiobutton;cn "Surname first"; xywh 58 21 50 10;cc Surlast radiobutton group;cn "Surname Last"; pas 6 6;pcenter; rem form end; ) Surname_run=: 3 : 0 wd SURNAME NB. initialize form here wd 'pshow;' ) Surname_close=: 3 : 0 wd'pclose' ) Surname_cancel_button=: 3 : 0 Surname_close'' ) Surname_open_button=: 3 : 0 fn =: wd 'mbopen "Choose a GEDCOM file to have the surnames flipped" "" "*.ged"' echo 'fn';fn ) Surname_ok_button=: 3 : 0 if. 0 = #fn do. Surname_open_button '' end. Surname_close '' main '' ) Surname_run '' --------------010209060805000907030805-- --------------000103010406010809090505--

This looks extremely suspicious to me but, being at best a "semi" programmer, I'm compelled to save it and give it a try. If I ever go far enough to get it working I will hound Lorin for answers. He might even be sorry he ever posted this. Regards, Bill -----Original Message----- From: Lorin Lund [mailto:wbs@infowest.com] Sent: Friday, February 11, 2005 7:10 PM To: PAF-5-USERS-L@rootsweb.com Subject: [PAF-5] "suspicious offer" fulfilled This is a multi-part message in MIME format. --------------000103010406010809090505 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit I wasn't thinking clearly when I sent this off. I had intended to send it to the list. --------------000103010406010809090505 Content-Type: message/rfc822; name="Re: [PAF-5] A suspisious offer" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="Re: [PAF-5] A suspisious offer" Message-ID: <420C28D5.5070504@infowest.com> Date: Thu, 10 Feb 2005 20:39:01 -0700 From: Lorin Lund <wbs@infowest.com> User-Agent: Mozilla Thunderbird 0.9 (Windows/20041103) X-Accept-Language: en-us, en MIME-Version: 1.0 To: ilyaz@earthlink.net Subject: Re: [PAF-5] A suspisious offer References: <007901c50bc0$ce9ae050$6501a8c0@ILYA9FS1DPRI1B> In-Reply-To: <007901c50bc0$ce9ae050$6501a8c0@ILYA9FS1DPRI1B> Content-Type: multipart/mixed; boundary="------------010209060805000907030805" This is a multi-part message in MIME format. --------------010209060805000907030805 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit ilyaz@earthlink.net wrote: >Recently, I posted a question on this board. Yesterday, a person (no name) using email address wbs@infowest.com offered to solve my problem. Here's his message: > > <I am a computer programmer with experience in reading .paf files. (I am registered with the PAF development group of the LDS Church. I.E. I have signed the necessary > papers so they allow me a copy of the parts of PAF that access the file.) > > Which order have you decided to standardize on surname first or surname last? > > It will be much easier for me if you send me a copy of your data. (Rather than me trying to send you a program that you would have to install and run.)> > >This offer sounds like phishing to me. I did not send my file to him. Does anyone on this board know this person? Unless someone from the PAF Development will vouch for him, I'd be very careful... > >Ilya Zeldes >Fort Myers, Florida > > >==== PAF-5-USERS Mailing List ==== >Having trouble with the software? Check PAF 5.x Information >http://www.ausbdm.org/p5uinfo.php > > I do most of my ad hoc projects in a computer language called 'J'. (see http://www.Jsoftware.com) It is an interpreted language so you will have to download and install the language software in order to run the attached J script. I do my ad hoc genealogy projects in GEDCOM rather than directly in PAF for several reasons. One of which is so I can view the results directly with any text editor. I consider this program a 'first draft' because I can't program for NSFX and NPFX tags until I see if you have any and how they would relate to an change of order. This version of the program deals with those cases by logging them to a problem file. It did a good job of re-ordering names in the several data-sets I tried as long as there wasn't any name prefixes or suffixes. But because I'm working with GEDCOM it would be well for you to first verify that nothing is lost in the process of exporting to GEDCOM and importing that back into a new, empty PAF file. I have found that you can enter a date range in PAF that will not be accurately represented when exporting to GEDCOM. My brother-in-law's data has some dates which PAF displays as 4/9 Apr/May 1896. I think the person who put this in was trying to represent a time period or alternate dates of 4 Apr 1896/9 May 1896. In any event when you export this particular date format to GEDCOM you lose some of the information. So I devised a test for data changes in the export/import process. The first step is to make a copy of your PAF file. You could call it TEST1.PAF. Then export everything to a GEDCOM let's call it TEST1.GED. Now import TEST1.GED into TEST1.PAF. >>>> Make sure you are in TEST1.PAF when you do the import and not in your regular PAF file <<<< Once the import is complete you should have 2 records for each individual, 2 for each marriage ... everything duplicated. Now go to Tools|Match/Merge. PAF will invite you to do a back-up before merging but since this is the test file that shouldn't be important. Next you will see a Match/Merge Options box. Under matching choose 'Unique record serial numbers'. Under Merge select everything but the last. You don't want confirm on merge. When you click OK on the Options screen it should go away leaving you looking at the Match Individuals box. You need to click on 'Next Match' once to get the automerge started. Since you have 2 copies of each record, and since they should all be identical Automerge should run through all the records in the test database and end up displaying a little box with the total count of individuals merged. If it flickers for a while and then stops without showing the count then you have two records that should be identical but aren't. That means we might have a problem. If you don't have any problem then you can delete TEST1.PAF. Test1.GED is what will be read by my little J program. The program I sent you is a J script. It does not run on its own. You have to have the J language installed to run it. You can obtain it for free from http://www.JSoftware.com. Download and install version 5.03a. Save the script that I have sent as an attachment in C:\j503a\user. Now start J (you should have a blue 'J' icon on your desktop after installing J). Then click on Run|File and navigate to C:\J503a\user\surname_order. When it runs it should present a small window with a File menu, some radio buttons for selecting the order you want the result to be in, and an OK and Cancel button. First open Test1.GED using File|Open. Then select the order you want the names re-ordered to, then click OK. The program will then pop up a message telling you that it needs an output file name. Click OK to get rid of that and then you will get a Save dialog box in which to enter the output filename. You could call it Test2.ged. Now, as I said, this is a first draft of the program. It only re-orders names that don't have NSFX or NPFX tags in the GEDCOM file. I thought I would need to get a look at what those cases look like before I can extend the program to handle them. When the program runs, if it finds any of those kinds of names it will create a log file called 'hardnames' in C:\J503a\temp. If these names are already in the order you want then there is no problem. The 'hardnames' file is a plain text file. It can be viewed with notepad or wordpad or any word processor. If there are names there that aren't in the order you want then either 1) you will have to change those by hand after the new PAF file is created or 2) you send me the 'hardnames' file and I extend the program to handle those cases and send you a new, improved J script and you run through the export and rerun process again. Once the program is run you can create a new PAF file and import TEST2.GED into it. When I asked for you to send me your data I was just thinking that it would be altogether simpler for you to just send me your data. I would do the test and the export and run the program and create the new PAF file and then I would send the new PAF file back to you. That offer still stands. If you decide to send me a copy of your data I will not use it for any other purpose. Just patch it up, send it back to you, and delete it from my computer. --------------010209060805000907030805 Content-Type: text/plain; name="surname_order.ijs" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="surname_order.ijs" NB. --------------------------------------------------------- NB. For setting the name order in a PAF5 GEDCOM NB. --------------------------------------------------------- fn =: '' load 'files' load 'regex' main =: 3 : 0 Surlast =: ". Surlast wdinfo 'We''ll need a filename to write to: ' fn2 =: wd 'mbsave "Filename and path to save to: " "" "*.ged"' aa =. fread fn fret =. LF,'0 ' bb =. (#aa){. 1,fret E. aa D =: ; t1 each bb <;.1 aa D fwrite fn2 ) t1 =: 3 : 0 if. +/ ' INDI' E. y. do. fr =. LF,'1 ' bb =. _1}.1,fr E. y. R =: ; t2 each bb <;.1 y. else. y. return. end. ) t2 =: 3 : 0 Y2 =: y. if. '1 NAME' -: 6{. y. do. NAME =: '' SURN =: '' GIVN =: '' NSFX =: '' NPFX =: '' b =. ; t3 each <;.2 y. if. #NSFX,NPFX do. lognogo y. y. return. end. tmplt =. (SURN;'SURN') rxrplc (GIVN;'GIVN') rxrplc NAME tmplt =. ('^ +';'') rxrplc (' +$';'') rxrplc tmplt tmplt2 =. (' *';' ') rxrplc tmplt while. 0 = tmplt2 -: tmplt do. tmplt =. tmplt2 tmplt2 =. (' *';' ') rxrplc tmplt end. GIVN =: ('^, ';'') rxrplc GIVN select. tmplt2 case. 'GIVN /SURN/' do. if. Surlast do. y. return. else. '1 NAME /',SURN,'/ ',GIVN,LF,b return. end. case. '/SURN/ GIVN' do. if. Surlast do. '1 NAME ',GIVN,' /',SURN,'/',LF,b return. else. y. return. end. end. else. y. return. end. ) t3 =: 3 : 0 Y3 =: y. if. '1 NAME ' -: 7{. y. do. NAME =: 7}. y. -. CRLF '' return. elseif. '2 SURN ' -: 7{. y. do. SURN =: 7}. y. -. CRLF elseif. '2 GIVN ' -: 7{. y. do. GIVN =: 7}. y. -. CRLF elseif. '2 NSFX ' -: 7{. y. do. NSFX =: 7}. y. -. CRLF elseif. '2 NPFX ' -: 7{. y. do. NPFX =: 7}. y. -. CRLF elseif. '2 NICK ' -: 7{. y. do. elseif. do. s3 =. end. y. return. ) lognogo =: 3 : 0 y. fappend 'c:\j503a\temp\hardname.log' (' NAME:',NAME,LF) fappend 'c:\j503a\temp\hardname.log' (' GIVN:',GIVN,LF) fappend 'c:\j503a\temp\hardname.log' (' SURN:',SURN,LF) fappend 'c:\j503a\temp\hardname.log' (' NPFX:',NPFX,LF) fappend 'c:\j503a\temp\hardname.log' (' NSFX:',NSFX,LF,'-----------',LF) fappend 'c:\j503a\temp\hardname.log' ) SURNAME=: 0 : 0 pc Surname; menupop "File"; menu new "&New" "" "" ""; menu open "&Open" "" "" ""; menusep; menu exit "&Exit" "" "" ""; menupopz; xywh 136 8 34 12;cc ok button;cn "OK"; xywh 136 23 34 12;cc cancel button;cn "Cancel"; xywh 58 7 50 11;cc Surfirst radiobutton;cn "Surname first"; xywh 58 21 50 10;cc Surlast radiobutton group;cn "Surname Last"; pas 6 6;pcenter; rem form end; ) Surname_run=: 3 : 0 wd SURNAME NB. initialize form here wd 'pshow;' ) Surname_close=: 3 : 0 wd'pclose' ) Surname_cancel_button=: 3 : 0 Surname_close'' ) Surname_open_button=: 3 : 0 fn =: wd 'mbopen "Choose a GEDCOM file to have the surnames flipped" "" "*.ged"' echo 'fn';fn ) Surname_ok_button=: 3 : 0 if. 0 = #fn do. Surname_open_button '' end. Surname_close '' main '' ) Surname_run '' --------------010209060805000907030805-- --------------000103010406010809090505-- ==== PAF-5-USERS Mailing List ==== PAF-5-USERS Mailing List Archives http://archiver.rootsweb.com/th/index/PAF-5-USERS/

Dear Lorin, just read a post by Bill on PAF5 and noticed within it your message, explaining your method. Apparently, this message never reached my Inbox and I didn't saw it on PAF5 before. This incident is another proof.that hell is paved with good intentions... I want you to know that, if I received your explanations before your offer to send my file to you, the outcome would be different. Anyway, at this point, I'd like to thank you for your kind offer and tell you that I fixed my problem the old fashioned way - picking the out of order entries one-by-one and changing them. Thanks God, there were just a few of them... Ilya Zeldes Fort Myers, Florida ----- Original Message ----- From: "Lorin Lund" <wbs@infowest.com> To: <PAF-5-USERS-L@rootsweb.com> Sent: February 11, 2005 7:10 PM Subject: "suspicious offer" fulfilled > This is a multi-part message in MIME format. > --------------000103010406010809090505 > Content-Type: text/plain; charset=ISO-8859-1; format=flowed > Content-Transfer-Encoding: 7bit > > I wasn't thinking clearly when I sent this off. I had intended to send > it to the list. > > > > --------------000103010406010809090505 > Content-Type: message/rfc822; > name="Re: [PAF-5] A suspisious offer" > Content-Transfer-Encoding: 7bit > Content-Disposition: inline; > filename="Re: [PAF-5] A suspisious offer" > > Message-ID: <420C28D5.5070504@infowest.com> > Date: Thu, 10 Feb 2005 20:39:01 -0700 > From: Lorin Lund <wbs@infowest.com> > User-Agent: Mozilla Thunderbird 0.9 (Windows/20041103) > X-Accept-Language: en-us, en > MIME-Version: 1.0 > To: ilyaz@earthlink.net > Subject: Re: [PAF-5] A suspisious offer > References: <007901c50bc0$ce9ae050$6501a8c0@ILYA9FS1DPRI1B> > In-Reply-To: <007901c50bc0$ce9ae050$6501a8c0@ILYA9FS1DPRI1B> > Content-Type: multipart/mixed; > boundary="------------010209060805000907030805" > > This is a multi-part message in MIME format. > --------------010209060805000907030805 > Content-Type: text/plain; charset=ISO-8859-1; format=flowed > Content-Transfer-Encoding: 7bit > > ilyaz@earthlink.net wrote: > >>Recently, I posted a question on this board. Yesterday, a person (no name) >>using email address wbs@infowest.com offered to solve my problem. Here's >>his message: >> >> <I am a computer programmer with experience in reading .paf files. (I >> am registered with the PAF development group of the LDS Church. I.E. I >> have signed the necessary >> papers so they allow me a copy of the parts of PAF that access the file.) >> >> Which order have you decided to standardize on surname first or surname >> last? >> >> It will be much easier for me if you send me a copy of your data. (Rather >> than me trying to send you a program that you would have to install and >> run.)> >> >>This offer sounds like phishing to me. I did not send my file to him. Does >>anyone on this board know this person? Unless someone from the PAF >>Development will vouch for him, I'd be very careful... >> >>Ilya Zeldes >>Fort Myers, Florida >> >> >>==== PAF-5-USERS Mailing List ==== >>Having trouble with the software? Check PAF 5.x Information >>http://www.ausbdm.org/p5uinfo.php >> >> > I do most of my ad hoc projects in a computer language called 'J'. (see > http://www.Jsoftware.com) It is an interpreted language so you will > have to download and install the language software in order to run the > attached J script. I do my ad hoc genealogy projects in GEDCOM rather > than directly in PAF for several reasons. One of which is so I can view > the results directly with any text editor. > > I consider this program a 'first draft' because I can't program for NSFX > and NPFX tags until I see if you have any and how they would relate to > an change of order. This version of the program deals with those cases > by logging them to a problem file. It did a good job of re-ordering > names in the several data-sets I tried as long as there wasn't any name > prefixes or suffixes. > > But because I'm working with GEDCOM it would be well for you to first > verify that nothing is lost in the process of exporting to GEDCOM and > importing that back into a new, empty PAF file. I have found that you > can enter a date range in PAF that will not be accurately represented > when exporting to GEDCOM. My brother-in-law's data has some dates which > PAF displays as 4/9 Apr/May 1896. I think the person who put this in > was trying to represent a time period or alternate dates of 4 Apr 1896/9 > May 1896. In any event when you export this particular date format to > GEDCOM you lose some of the information. > > So I devised a test for data changes in the export/import process. > > The first step is to make a copy of your PAF file. You could call it > TEST1.PAF. Then export everything to a GEDCOM let's call it TEST1.GED. > > Now import TEST1.GED into TEST1.PAF. >>>> Make sure you are in > TEST1.PAF when you do the import and not in your regular PAF file <<<< > > Once the import is complete you should have 2 records for each > individual, 2 for each marriage ... everything duplicated. Now go > to Tools|Match/Merge. PAF will invite you to do a back-up before > merging but since this is the test file that shouldn't be important. > > Next you will see a Match/Merge Options box. Under matching choose > 'Unique record serial numbers'. Under Merge select everything but the > last. You don't want confirm on merge. > > When you click OK on the Options screen it should go away leaving you > looking at the Match Individuals box. You need to click on 'Next Match' > once to get the automerge started. Since you have 2 copies of each > record, and since they should all be identical Automerge should run > through all the records in the test database and end up displaying a > little box with the total count of individuals merged. If it flickers > for a while and then stops without showing the count then you have two > records that should be identical but aren't. That means we might have a > problem. If you don't have any problem then you can delete TEST1.PAF. > > Test1.GED is what will be read by my little J program. > > The program I sent you is a J script. It does not run on its own. You > have to have the J language installed to run it. You can obtain it for > free from http://www.JSoftware.com. Download and install version > 5.03a. Save the script that I have sent as an attachment in > C:\j503a\user. > > Now start J (you should have a blue 'J' icon on your desktop after > installing J). Then click on Run|File and navigate to > C:\J503a\user\surname_order. When it runs it should present a small > window with a File menu, some radio buttons for selecting the order you > want the result to be in, and an OK and Cancel button. > > First open Test1.GED using File|Open. Then select the order you want > the names re-ordered to, then click OK. The program will then pop up a > message telling you that it needs an output file name. Click OK to get > rid of that and then you will get a Save dialog box in which to enter > the output filename. You could call it Test2.ged. > > Now, as I said, this is a first draft of the program. It only re-orders > names that don't have NSFX or NPFX tags in the GEDCOM file. I thought I > would need to get a look at what those cases look like before I can > extend the program to handle them. When the program runs, if it finds > any of those kinds of names it will create a log file called 'hardnames' > in C:\J503a\temp. If these names are already in the order you want then > there is no problem. The 'hardnames' file is a plain text file. It can > be viewed with notepad or wordpad or any word processor. If there are > names there that aren't in the order you want then either 1) you will > have to change those by hand after the new PAF file is created or 2) you > send me the 'hardnames' file and I extend the program to handle those > cases and send you a new, improved J script and you run through the > export and rerun process again. > > Once the program is run you can create a new PAF file and import > TEST2.GED into it. > > When I asked for you to send me your data I was just thinking that it > would be altogether simpler for you to just send me your data. I would > do the test and the export and run the program and create the new PAF > file and then I would send the new PAF file back to you. That offer > still stands. If you decide to send me a copy of your data I will not > use it for any other purpose. Just patch it up, send it back to you, > and delete it from my computer. > > > --------------010209060805000907030805 > Content-Type: text/plain; > name="surname_order.ijs" > Content-Transfer-Encoding: 7bit > Content-Disposition: inline; > filename="surname_order.ijs" > > NB. --------------------------------------------------------- > NB. For setting the name order in a PAF5 GEDCOM > NB. --------------------------------------------------------- > fn =: '' > load 'files' > load 'regex' > main =: 3 : 0 > Surlast =: ". Surlast > wdinfo 'We''ll need a filename to write to: ' > fn2 =: wd 'mbsave "Filename and path to save to: " "" "*.ged"' > aa =. fread fn > fret =. LF,'0 ' > bb =. (#aa){. 1,fret E. aa > D =: ; t1 each bb <;.1 aa > D fwrite fn2 > ) > > t1 =: 3 : 0 > if. +/ ' INDI' E. y. do. > fr =. LF,'1 ' > bb =. _1}.1,fr E. y. > R =: ; t2 each bb <;.1 y. > else. > y. return. > end. > ) > > t2 =: 3 : 0 > Y2 =: y. > if. '1 NAME' -: 6{. y. do. > NAME =: '' > SURN =: '' > GIVN =: '' > NSFX =: '' > NPFX =: '' > b =. ; t3 each <;.2 y. > if. #NSFX,NPFX do. > lognogo y. > y. return. > end. > tmplt =. (SURN;'SURN') rxrplc (GIVN;'GIVN') rxrplc NAME > tmplt =. ('^ +';'') rxrplc (' +$';'') rxrplc tmplt > tmplt2 =. (' *';' ') rxrplc tmplt > while. 0 = tmplt2 -: tmplt do. > tmplt =. tmplt2 > tmplt2 =. (' *';' ') rxrplc tmplt > end. > GIVN =: ('^, ';'') rxrplc GIVN > select. tmplt2 > case. 'GIVN /SURN/' do. > if. Surlast do. > y. return. > else. > '1 NAME /',SURN,'/ ',GIVN,LF,b return. > end. > case. '/SURN/ GIVN' do. > if. Surlast do. > '1 NAME ',GIVN,' /',SURN,'/',LF,b return. > else. > y. return. > end. > end. > else. > y. return. > end. > ) > > t3 =: 3 : 0 > Y3 =: y. > if. '1 NAME ' -: 7{. y. do. > NAME =: 7}. y. -. CRLF > '' return. > elseif. '2 SURN ' -: 7{. y. do. > SURN =: 7}. y. -. CRLF > elseif. '2 GIVN ' -: 7{. y. do. > GIVN =: 7}. y. -. CRLF > elseif. '2 NSFX ' -: 7{. y. do. > NSFX =: 7}. y. -. CRLF > elseif. '2 NPFX ' -: 7{. y. do. > NPFX =: 7}. y. -. CRLF > elseif. '2 NICK ' -: 7{. y. do. > elseif. do. > s3 =. > end. > y. return. > ) > > lognogo =: 3 : 0 > y. fappend 'c:\j503a\temp\hardname.log' > (' NAME:',NAME,LF) fappend 'c:\j503a\temp\hardname.log' > (' GIVN:',GIVN,LF) fappend 'c:\j503a\temp\hardname.log' > (' SURN:',SURN,LF) fappend 'c:\j503a\temp\hardname.log' > (' NPFX:',NPFX,LF) fappend 'c:\j503a\temp\hardname.log' > (' NSFX:',NSFX,LF,'-----------',LF) fappend 'c:\j503a\temp\hardname.log' > ) > > SURNAME=: 0 : 0 > pc Surname; > menupop "File"; > menu new "&New" "" "" ""; > menu open "&Open" "" "" ""; > menusep; > menu exit "&Exit" "" "" ""; > menupopz; > xywh 136 8 34 12;cc ok button;cn "OK"; > xywh 136 23 34 12;cc cancel button;cn "Cancel"; > xywh 58 7 50 11;cc Surfirst radiobutton;cn "Surname first"; > xywh 58 21 50 10;cc Surlast radiobutton group;cn "Surname Last"; > pas 6 6;pcenter; > rem form end; > ) > > Surname_run=: 3 : 0 > wd SURNAME > NB. initialize form here > wd 'pshow;' > ) > > Surname_close=: 3 : 0 > wd'pclose' > ) > > Surname_cancel_button=: 3 : 0 > Surname_close'' > ) > > Surname_open_button=: 3 : 0 > fn =: wd 'mbopen "Choose a GEDCOM file to have the surnames flipped" "" > "*.ged"' > echo 'fn';fn > ) > > Surname_ok_button=: 3 : 0 > if. 0 = #fn do. Surname_open_button '' end. > Surname_close '' > main '' > ) > > Surname_run '' > > > --------------010209060805000907030805-- > > > --------------000103010406010809090505-- > > ______________________________

Is there any way to add information to the Children area of the Family View? I'd like to see more information about each child of the family. Specifically, I'd like to see the death date. Right now I only see the Name, Born, and Parent Link. It would be useful to be able to replace the Parent Link with Death. I'm currently using PAF 5.2.18.0 Donna Hrynkiw Currently researching: Hrynkiw, Petrash in Iwankiw, Borchchiv, Ternopil, Ukraine 1890-1920. Donna.Hrynkiw@kwantlen.ca Some people say that I'm superficial, but that's just on the surface.

Me too! I would like to see the Maiden names. Paul Donna Hrynkiw <Donna.Hrynkiw@kwantlen.ca> wrote: Is there any way to add information to the Children area of the Family View? I'd like to see more information about each child of the family. Specifically, I'd like to see the death date. Right now I only see the Name, Born, and Parent Link. It would be useful to be able to replace the Parent Link with Death. I'm currently using PAF 5.2.18.0 Donna Hrynkiw Currently researching: Hrynkiw, Petrash in Iwankiw, Borchchiv, Ternopil, Ukraine 1890-1920. Donna.Hrynkiw@kwantlen.ca Some people say that I'm superficial, but that's just on the surface. ==== PAF-5-USERS Mailing List ==== PAF @ FamilySearch Internet Genealogy Service http://www.familysearch.org/eng/paf/ --------------------------------- Do you Yahoo!? Yahoo! Search presents - Jib Jab's 'Second Term'

Since there is only a limited amount of space on a screen, without making the characters too small to read, the question is what would you be willing to give up? While the Parent Link is not often used, I absolutely would NOT be willing to give it up for the death date. And, just incidentally, you can modify the Individual view to include the Death date & Place. I did this years ago and found it to be of very limited use. Furthermore, that information is only a single mouse button click away. As to maiden names -- that is what you now see -- I do not understand the need -- Unless you have entered married names in the Individual Record. Richard L. Halliday West Linn, OR (Near Portland) Me too! I would like to see the Maiden names. Paul Donna Hrynkiw <Donna.Hrynkiw@kwantlen.ca> wrote: Is there any way to add information to the Children area of the Family View? I'd like to see more information about each child of the family. Specifically, I'd like to see the death date. Right now I only see the Name, Born, and Parent Link. It would be useful to be able to replace the Parent Link with Death.

I have just come across this problem - in family view I have 7 children and just this morning I discover that the last one is there twice exactly the same including the Notes. I tried deleting one which worked OK but the I had a duplicate on the next child above, I re-installed from a back up and then tried unlinking the offender then deleting her. Same story. What's goin' on. Regards Col Paterson