<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=utf-8">
<meta name=Generator content="Microsoft Word 12 (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:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0in;
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.MsoPlainText, li.MsoPlainText, div.MsoPlainText
{mso-style-priority:99;
mso-style-link:"Plain Text Char";
margin:0in;
margin-bottom:.0001pt;
font-size:9.0pt;
font-family:"Courier New";}
span.PlainTextChar
{mso-style-name:"Plain Text Char";
mso-style-priority:99;
mso-style-link:"Plain Text";
font-family:"Courier New";}
span.EmailStyle19
{mso-style-type:personal;
font-family:"Calibri","sans-serif";
color:#1F497D;}
span.EmailStyle20
{mso-style-type:personal;
font-family:"Calibri","sans-serif";
color:#1F497D;}
span.EmailStyle21
{mso-style-type:personal;
font-family:"Calibri","sans-serif";
color:#1F497D;}
span.EmailStyle22
{mso-style-type:personal;
font-family:"Calibri","sans-serif";
color:#1F497D;}
span.EmailStyle23
{mso-style-type:personal-reply;
font-family:"Calibri","sans-serif";
color:#1F497D;}
.MsoChpDefault
{mso-style-type:export-only;
font-size:10.0pt;}
@page WordSection1
{size:8.5in 11.0in;
margin:1.0in 1.0in 1.0in 1.0in;}
div.WordSection1
{page:WordSection1;}
-->
</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-US link=blue vlink=purple>
<div class=WordSection1>
<div>
<div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0in 0in 0in'>
<p class=MsoNormal><b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'>From:</span></b><span
style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'> Faisal Karim
[mailto:faisalk@furniture-pro.com] <br>
<b>Sent:</b> Thursday, August 05, 2010 12:09 PM<br>
<b>To:</b> Richard Kreiss<br>
<b>Subject:</b> RE: lookup problem<o:p></o:p></span></p>
</div>
</div>
<p class=MsoNormal><o:p> </o:p></p>
<p class=MsoNormal><span style='color:#1F497D'>You may try changing the lookup
name something like saljn = sales_journal<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'>Tried you suggestion and that
worked. Thanks..<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'>Now the real question is why
the same alias used for the browse lookup and the rn lookup, need to be
different in dclerk and not rclerk. Is there something in the code which
differs regarding the number of times the same handle can be used to open or
read records from the same file?<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'>Richard<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<div>
<div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0in 0in 0in'>
<p class=MsoNormal><b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'>From:</span></b><span
style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'> Richard Kreiss
[mailto:rkreiss@verizon.net] <br>
<b>Sent:</b> Thursday, August 05, 2010 11:04 AM<br>
<b>To:</b> Faisal Karim<br>
<b>Subject:</b> RE: lookup problem<o:p></o:p></span></p>
</div>
</div>
<p class=MsoNormal><o:p> </o:p></p>
<p class=MsoNormal><span style='color:#1F497D'>The browse lookup works in both
clerks but will put up a lookup failure message if a not line is there.<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'>The if @bk=”s” is executed which
set rn=sales_no and then does a lookup the sales journal file record based on
the record #, this fails. As there are over 32,000 records in my test
file and 0ver 300,000 records at my client’s site. <o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'>Interesting thing, the record #
is 32,575, the last record in the file. Need to see if this happens with
another set of values.<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'>Richard<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<div>
<div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0in 0in 0in'>
<p class=MsoNormal><b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'>From:</span></b><span
style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'> Faisal Karim
[mailto:faisalk@furniture-pro.com] <br>
<b>Sent:</b> Thursday, August 05, 2010 11:33 AM<br>
<b>To:</b> Richard Kreiss<br>
<b>Subject:</b> RE: lookup problem<o:p></o:p></span></p>
</div>
</div>
<p class=MsoNormal><o:p> </o:p></p>
<p class=MsoNormal><span style='color:#1F497D'>That is good. Have you
tried –ng instead of –nx since you have key match option enabled?<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<div>
<div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0in 0in 0in'>
<p class=MsoNormal><b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'>From:</span></b><span
style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'> Richard Kreiss
[mailto:rkreiss@verizon.net] <br>
<b>Sent:</b> Thursday, August 05, 2010 10:30 AM<br>
<b>To:</b> Faisal Karim<br>
<b>Subject:</b> RE: lookup problem<o:p></o:p></span></p>
</div>
</div>
<p class=MsoNormal><o:p> </o:p></p>
<p class=MsoNormal><span style='color:#1F497D'>In answer to your suggestion:
[1003-10005] as it should be. No spaces.<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'>Richard<o:p></o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p>
<div>
<div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0in 0in 0in'>
<p class=MsoNormal><b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'>From:</span></b><span
style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'> Faisal Karim
[mailto:faisalk@furniture-pro.com] <br>
<b>Sent:</b> Wednesday, August 04, 2010 6:50 PM<br>
<b>To:</b> Richard Kreiss<br>
<b>Subject:</b> RE: lookup problem<o:p></o:p></span></p>
</div>
</div>
<p class=MsoNormal><o:p> </o:p></p>
<p class=MsoPlainText>Richard,<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Try this for your example:<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoNormal><span style='font-size:9.0pt;font-family:"Courier New"'>Instead
of msgbox "Field 16 is \b5"<16<"\a-\nVersion #
\b2"<@vr<"\a-" ◄<o:p></o:p></span></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Do this: <b>msgbox "Field 16 is
["&16&"] \a-\nVersion # \b2"<@vr<"\a-"</b><o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>What is the exact value of 16 then in []?<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Faisal<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Again off the list for reply.<o:p></o:p></p>
<p class=MsoPlainText> <o:p></o:p></p>
<p class=MsoPlainText>-----Original Message-----<br>
From: filepro-list-bounces+faisalk=furniture-pro.com@lists.celestial.com
[mailto:filepro-list-bounces+faisalk=furniture-pro.com@lists.celestial.com] On
Behalf Of Richard Kreiss<br>
Sent: Wednesday, August 04, 2010 5:25 PM<br>
To: 'Kenneth Brody'<br>
Cc: filepro-list@lists.celestial.com<br>
Subject: RE: lookup problem<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>-----Original Message-----<o:p></o:p></p>
<p class=MsoPlainText>From: Kenneth Brody [mailto:kenb@fptech.com] <o:p></o:p></p>
<p class=MsoPlainText>Sent: Wednesday, August 04, 2010 2:15 PM<o:p></o:p></p>
<p class=MsoPlainText>To: Richard Kreiss<o:p></o:p></p>
<p class=MsoPlainText>Cc: filepro-list@lists.celestial.com<o:p></o:p></p>
<p class=MsoPlainText>Subject: Re: lookup problem<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>On 8/3/2010 6:16 PM, Richard Kreiss wrote:<o:p></o:p></p>
<p class=MsoPlainText>[...]<o:p></o:p></p>
<p class=MsoPlainText>>> *** A filePro Error Has Occurred ***<o:p></o:p></p>
<p class=MsoPlainText>>><o:p> </o:p></p>
<p class=MsoPlainText>>> On File: C:\appl\ccp/filepro/transaction/index.A<o:p></o:p></p>
<p class=MsoPlainText>>><o:p> </o:p></p>
<p class=MsoPlainText>>> Input Processing<o:p></o:p></p>
<p class=MsoPlainText>>><o:p> </o:p></p>
<p class=MsoPlainText>>> Line Number: 450<o:p></o:p></p>
<p class=MsoPlainText>>><o:p> </o:p></p>
<p class=MsoPlainText>>>
rn=sales(@rn);GOTO lok_sjn<o:p></o:p></p>
<p class=MsoPlainText>>> ^<o:p></o:p></p>
<p class=MsoPlainText>>><o:p> </o:p></p>
<p class=MsoPlainText>>>
@bk = "s"<o:p></o:p></p>
<p class=MsoPlainText>>>
rn=sales(@rn);GOTO lok_sjn<o:p></o:p></p>
<p class=MsoPlainText>[...]<o:p></o:p></p>
<p class=MsoPlainText>> 445 ------- -
- - - - -
- - - - -
- - - - -<o:p></o:p></p>
<p class=MsoPlainText>> ◄
If:<o:p></o:p></p>
<p class=MsoPlainText>>
Then: aa="(brw=10 xkey=xs show=keep pop=show fill=desc,top)"<o:p></o:p></p>
<p class=MsoPlainText>> 446 ------- -
- - - - -
- - - - -
- - - - -<o:p></o:p></p>
<p class=MsoPlainText>> ◄
If:<o:p></o:p></p>
<p class=MsoPlainText>>
Then: ab="[JOURNAL # START DATE TYPE PER
FEE CC TYPE LAST 4]"<o:p></o:p></p>
<p class=MsoPlainText>> 447 ------- -
- - - - -
- - - - -
- - - - -<o:p></o:p></p>
<p class=MsoPlainText>> ◄
If:<o:p></o:p></p>
<p class=MsoPlainText>> Then:
ac="*1
*6
*7 *8
$*9
*14 *32"<o:p></o:p></p>
<p class=MsoPlainText>> 448 ------- -
- - - - -
- - - - -
- - - - -<o:p></o:p></p>
<p class=MsoPlainText>> do_lk_r◄ If:<o:p></o:p></p>
<p class=MsoPlainText>>
Then: lookup sales = sales_journal k=16 i=C -NXm
b=(aa&ab&ac)<o:p></o:p></p>
<p class=MsoPlainText>> 449 ------- -
- - - - -
- - - - -
- - - - -<o:p></o:p></p>
<p class=MsoPlainText>> ◄
If: @sk = "BRKY" or
@bk = "X"<o:p></o:p></p>
<p class=MsoPlainText>>
Then: CLEARB;SHOW
"";pw="";END<o:p></o:p></p>
<p class=MsoPlainText>> 450 ------- -
- - - - -
- - - - -
- - - - -<o:p></o:p></p>
<p class=MsoPlainText>> ◄
If: @bk = "s"<o:p></o:p></p>
<p class=MsoPlainText>>
Then: rn=sales(@rn);GOTO
lok_sjn<o:p></o:p></p>
<p class=MsoPlainText>> 451 ------- -
- - - - -
- - - - -
- - - - -<o:p></o:p></p>
<p class=MsoPlainText>> ◄
If:<o:p></o:p></p>
<p class=MsoPlainText>>
Then: CLEARB;END<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>First, as others have pointed out, you have no "if
not sales" after the lookup.<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Since you say this is failing in dclerk, I would add:<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>do_lk_r<o:p></o:p></p>
<p class=MsoPlainText> then: debug on<o:p></o:p></p>
<p class=MsoPlainText> then: lookup sales =
sales_journal ...<o:p></o:p></p>
<p class=MsoPlainText> if: not sales<o:p></o:p></p>
<p class=MsoPlainText> then: ... do something ...<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>When you hit the lookup statement, check the value of field
16, including <o:p></o:p></p>
<p class=MsoPlainText>any leading, trailing, and embedded spaces. What is
the exact value of <o:p></o:p></p>
<p class=MsoPlainText>field 16, including all spaces?<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Step through the lookup. Did it display the browse
window, and wait for you <o:p></o:p></p>
<p class=MsoPlainText>to press "S"?<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>What does the debugger show as the value of "not
sales"?<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>-- <o:p></o:p></p>
<p class=MsoPlainText>Kenneth Brody<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Still at Denver Airport - flight delays for planes coming
East.<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Added the following:<o:p></o:p></p>
<p class=MsoPlainText>445 ------- - -
- - - - -
- - - - -
- - - -<o:p></o:p></p>
<p class=MsoPlainText> ◄
If:
◄<o:p></o:p></p>
<p class=MsoPlainText> Then: msgbox
"Field 16 is \b5"<16<"\a-\nVersion #
\b2"<@vr<"\a-" ◄<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>And<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>do_lk_r◄
If:
◄<o:p></o:p></p>
<p class=MsoPlainText> Then: lookup sales =
sales_journal k=16 i=C -NXm
b=(aa&ab&ac) ◄<o:p></o:p></p>
<p class=MsoPlainText>450 ------- - -
- - - - -
- - - - -
- - - -<o:p></o:p></p>
<p class=MsoPlainText> ◄
If: NOT
sales
◄<o:p></o:p></p>
<p class=MsoPlainText>
Then: BEEP;ERRORBOX "No Sales
Journal Record found for \r"<maste_code;CLEARB;END<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>And<o:p></o:p></p>
<p class=MsoPlainText>456 ------- - -
- - - - -
- - - - -
- - - -<o:p></o:p></p>
<p class=MsoPlainText> ◄ If:
◄<o:p></o:p></p>
<p class=MsoPlainText> Then: lookup sales =
sales_journal r=rn
-n
◄<o:p></o:p></p>
<p class=MsoPlainText>457 ------- - -
- - - - -
- - - - -
- - - -<o:p></o:p></p>
<p class=MsoPlainText> ◄
If: NOT sales
◄<o:p></o:p></p>
<p class=MsoPlainText>
Then: ERRORBOX "Sales journal
Record # \r"<rn<"\r Not Found";CLEARB;END<o:p></o:p></p>
<p class=MsoPlainText>458 ------- - -
- - - - -
- - - - -
- - - -<o:p></o:p></p>
<p class=MsoPlainText> ◄ If:<o:p></o:p></p>
<p class=MsoPlainText> Then: popup
sales,"renew"<o:p></o:p></p>
<p class=MsoPlainText>459 ------- - -
- - - - -
- - - - -
- - - -<o:p></o:p></p>
<p class=MsoPlainText> ◄ If:<o:p></o:p></p>
<p class=MsoPlainText> Then: input
popup("20","-1") y "is this the correct record?\n(Y)es
or (N<o:p></o:p></p>
<p class=MsoPlainText>460 ------- - -
- - - - -
- - - - -
- - - -<o:p></o:p></p>
<p class=MsoPlainText> ◄
If: y = "" or @sk =
"BRKY"<o:p></o:p></p>
<p class=MsoPlainText>
Then: pw =
"";CLEARP;ENDResult of 445:<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>───────────────────────────────────────<o:p></o:p></p>
<p class=MsoPlainText> Wo┌──────────────────────────┐ Sale<o:p></o:p></p>
<p class=MsoPlainText> │ Field 16 is
1003-10005 │ ◄<o:p></o:p></p>
<p class=MsoPlainText>──────│ Version #
5.6.10R9 │─────<o:p></o:p></p>
<p class=MsoPlainText> └────────── Press
Enter ┘ DO N<o:p></o:p></p>
<p class=MsoPlainText>
◄
◄<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Result of 450<o:p></o:p></p>
<p class=MsoPlainText>──────────────────────────────────────────────<o:p></o:p></p>
<p class=MsoPlainText>Sales Journal: 30190 Code :
1003-10005 Renewal: 01 Status:
C │<o:p></o:p></p>
<p class=MsoPlainText>
│<o:p></o:p></p>
<p class=MsoPlainText> Sales Date:
11/19/2005◄ Start Date: 08/01/2011◄
│
│<o:p></o:p></p>
<p class=MsoPlainText> Pay Type:
CC◄
<o:p></o:p></p>
<p class=MsoPlainText> Period Type: S◄ <o:p></o:p></p>
<p class=MsoPlainText> Annual fee:
1,500.00◄ │ <o:p></o:p></p>
<p class=MsoPlainText>
└──────────────────────────────────────────┘│<o:p></o:p></p>
<p class=MsoPlainText>
│<o:p></o:p></p>
<p class=MsoPlainText>Credit Card: VM◄ Reference
#:
◄
│─<o:p></o:p></p>
<p class=MsoPlainText>
Exp Date: 7◄ 2011◄
◄
│<o:p></o:p></p>
<p class=MsoPlainText>
│<o:p></o:p></p>
<p class=MsoPlainText> ┌──────────────────────┤ Comment
├───────────────────┐
Date │─<o:p></o:p></p>
<p class=MsoPlainText>
│
│ ◄ │<o:p></o:p></p>
<p class=MsoPlainText>──────────────────────────────────────────────────────────────────────────┘<o:p></o:p></p>
<p class=MsoPlainText>──────────────────────────────────┤<o:p></o:p></p>
<p class=MsoPlainText>
ema┌─────────────────────────────┐
◄<o:p></o:p></p>
<p class=MsoPlainText>─────────────────────│ is this the correct
record? │────────────────────────<o:p></o:p></p>
<p class=MsoPlainText> Screen
1 │ (Y)es or (N)o
->
◄
│ Record: 6648<o:p></o:p></p>
<p class=MsoPlainText>
└─────────────────────────────┘<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>The above was run using rclerk and the not sales and
msgbox were just added.<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Dclerk:<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>─────────────────────────────────<o:p></o:p></p>
<p class=MsoPlainText>Wo┌──────────────────────────┐ Sa<o:p></o:p></p>
<p class=MsoPlainText> │ Field 16 is 1003-10005 │<o:p></o:p></p>
<p class=MsoPlainText>──│ Version #
5.6.10D9 │───<o:p></o:p></p>
<p class=MsoPlainText> └────────── Press Enter ┘ DO<o:p></o:p></p>
<p class=MsoPlainText>
◄
◄<o:p></o:p></p>
<p class=MsoPlainText>─────────────────────────────────<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>────┌───────────────────────────────────────────────────────────────┐──<o:p></o:p></p>
<p class=MsoPlainText> Add│ JOURNAL # START DATE TYPE
PER FEE CC
TYPE LAST 4│<o:p></o:p></p>
<p class=MsoPlainText>
├───────────────────────────────────────────────────────────────┤<o:p></o:p></p>
<p class=MsoPlainText> Cit│ 30190
08/01/2011 CC S $
1,500.00 VM 8304 │<o:p></o:p></p>
<p class=MsoPlainText> ─│ 30189
08/01/2010 CC S $
1,500.00 VM 8304 │──<o:p></o:p></p>
<p class=MsoPlainText> Ho│ ┌───────────────────────────────────────────────┐
│rs<o:p></o:p></p>
<p class=MsoPlainText>(714│ │ No Sales Journal
Record found for 1003-10005 │ │<o:p></o:p></p>
<p class=MsoPlainText>────│ └───────────────────────────────
Press Enter ┘ │──<o:p></o:p></p>
<p class=MsoPlainText>Date│
│<o:p></o:p></p>
<p class=MsoPlainText>03/0└─End of
File───────────────────────────────────────────────────┘<o:p></o:p></p>
<p class=MsoPlainText>───────────────────────────────────────────────────────────────────────<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>As shown, the program functions properly when using
rclerk but not dclerk.<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>It appears that the 2 sales journal records are found as
the browse appears. The if: not sales at line 450 executes even
though records were found. It doesn't execute, line 450, when rclerk is
used.<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>Richard <o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>_______________________________________________<o:p></o:p></p>
<p class=MsoPlainText>Filepro-list mailing list<o:p></o:p></p>
<p class=MsoPlainText>Filepro-list@lists.celestial.com<o:p></o:p></p>
<p class=MsoPlainText>http://mailman.celestial.com/mailman/listinfo/filepro-list<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoPlainText>-- <o:p></o:p></p>
<p class=MsoPlainText>This message has been scanned for viruses and<o:p></o:p></p>
<p class=MsoPlainText>dangerous content by MailScanner, and is<o:p></o:p></p>
<p class=MsoPlainText>believed to be clean.<o:p></o:p></p>
<p class=MsoPlainText><o:p> </o:p></p>
<p class=MsoNormal><span style='font-size:12.0pt;font-family:"Times New Roman","serif"'><br>
-- <br>
This message has been scanned for viruses and <br>
dangerous content by <a href="http://www.mailscanner.info/"><b>MailScanner</b></a>,
and is <br>
believed to be clean. <o:p></o:p></span></p>
<p class=MsoNormal><span style='font-size:12.0pt;font-family:"Times New Roman","serif"'><br>
-- <br>
This message has been scanned for viruses and <br>
dangerous content by <a href="http://www.mailscanner.info/"><b>MailScanner</b></a>,
and is <br>
believed to be clean. <o:p></o:p></span></p>
</div>
</body>
</html>