<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40"><head><meta http-equiv=Content-Type content="text/html; charset=us-ascii"><meta name=Generator content="Microsoft Word 15 (filtered medium)"><style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Cambria;
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:11.0pt;
font-family:"Calibri",sans-serif;}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
p
{mso-style-priority:99;
mso-margin-top-alt:auto;
margin-right:0cm;
mso-margin-bottom-alt:auto;
margin-left:0cm;
font-size:12.0pt;
font-family:"Times New Roman",serif;}
p.MsoAcetate, li.MsoAcetate, div.MsoAcetate
{mso-style-priority:99;
mso-style-link:"Balloon Text Char";
margin:0cm;
margin-bottom:.0001pt;
font-size:8.0pt;
font-family:"Tahoma",sans-serif;}
p.MsoListParagraph, li.MsoListParagraph, div.MsoListParagraph
{mso-style-priority:34;
margin-top:0cm;
margin-right:0cm;
margin-bottom:0cm;
margin-left:36.0pt;
margin-bottom:.0001pt;
font-size:11.0pt;
font-family:"Calibri",sans-serif;}
p.msonormal0, li.msonormal0, div.msonormal0
{mso-style-name:msonormal;
mso-style-priority:99;
mso-margin-top-alt:auto;
margin-right:0cm;
mso-margin-bottom-alt:auto;
margin-left:0cm;
font-size:12.0pt;
font-family:"Times New Roman",serif;}
span.BalloonTextChar
{mso-style-name:"Balloon Text Char";
mso-style-priority:99;
mso-style-link:"Balloon Text";
font-family:"Tahoma",sans-serif;}
span.EmailStyle22
{mso-style-type:personal;
font-family:"Calibri",sans-serif;
color:windowtext;}
span.EmailStyle23
{mso-style-type:personal;
font-family:"Calibri",sans-serif;
color:windowtext;}
span.EmailStyle24
{mso-style-type:personal;
font-family:"Calibri",sans-serif;
color:#1F497D;}
span.EmailStyle25
{mso-style-type:personal;
font-family:"Calibri",sans-serif;
color:#1F497D;}
span.EmailStyle26
{mso-style-type:personal;
font-family:"Calibri",sans-serif;
color:windowtext;}
span.EmailStyle27
{mso-style-type:personal;
font-family:"Calibri",sans-serif;
color:#1F497D;}
span.EmailStyle28
{mso-style-type:personal;
font-family:"Calibri",sans-serif;
color:#1F497D;}
span.EmailStyle29
{mso-style-type:personal-reply;
font-family:"Calibri",sans-serif;
color:windowtext;}
.MsoChpDefault
{mso-style-type:export-only;
font-size:10.0pt;}
@page WordSection1
{size:612.0pt 792.0pt;
margin:72.0pt 72.0pt 72.0pt 72.0pt;}
div.WordSection1
{page:WordSection1;}
/* List Definitions */
@list l0
{mso-list-id:589702736;
mso-list-type:hybrid;
mso-list-template-ids:-79277638 269025297 269025305 269025307 269025295 269025305 269025307 269025295 269025305 269025307;}
@list l0:level1
{mso-level-text:"%1\)";
mso-level-tab-stop:none;
mso-level-number-position:left;
text-indent:-18.0pt;}
@list l0:level2
{mso-level-number-format:alpha-lower;
mso-level-tab-stop:none;
mso-level-number-position:left;
text-indent:-18.0pt;}
@list l0:level3
{mso-level-number-format:roman-lower;
mso-level-tab-stop:none;
mso-level-number-position:right;
text-indent:-9.0pt;}
@list l0:level4
{mso-level-tab-stop:none;
mso-level-number-position:left;
text-indent:-18.0pt;}
@list l0:level5
{mso-level-number-format:alpha-lower;
mso-level-tab-stop:none;
mso-level-number-position:left;
text-indent:-18.0pt;}
@list l0:level6
{mso-level-number-format:roman-lower;
mso-level-tab-stop:none;
mso-level-number-position:right;
text-indent:-9.0pt;}
@list l0:level7
{mso-level-tab-stop:none;
mso-level-number-position:left;
text-indent:-18.0pt;}
@list l0:level8
{mso-level-number-format:alpha-lower;
mso-level-tab-stop:none;
mso-level-number-position:left;
text-indent:-18.0pt;}
@list l0:level9
{mso-level-number-format:roman-lower;
mso-level-tab-stop:none;
mso-level-number-position:right;
text-indent:-9.0pt;}
ol
{margin-bottom:0cm;}
ul
{margin-bottom:0cm;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></head><body lang=EN-CA link=blue vlink=purple><div class=WordSection1><p class=MsoNormal><span style='mso-fareast-language:EN-US'>Peter and Harold<o:p></o:p></span></p><p class=MsoNormal><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span style='mso-fareast-language:EN-US'>For those out there that do not know all the ins and outs of PH and Oracle, here are some more tips on speeding up your system.<o:p></o:p></span></p><p class=MsoNormal><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span style='mso-fareast-language:EN-US'>After changing all SELECT statements to CHOOSE statements you can do the following to QTP to speed up your system even further.<o:p></o:p></span></p><p class=MsoNormal><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='text-indent:-18.0pt;mso-list:l0 level1 lfo2'><![if !supportLists]><span style='mso-fareast-language:EN-US'><span style='mso-list:Ignore'>1)<span style='font:7.0pt "Times New Roman"'> </span></span></span><![endif]><span style='mso-fareast-language:EN-US'>Use OUTPUT PHASE reads for all reference files.<o:p></o:p></span></p><p class=MsoListParagraph><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>In this example the MemberFamilies file is a reference file for getting the persons name only.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>The ENTIRE MemberFamilies record is added to the end of the record complex for nothing.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>Sorting in this program creates sort work tables including every field from all 3 files with hundreds of fields.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'>ACCESS ClaimPayments &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> LINK ClaimNo OF ClaimPayments &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> TO ClaimNo &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> OF Claims &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> LINK MemberId OF Claims, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> GroupNo OF Claims, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> SubgroupNo OF Claims, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> FamilyId OF Claims &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> TO MemberId, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> GroupNo, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> SubgroupNo, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> FamilyId &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> OF MemberFamilies<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> OPTIONAL<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Cambria",serif;mso-fareast-language:EN-US'>This can be changed to not include the reference files in the access statement:<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Cambria",serif;mso-fareast-language:EN-US'>This way the record complex does not included MemberFamilies.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>Sorting in this program creates sort work tables including every field from only 2 files with dozens/hundreds less fields.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Cambria",serif;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'>ACCESS ClaimPayments &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> LINK ClaimNo OF ClaimPayments &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> TO ClaimNo &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> OF Claims<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'>OUTPUT MemberFamilies &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ADD &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> UPDATE &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> NOITEMS &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> IF 1 EQ 2 &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> VIA MemberId, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> GroupNo, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> SubgroupNo, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> FamilyId &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> USING MemberId OF Claims, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> GroupNo OF Claims, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> SubgroupNo OF Claims, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> FamilyId OF Claims<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>This only reads the MemberFamilies record AFTER the record complex has been completely extracted.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='text-indent:-18.0pt;mso-list:l0 level1 lfo2'><![if !supportLists]><span style='mso-fareast-language:EN-US'><span style='mso-list:Ignore'>2)<span style='font:7.0pt "Times New Roman"'> </span></span></span><![endif]><span style='mso-fareast-language:EN-US'>Replace ACCESS statements with CURSOR statements<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>Here the database returns only the records you wanted and ONLY the fields you need….thus reducing the traffic even more.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>Sorting in this program creates sort work tables including every field from only 1 file with 15 fields.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'>SQL &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> DECLARE Payments CURSOR FOR &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> SELECT ClaimPayments.BankId, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.BankAccountId, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.CheckNo, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.ClaimCentury, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.ClaimNo, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.PaymentAmount, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.MemberId, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.GroupNo, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.SubgroupNo, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.FamilyId, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.ClaimStatus, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.LastName, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.FirstName, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.MiddleName, &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.NameSuffix &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> FROM ClaimPayments &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> LEFT OUTER JOIN Claims &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ON Claims.ClaimNo = ClaimPayments.ClaimNo &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> LEFT OUTER JOIN MemberFamilies &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ON MemberFamilies.MemberId = Claims.MemberId AND &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.GroupNo = Claims.GroupNo AND &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.SubgroupNo = Claims.SubgroupNo AND &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.FamilyId = Claims.FamilyId &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> WHERE ClaimPayments.CIPFlag = 'N' AND &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.BankId = :T-BankId AND &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.BankAccountId = :T-BankAccountId AND &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.BulkCheck = 'Y'<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'>CURSOR Payments PRIMARY &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ALIAS DisplayClaimPayments &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> OCCURS 13 &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> KEY CheckNo<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ACCESS VIA CheckNo &<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> USING T-CheckNo<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='text-indent:-18.0pt;mso-list:l0 level1 lfo2'><![if !supportLists]><span style='mso-fareast-language:EN-US'><span style='mso-list:Ignore'>3)<span style='font:7.0pt "Times New Roman"'> </span></span></span><![endif]><span style='mso-fareast-language:EN-US'>Add VIEWS to the database.<o:p></o:p></span></p><p class=MsoListParagraph><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>Here the database returns only the records you wanted and ONLY the fields you need keeping your syntax simple and clean<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>This view can be used by more than one program also, keeping all your source code even more simple.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'>Sorting in this program creates sort work tables including every field from only 1 file with 15 fields.<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'>CREATE OR REPLACE VIEW vClaimPayments<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> AS SELECT ClaimPayments.BankId, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.BankAccountId, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.CheckNo, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.ClaimCentury, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.ClaimNo, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ClaimPayments.PaymentAmount, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.MemberId, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.GroupNo, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.SubgroupNo, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.FamilyId, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.ClaimStatus, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.LastName, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.FirstName, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.MiddleName, <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.NameSuffix <o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> FROM ClaimPayments<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> LEFT OUTER JOIN Claims<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ON Claims.ClaimCentury = ClaimPayments.ClaimCentury AND<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> Claims.ClaimNo = ClaimPayments.ClaimNo<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> LEFT OUTER JOIN MemberFamilies<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> ON MemberFamilies.MemberId = Claims.MemebrId AND<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.GroupNo = Claims.GroupNo AND<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.SubgroupNo = Claims.SubgroupNo AND<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> MemberFamilies.FamilyId = Claims.FamilyId<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'>/<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'>ACCESS vClaimPayments<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'> CHOOSE CheckNo (T-CheckNo)<o:p></o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoListParagraph style='margin-left:72.0pt'><span style='font-family:"Courier New";mso-fareast-language:EN-US'><o:p> </o:p></span></p></div></body></html>